/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ /************************************************************************* * * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. * * Copyright 2000, 2010 Oracle and/or its affiliates. * * OpenOffice.org - a multi-platform office productivity suite * * This file is part of OpenOffice.org. * * OpenOffice.org is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License version 3 * only, as published by the Free Software Foundation. * * OpenOffice.org is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License version 3 for more details * (a copy is included in the LICENSE file that accompanied this code). * * You should have received a copy of the GNU Lesser General Public License * version 3 along with OpenOffice.org. If not, see * * for a copy of the LGPLv3 License. * ************************************************************************/ // MARKER(update_precomp.py): autogen include statement, do not remove #include "precompiled_sd.hxx" #include #include "epptdef.hxx" #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include using namespace com::sun::star; using namespace ::com::sun::star::uno; using namespace ::com::sun::star::presentation; using ::com::sun::star::beans::XPropertySet; //============================ PPTWriter ================================== PPTWriter::PPTWriter( SvStorageRef& rSvStorage, ::com::sun::star::uno::Reference< ::com::sun::star::frame::XModel > & rXModel, ::com::sun::star::uno::Reference< ::com::sun::star::task::XStatusIndicator > & rXStatInd, SvMemoryStream* pVBA, sal_uInt32 nCnvrtFlags ) : PPTWriterBase ( rXModel, rXStatInd ), mnCnvrtFlags ( nCnvrtFlags ), mbStatus ( sal_False ), mbUseNewAnimations ( sal_True ), mnLatestStatValue ( 0 ), mrStg ( rSvStorage ), mpCurUserStrm ( NULL ), mpStrm ( NULL ), mpPicStrm ( NULL ), mpPptEscherEx ( NULL ), mnVBAOleOfs ( 0 ), mpVBA ( pVBA ), mnExEmbed ( 0 ), mpExEmbed ( new SvMemoryStream ), mnPagesWritten ( 0 ), mnTxId ( 0x7a2f64 ) { } void PPTWriter::exportPPTPre() { if ( !mrStg.Is() ) return; // MasterPages + Slides und Notizen + NotesMasterPage mnDrawings = mnMasterPages + ( mnPages << 1 ) + 1; if ( mXStatusIndicator.is() ) { mbStatusIndicator = sal_True; mnStatMaxValue = ( mnPages + mnMasterPages ) * 5; mXStatusIndicator->start( String( RTL_CONSTASCII_USTRINGPARAM( "PowerPoint Export" ) ), mnStatMaxValue + ( mnStatMaxValue >> 3 ) ); } SvGlobalName aGName( 0x64818d10L, 0x4f9b, 0x11cf, 0x86, 0xea, 0x00, 0xaa, 0x00, 0xb9, 0x29, 0xe8 ); mrStg->SetClass( aGName, 0, String( RTL_CONSTASCII_USTRINGPARAM( "MS PowerPoint 97" ) ) ); if ( !ImplCreateCurrentUserStream() ) return; mpStrm = mrStg->OpenSotStream( String( RTL_CONSTASCII_USTRINGPARAM( "PowerPoint Document" ) ) ); if ( !mpStrm ) return; if ( !mpPicStrm ) mpPicStrm = mrStg->OpenSotStream( String( RTL_CONSTASCII_USTRINGPARAM( "Pictures" ) ) ); mpPptEscherEx = new PptEscherEx( *mpStrm ); } void PPTWriter::exportPPTPost( ) { if ( !ImplCloseDocument() ) return; if ( mbStatusIndicator ) { mXStatusIndicator->setText( String( RTL_CONSTASCII_USTRINGPARAM( "PowerPoint Export" ) ) ); sal_uInt32 nValue = mnStatMaxValue + ( mnStatMaxValue >> 3 ); if ( nValue > mnLatestStatValue ) { mXStatusIndicator->setValue( nValue ); mnLatestStatValue = nValue; } } ImplWriteOLE(); ImplWriteVBA(); if ( !ImplWriteAtomEnding() ) return; if ( !ImplCreateDocumentSummaryInformation() ) return; mbStatus = sal_True; }; // --------------------------------------------------------------------------------------------- void ImplExportComments( uno::Reference< drawing::XDrawPage > xPage, SvMemoryStream& rBinaryTagData10Atom ); void PPTWriter::ImplWriteSlide( sal_uInt32 nPageNum, sal_uInt32 nMasterNum, sal_uInt16 nMode, sal_Bool bHasBackground, Reference< XPropertySet > aXBackgroundPropSet ) { Any aAny; const PHLayout& rLayout = GetLayout( mXPagePropSet ); mpPptEscherEx->PtReplaceOrInsert( EPP_Persist_Slide | nPageNum, mpStrm->Tell() ); mpPptEscherEx->OpenContainer( EPP_Slide ); mpPptEscherEx->AddAtom( 24, EPP_SlideAtom, 2 ); *mpStrm << rLayout.nLayout; mpStrm->Write( rLayout.nPlaceHolder, 8 ); // placeholderIDs ( 8Stueck ) *mpStrm << (sal_uInt32)(nMasterNum | 0x80000000)// master ID ( ist gleich 0x80000000 bei einer masterpage ) << (sal_uInt32)nPageNum + 0x100 // notes ID ( ist gleich null wenn keine notizen vorhanden ) << nMode << (sal_uInt16)0; // padword mnDiaMode = 0; sal_Bool bVisible = sal_True; ::com::sun::star::presentation::FadeEffect eFe = ::com::sun::star::presentation::FadeEffect_NONE; if ( GetPropertyValue( aAny, mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "Visible" ) ) ) ) aAny >>= bVisible; if ( GetPropertyValue( aAny, mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "Change" ) ) ) ) { switch ( *(INT32*)aAny.getValue() ) { case 1 : // automatisch mnDiaMode++; case 2 : // halbautomatisch mnDiaMode++; default : case 0 : // manuell break; } } if ( GetPropertyValue( aAny, mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "Effect" ) ) ) ) aAny >>= eFe; sal_uInt32 nSoundRef = 0; sal_Bool bIsSound = sal_False; sal_Bool bStopSound = sal_False; sal_Bool bLoopSound = sal_False; if ( GetPropertyValue( aAny, mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "Sound" ) ) ) ) { rtl::OUString aSoundURL; if ( aAny >>= aSoundURL ) { nSoundRef = maSoundCollection.GetId( aSoundURL ); bIsSound = sal_True; } else aAny >>= bStopSound; } if ( GetPropertyValue( aAny, mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "LoopSound" ) ) ) ) aAny >>= bLoopSound; sal_Bool bNeedsSSSlideInfoAtom = ( bVisible == FALSE ) || ( mnDiaMode == 2 ) || ( bIsSound ) || ( bStopSound ) || ( eFe != ::com::sun::star::presentation::FadeEffect_NONE ); if ( bNeedsSSSlideInfoAtom ) { sal_uInt8 nDirection = 0; sal_uInt8 nTransitionType = 0; sal_uInt16 nBuildFlags = 1; // advange by mouseclick INT32 nSlideTime = 0; // muss noch !!! sal_uInt8 nSpeed = 1; if ( GetPropertyValue( aAny, mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "Speed" ) ) ) ) { ::com::sun::star::presentation::AnimationSpeed aAs; aAny >>= aAs; nSpeed = (sal_uInt8)aAs; } sal_Int16 nTT = 0; if ( GetPropertyValue( aAny, mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "TransitionType" ) ) ) && ( aAny >>= nTT ) ) { sal_Int16 nTST = 0; if ( GetPropertyValue( aAny, mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "TransitionSubtype" ) ) ) && ( aAny >>= nTST ) ) nTransitionType = GetTransition( nTT, nTST, eFe, nDirection ); } if ( !nTransitionType ) nTransitionType = GetTransition( eFe, nDirection ); if ( mnDiaMode == 2 ) // automatic ? nBuildFlags |= 0x400; if ( bVisible == FALSE ) nBuildFlags |= 4; if ( bIsSound ) nBuildFlags |= 16; if ( bLoopSound ) nBuildFlags |= 64; if ( bStopSound ) nBuildFlags |= 256; if ( GetPropertyValue( aAny, mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "Duration" ) ) ) )// duration of this slide nSlideTime = *(INT32*)aAny.getValue() << 10; // in ticks mpPptEscherEx->AddAtom( 16, EPP_SSSlideInfoAtom ); *mpStrm << nSlideTime // standtime in ticks << nSoundRef << nDirection << nTransitionType << nBuildFlags << nSpeed << (sal_uInt8)0 << (sal_uInt8)0 << (sal_uInt8)0; } ImplCreateHeaderFooters( mXPagePropSet ); EscherSolverContainer aSolverContainer; mpPptEscherEx->OpenContainer( EPP_PPDrawing ); mpPptEscherEx->OpenContainer( ESCHER_DgContainer ); mpPptEscherEx->EnterGroup(0,0); ImplWritePage( rLayout, aSolverContainer, NORMAL, FALSE, nPageNum ); // Die Shapes der Seite werden im PPT Dok. erzeugt mpPptEscherEx->LeaveGroup(); if ( bHasBackground ) ImplWriteBackground( aXBackgroundPropSet ); else { mpPptEscherEx->OpenContainer( ESCHER_SpContainer ); mpPptEscherEx->AddShape( ESCHER_ShpInst_Rectangle, 0xc00 ); // Flags: Connector | Background | HasSpt EscherPropertyContainer aPropOpt; aPropOpt.AddOpt( ESCHER_Prop_fillRectRight, PPTtoEMU( maDestPageSize.Width ) ); aPropOpt.AddOpt( ESCHER_Prop_fillRectBottom, PPTtoEMU( maDestPageSize.Width ) ); aPropOpt.AddOpt( ESCHER_Prop_fNoFillHitTest, 0x120012 ); aPropOpt.AddOpt( ESCHER_Prop_fNoLineDrawDash, 0x80000 ); aPropOpt.AddOpt( ESCHER_Prop_bWMode, ESCHER_wDontShow ); aPropOpt.AddOpt( ESCHER_Prop_fBackground, 0x10001 ); // if true, this is the background shape aPropOpt.Commit( *mpStrm ); mpPptEscherEx->CloseContainer(); // ESCHER_SpContainer } aSolverContainer.WriteSolver( *mpStrm ); mpPptEscherEx->CloseContainer(); // ESCHER_DgContainer mpPptEscherEx->CloseContainer(); // EPP_Drawing mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 1 ); *mpStrm << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x808080 << (sal_uInt32)0x000000 << (sal_uInt32)0x99cc00 << (sal_uInt32)0xcc3333 << (sal_uInt32)0xffcccc << (sal_uInt32)0xb2b2b2; SvMemoryStream aBinaryTagData10Atom; ImplExportComments( mXDrawPage, aBinaryTagData10Atom ); if ( mbUseNewAnimations ) { SvMemoryStream amsofbtAnimGroup; ppt::AnimationExporter aExporter( aSolverContainer, maSoundCollection ); aExporter.doexport( mXDrawPage, amsofbtAnimGroup ); sal_uInt32 nmsofbtAnimGroupSize = amsofbtAnimGroup.Tell(); if ( nmsofbtAnimGroupSize ) { { EscherExAtom aMagic2( aBinaryTagData10Atom, 0x2eeb ); aBinaryTagData10Atom << (sal_uInt32)0x01c45df9 << (sal_uInt32)0xe1471b30; } { EscherExAtom aMagic( aBinaryTagData10Atom, 0x2b00 ); aBinaryTagData10Atom << (sal_uInt32)0; } aBinaryTagData10Atom.Write( amsofbtAnimGroup.GetData(), amsofbtAnimGroup.Tell() ); { EscherExContainer aMagic2( aBinaryTagData10Atom, 0x2b02 ); } } } if ( aBinaryTagData10Atom.Tell() ) { EscherExContainer aProgTags ( *mpStrm, EPP_ProgTags ); EscherExContainer aProgBinaryTag( *mpStrm, EPP_ProgBinaryTag ); { EscherExAtom aCString( *mpStrm, EPP_CString ); *mpStrm << (sal_uInt32)0x5f005f << (sal_uInt32)0x50005f << (sal_uInt32)0x540050 << (sal_uInt16)0x31 << (sal_uInt16)0x30; } { EscherExAtom aBinaryTagData( *mpStrm, EPP_BinaryTagData ); mpStrm->Write( aBinaryTagData10Atom.GetData(), aBinaryTagData10Atom.Tell() ); } } mpPptEscherEx->CloseContainer(); // EPP_Slide } // --------------------------------------------------------------------------------------------- void PPTWriter::ImplWriteSlideMaster( sal_uInt32 nPageNum, Reference< XPropertySet > aXBackgroundPropSet ) { mpPptEscherEx->PtReplaceOrInsert( EPP_Persist_MainMaster | nPageNum, mpStrm->Tell() ); mpPptEscherEx->OpenContainer( EPP_MainMaster ); mpPptEscherEx->AddAtom( 24, EPP_SlideAtom, 2 ); *mpStrm << (INT32)EPP_LAYOUT_TITLEANDBODYSLIDE // slide layout -> title and body slide << (sal_uInt8)1 << (sal_uInt8)2 << (sal_uInt8)0 << (sal_uInt8)0 << (sal_uInt8)0 << (sal_uInt8)0 << (sal_uInt8)0 << (sal_uInt8)0 // placeholderID << (sal_uInt32)0 // master ID ( ist gleich null bei einer masterpage ) << (sal_uInt32)0 // notes ID ( ist gleich null wenn keine notizen vorhanden ) << (sal_uInt16)0 // Bit 1: Follow master objects, Bit 2: Follow master scheme, Bit 3: Follow master background << (sal_uInt16)0; // padword mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 6 ); *mpStrm << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x808080 << (sal_uInt32)0x000000 << (sal_uInt32)0x99cc00 << (sal_uInt32)0xcc3333 << (sal_uInt32)0xffcccc << (sal_uInt32)0xb2b2b2; mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 6 ); *mpStrm << (sal_uInt32)0xff0000 << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x00ffff << (sal_uInt32)0x0099ff << (sal_uInt32)0xffff00 << (sal_uInt32)0x0000ff << (sal_uInt32)0x969696; mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 6 ); *mpStrm << (sal_uInt32)0xccffff << (sal_uInt32)0x000000 << (sal_uInt32)0x336666 << (sal_uInt32)0x008080 << (sal_uInt32)0x339933 << (sal_uInt32)0x000080 << (sal_uInt32)0xcc3300 << (sal_uInt32)0x66ccff; mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 6 ); *mpStrm << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x333333 << (sal_uInt32)0x000000 << (sal_uInt32)0xdddddd << (sal_uInt32)0x808080 << (sal_uInt32)0x4d4d4d << (sal_uInt32)0xeaeaea; mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 6 ); *mpStrm << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x808080 << (sal_uInt32)0x000000 << (sal_uInt32)0x66ccff << (sal_uInt32)0xff0000 << (sal_uInt32)0xcc00cc << (sal_uInt32)0xc0c0c0; mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 6 ); *mpStrm << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x808080 << (sal_uInt32)0x000000 << (sal_uInt32)0xc0c0c0 << (sal_uInt32)0xff6600 << (sal_uInt32)0x0000ff << (sal_uInt32)0x009900; mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 6 ); *mpStrm << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x808080 << (sal_uInt32)0x000000 << (sal_uInt32)0xff9933 << (sal_uInt32)0xccff99 << (sal_uInt32)0xcc00cc << (sal_uInt32)0xb2b2b2; for ( int nInstance = EPP_TEXTTYPE_Title; nInstance <= EPP_TEXTTYPE_QuarterBody; nInstance++ ) { if ( nInstance == EPP_TEXTTYPE_notUsed ) continue; // the auto color is dependent to the page background,so we have to set a page that is in the right context if ( nInstance == EPP_TEXTTYPE_Notes ) GetPageByIndex( 0, NOTICE ); else GetPageByIndex( 0, MASTER ); mpPptEscherEx->BeginAtom(); sal_Bool bFirst = TRUE; sal_Bool bSimpleText = FALSE; *mpStrm << (sal_uInt16)5; // paragraph count for ( sal_uInt16 nLev = 0; nLev < 5; nLev++ ) { if ( nInstance >= EPP_TEXTTYPE_CenterBody ) { bFirst = FALSE; bSimpleText = TRUE; *mpStrm << nLev; } mpStyleSheet->mpParaSheet[ nInstance ]->Write( *mpStrm, mpPptEscherEx, nLev, bFirst, bSimpleText, mXPagePropSet ); mpStyleSheet->mpCharSheet[ nInstance ]->Write( *mpStrm, mpPptEscherEx, nLev, bFirst, bSimpleText, mXPagePropSet ); bFirst = FALSE; } mpPptEscherEx->EndAtom( EPP_TxMasterStyleAtom, 0, nInstance ); } GetPageByIndex( nPageNum, MASTER ); EscherSolverContainer aSolverContainer; mpPptEscherEx->OpenContainer( EPP_PPDrawing ); mpPptEscherEx->OpenContainer( ESCHER_DgContainer ); mpPptEscherEx->EnterGroup(0,0); ImplWritePage( GetLayout( 0 ), aSolverContainer, MASTER, TRUE ); // Die Shapes der Seite werden im PPT Dok. erzeugt mpPptEscherEx->LeaveGroup(); ImplWriteBackground( aXBackgroundPropSet ); aSolverContainer.WriteSolver( *mpStrm ); mpPptEscherEx->CloseContainer(); // ESCHER_DgContainer mpPptEscherEx->CloseContainer(); // EPP_Drawing mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 1 ); *mpStrm << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x808080 << (sal_uInt32)0x000000 << (sal_uInt32)0x99cc00 << (sal_uInt32)0xcc3333 << (sal_uInt32)0xffcccc << (sal_uInt32)0xb2b2b2; if ( aBuExMasterStream.Tell() ) { ImplProgTagContainer( mpStrm, &aBuExMasterStream ); } mpPptEscherEx->CloseContainer(); // EPP_MainMaster }; // --------------------------------------------------------------------------------------------- PPTWriter::~PPTWriter() { void* pPtr; delete mpExEmbed; delete mpPptEscherEx; delete mpCurUserStrm; delete mpPicStrm; delete mpStrm; std::vector< PPTExStyleSheet* >::iterator aStyleSheetIter( maStyleSheetList.begin() ); while( aStyleSheetIter < maStyleSheetList.end() ) delete *aStyleSheetIter++; for ( pPtr = maSlideNameList.First(); pPtr; pPtr = maSlideNameList.Next() ) delete (::rtl::OUString*)pPtr; for ( pPtr = maHyperlink.First(); pPtr; pPtr = maHyperlink.Next() ) delete (EPPTHyperlink*)pPtr; for ( pPtr = maExOleObj.First(); pPtr; pPtr = maExOleObj.Next() ) delete (PPTExOleObjEntry*)pPtr; if ( mbStatusIndicator ) mXStatusIndicator->end(); } // --------------------------------------------------------------------------------------------- sal_Bool PPTWriter::ImplCreateCurrentUserStream() { mpCurUserStrm = mrStg->OpenSotStream( String( RTL_CONSTASCII_USTRINGPARAM( "Current User" ) ) ); if ( !mpCurUserStrm ) return sal_False; char pUserName[] = "Current User"; sal_uInt32 nLenOfUserName = strlen( pUserName ); sal_uInt32 nSizeOfRecord = 0x14 + ( ( nLenOfUserName + 4 ) & ~ 3 ); *mpCurUserStrm << (sal_uInt16)0 << (sal_uInt16)EPP_CurrentUserAtom << nSizeOfRecord; *mpCurUserStrm << (sal_uInt32)0x14 // Len << (sal_uInt32)0xe391c05f; // Magic sal_uInt32 nEditPos = mpCurUserStrm->Tell(); *mpCurUserStrm << (sal_uInt32)0x0 // OffsetToCurrentEdit; << (sal_uInt16)nLenOfUserName // << (sal_uInt16)0x3f4 // DocFileVersion << (sal_uInt8)3 // MajorVersion << (sal_uInt8)0 // MinorVersion << (sal_uInt16)0; // Pad Word pUserName[ nLenOfUserName ] = 8; mpCurUserStrm->Write( pUserName, nLenOfUserName + 1 ); for ( sal_uInt32 i = 0x15 + nLenOfUserName; i < nSizeOfRecord; i++ ) { *mpCurUserStrm << (sal_uInt8)0; // pad bytes }; mpCurUserStrm->Seek( nEditPos ); return sal_True; }; // --------------------------------------------------------------------------------------------- sal_Bool PPTWriter::ImplCreateDocumentSummaryInformation() { uno::Reference xDPS( mXModel, uno::UNO_QUERY_THROW); uno::Reference xDocProps( xDPS->getDocumentProperties()); if (xDocProps.is()) { // no idea what this is... static sal_uInt8 aGuid[ 0x52 ] = { 0x4e, 0x00, 0x00, 0x00, '{',0,'D',0,'B',0,'1',0,'A',0,'C',0,'9',0,'6',0,'4',0,'-',0, 'E',0,'3',0,'9',0,'C',0,'-',0,'1',0,'1',0,'D',0,'2',0,'-',0, 'A',0,'1',0,'E',0,'F',0,'-',0,'0',0,'0',0,'6',0,'0',0,'9',0, '7',0,'D',0,'A',0,'5',0,'6',0,'8',0,'9',0,'}',0 }; uno::Sequence aGuidSeq(aGuid, 0x52); SvMemoryStream aHyperBlob; ImplCreateHyperBlob( aHyperBlob ); uno::Sequence aHyperSeq(aHyperBlob.Tell()); const sal_uInt8* pBlob( static_cast(aHyperBlob.GetData())); for (sal_Int32 j = 0; j < aHyperSeq.getLength(); ++j) { aHyperSeq[j] = pBlob[j]; } if ( mnCnvrtFlags & 0x8000 ) { uno::Sequence aThumbSeq; if ( GetPageByIndex( 0, NORMAL ) && ImplGetPropertyValue( mXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "PreviewBitmap" ) ) ) ) { aThumbSeq = *static_cast*>(mAny.getValue()); } sfx2::SaveOlePropertySet( xDocProps, mrStg, &aThumbSeq, &aGuidSeq, &aHyperSeq); } else { sfx2::SaveOlePropertySet( xDocProps, mrStg, NULL, &aGuidSeq, &aHyperSeq ); } } return sal_True; } // --------------------------------------------------------------------------------------------- void PPTWriter::ImplWriteExtParaHeader( SvMemoryStream& rSt, sal_uInt32 nRef, sal_uInt32 nInstance, sal_uInt32 nSlideId ) { if ( rSt.Tell() ) { aBuExOutlineStream << (sal_uInt32)( ( EPP_PST_ExtendedParagraphHeaderAtom << 16 ) | ( nRef << 4 ) ) << (sal_uInt32)8 << (sal_uInt32)nSlideId << (sal_uInt32)nInstance; aBuExOutlineStream.Write( rSt.GetData(), rSt.Tell() ); } } // --------------------------------------------------------------------------------------------- void PPTWriter::ImplCreateHeaderFooterStrings( SvStream& rStrm, ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >& rXPagePropSet ) { if ( rXPagePropSet.is() ) { rtl::OUString aString; ::com::sun::star::uno::Any aAny; if ( PropValue::GetPropertyValue( aAny, rXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "HeaderText" ) ), sal_True ) ) { if ( aAny >>= aString ) PPTWriter::WriteCString( rStrm, aString, 1 ); } if ( PropValue::GetPropertyValue( aAny, rXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "FooterText" ) ), sal_True ) ) { if ( aAny >>= aString ) PPTWriter::WriteCString( rStrm, aString, 2 ); } if ( PropValue::GetPropertyValue( aAny, rXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "DateTimeText" ) ), sal_True ) ) { if ( aAny >>= aString ) PPTWriter::WriteCString( rStrm, aString, 0 ); } } } // --------------------------------------------------------------------------------------------- void PPTWriter::ImplCreateHeaderFooters( ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >& rXPagePropSet ) { if ( rXPagePropSet.is() ) { sal_Bool bVal = sal_False; sal_uInt32 nVal = 0; ::com::sun::star::uno::Any aAny; if ( PropValue::GetPropertyValue( aAny, rXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "IsHeaderVisible" ) ), sal_True ) ) { if ( ( aAny >>= bVal ) && bVal ) nVal |= 0x100000; } if ( PropValue::GetPropertyValue( aAny, rXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "IsFooterVisible" ) ), sal_True ) ) { if ( ( aAny >>= bVal ) && bVal ) nVal |= 0x200000; } if ( PropValue::GetPropertyValue( aAny, rXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "IsDateTimeVisible" ) ), sal_True ) ) { if ( ( aAny >>= bVal ) && bVal ) nVal |= 0x010000; } if ( PropValue::GetPropertyValue( aAny, rXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "IsPageNumberVisible" ) ), sal_True ) ) { if ( ( aAny >>= bVal ) && bVal ) nVal |= 0x080000; } if ( PropValue::GetPropertyValue( aAny, rXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "IsDateTimeFixed" ) ), sal_True ) ) { if ( ( aAny >>= bVal ) && !bVal ) nVal |= 0x20000; else nVal |= 0x40000; } if ( PropValue::GetPropertyValue( aAny, rXPagePropSet, String( RTL_CONSTASCII_USTRINGPARAM( "DateTimeFormat" ) ), sal_True ) ) { sal_Int32 nFormat = *(sal_Int32*)aAny.getValue(); SvxDateFormat eDateFormat = (SvxDateFormat)( nFormat & 0xf ); SvxTimeFormat eTimeFormat = (SvxTimeFormat)( ( nFormat >> 4 ) & 0xf ); switch( eDateFormat ) { case SVXDATEFORMAT_F : nFormat = 1; break; case SVXDATEFORMAT_D : nFormat = 2; break; case SVXDATEFORMAT_C : nFormat = 4; break; default: case SVXDATEFORMAT_A : nFormat = 0; } switch( eTimeFormat ) { case SVXTIMEFORMAT_24_HM : nFormat = 9; break; case SVXTIMEFORMAT_12_HM : nFormat = 11; break; case SVXTIMEFORMAT_24_HMS : nFormat = 10; break; case SVXTIMEFORMAT_12_HMS : nFormat = 12; break; default: break; } nVal |= nFormat; } mpPptEscherEx->OpenContainer( EPP_HeadersFooters, 0 ); mpPptEscherEx->AddAtom( 4, EPP_HeadersFootersAtom ); *mpStrm << nVal; ImplCreateHeaderFooterStrings( *mpStrm, rXPagePropSet ); mpPptEscherEx->CloseContainer(); } } // --------------------------------------------------------------------------------------------- sal_Bool PPTWriter::ImplCreateDocument() { sal_uInt32 i; sal_uInt16 nSlideType = EPP_SLIDESIZE_TYPECUSTOM; sal_uInt32 nWidth = maDestPageSize.Width; sal_uInt32 nHeight = maDestPageSize.Height; if ( ( nWidth == 0x1680 ) && ( nHeight == 0x10e0 ) ) nSlideType = EPP_SLIDESIZE_TYPEONSCREEN; else if ( ( nWidth == 0x1200 ) && ( nHeight == 0x240 ) ) nSlideType = EPP_SLIDESIZE_TYPEBANNER; else if ( ( nWidth == 0x1950 ) && ( nHeight == 0x10e0 ) ) nSlideType = EPP_SLIDESIZE_TYPE35MM; else if ( ( nWidth == 0x1860 ) && ( nHeight == 0x10e0 ) ) nSlideType = EPP_SLIDESIZE_TYPEA4PAPER; mpPptEscherEx->OpenContainer( EPP_Document ); // CREATE DOCUMENT ATOM mpPptEscherEx->AddAtom( 40, EPP_DocumentAtom, 1 ); *mpStrm << nWidth // Slide Size in Master coordinates X << nHeight // " " " " " Y << (sal_Int32)maNotesPageSize.Width // Notes Page Size X << (sal_Int32)maNotesPageSize.Height // " " " Y << (sal_Int32)1 << (sal_Int32)2; // the scale used when the Powerpoint document is embedded. the default is 1:2 mpPptEscherEx->InsertPersistOffset( EPP_MAINNOTESMASTER_PERSIST_KEY, mpStrm->Tell() ); *mpStrm << (sal_uInt32)0 // Reference to NotesMaster ( 0 if none ); << (sal_uInt32)0 // Reference to HandoutMaster ( 0 if none ); << (sal_Int16)1 // Number of the first slide; << nSlideType // Size of the document slides ( default: EPP_SLIDESIZETYPEONSCREEN ) << (sal_uInt8)0 // bool1 indicates if document was saved with embedded true type fonts << (sal_uInt8)0 // bool1 indicates if the placeholders on the title slide are omitted << (sal_uInt8)0 // bool1 right to left ( flag for Bidi version ) << (sal_uInt8)1; // bool1 visibility of comments shapes mpPptEscherEx->PtInsert( EPP_Persist_Document, mpStrm->Tell() ); mpPptEscherEx->OpenContainer( EPP_HeadersFooters, 3 ); //Master footer (default) mpPptEscherEx->AddAtom( 4, EPP_HeadersFootersAtom ); *mpStrm << (sal_uInt32)0x25000d; if ( GetPageByIndex( 0, MASTER ) ) ImplCreateHeaderFooterStrings( *mpStrm, mXPagePropSet ); mpPptEscherEx->CloseContainer(); mpPptEscherEx->OpenContainer( EPP_HeadersFooters, 4 ); //NotesMaster footer (default) mpPptEscherEx->AddAtom( 4, EPP_HeadersFootersAtom ); *mpStrm << (sal_uInt32)0x3d000d; if ( GetPageByIndex( 0, NOTICE ) ) ImplCreateHeaderFooterStrings( *mpStrm, mXPagePropSet ); mpPptEscherEx->CloseContainer(); mpPptEscherEx->OpenContainer( EPP_SlideListWithText ); // Animation info fuer die Slides for ( i = 0; i < mnPages; i++ ) { mpPptEscherEx->AddAtom( 20, EPP_SlidePersistAtom ); mpPptEscherEx->InsertPersistOffset( EPP_MAINSLIDE_PERSIST_KEY | i, mpStrm->Tell() ); *mpStrm << (sal_uInt32)0 // psrReference - logical reference to the slide persist object ( EPP_MAINSLIDE_PERSIST_KEY ) << (sal_uInt32)4 // flags - only bit 3 used, if set then slide contains shapes other than placeholders << (sal_Int32)0 // numberTexts - number of placeholder texts stored with the persist object. Allows to display outline view without loading the slide persist objects << (sal_Int32)i + 0x100 // slideId - Unique slide identifier, used for OLE link monikers for example << (sal_uInt32)0; // reserved, usualy 0 if ( !GetPageByIndex( i, NORMAL ) ) // sehr aufregend: noch einmal ueber alle seiten return sal_False; SetCurrentStyleSheet( GetMasterIndex( NORMAL ) ); ::com::sun::star::uno::Reference< ::com::sun::star::container::XNamed > aXName( mXDrawPage, ::com::sun::star::uno::UNO_QUERY ); if ( aXName.is() ) { ::rtl::OUString aStr = aXName->getName(); ::rtl::OUString *pUStr = new ::rtl::OUString( aStr ); maSlideNameList.Insert( pUStr, LIST_APPEND ); } else maSlideNameList.Insert( new ::rtl::OUString(), LIST_APPEND ); } mpPptEscherEx->CloseContainer(); // EPP_SlideListWithText mpPptEscherEx->OpenContainer( EPP_SlideListWithText, 2 ); // Animation info fuer die notes for( i = 0; i < mnPages; i++ ) { mpPptEscherEx->AddAtom( 20, EPP_SlidePersistAtom ); mpPptEscherEx->InsertPersistOffset( EPP_MAINNOTES_PERSIST_KEY | i, mpStrm->Tell() ); *mpStrm << (sal_uInt32)0 << (sal_uInt32)4 << (sal_Int32)0 << (sal_Int32)i + 0x100 << (sal_uInt32)0; } mpPptEscherEx->CloseContainer(); // EPP_SlideListWithText ::com::sun::star::uno::Reference< ::com::sun::star::presentation::XPresentationSupplier > aXPresSupplier( mXModel, ::com::sun::star::uno::UNO_QUERY ); ; if ( aXPresSupplier.is() ) { ::com::sun::star::uno::Reference< ::com::sun::star::presentation::XPresentation > aXPresentation( aXPresSupplier->getPresentation() ); if ( aXPresentation.is() ) { mXPropSet = ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > ( aXPresentation, ::com::sun::star::uno::UNO_QUERY ); if ( mXPropSet.is() ) { ::rtl::OUString aCustomShow; sal_uInt32 nPenColor = 0x1000000; sal_Int32 nRestartTime = 0x7fffffff; sal_Int16 nStartSlide = 0; sal_Int16 nEndSlide = 0; sal_uInt32 nFlags = 0; // Bit 0: Auto advance // Bit 1 Skip builds ( do not allow slide effects ) // Bit 2 Use slide range // Bit 3 Use named show // Bit 4 Browse mode on // Bit 5 Kiosk mode on // Bit 7 loop continously // Bit ? show scrollbar if ( ImplGetPropertyValue( String( RTL_CONSTASCII_USTRINGPARAM( "CustomShow" ) ) ) ) { aCustomShow = ( *(::rtl::OUString*)mAny.getValue() ); if ( aCustomShow.getLength() ) { nFlags |= 8; } } if ( ( nFlags & 8 ) == 0 ) { if ( ImplGetPropertyValue( String( RTL_CONSTASCII_USTRINGPARAM( "FirstPage" ) ) ) ) { ::rtl::OUString aSlideName( *(::rtl::OUString*)mAny.getValue() ); ::rtl::OUString* pStr; for ( pStr = (::rtl::OUString*)maSlideNameList.First(); pStr; pStr = (::rtl::OUString*)maSlideNameList.Next(), nStartSlide++ ) { if ( *pStr == aSlideName ) { nStartSlide++; nFlags |= 4; nEndSlide = (sal_uInt16)mnPages; break; } } if ( !pStr ) nStartSlide = 0; } } if ( ImplGetPropertyValue( String( RTL_CONSTASCII_USTRINGPARAM( "IsAutomatic" ) ) ) ) { sal_Bool bBool = sal_False; mAny >>= bBool; if ( !bBool ) nFlags |= 1; } if ( ImplGetPropertyValue( String( RTL_CONSTASCII_USTRINGPARAM( "IsEndless" ) ) ) ) // muesste eigendlich heissen IsNotEndless !=)"�()& { sal_Bool bBool = sal_False; mAny >>= bBool; if ( bBool ) nFlags |= 0x80; } if ( ImplGetPropertyValue( String( RTL_CONSTASCII_USTRINGPARAM( "IsFullScreen" ) ) ) ) { sal_Bool bBool = sal_False; mAny >>= bBool; if ( !bBool ) nFlags |= 0x11; } mpPptEscherEx->AddAtom( 80, EPP_SSDocInfoAtom, 1 ); *mpStrm << nPenColor << nRestartTime << nStartSlide << nEndSlide; sal_uInt32 nCustomShowNameLen = aCustomShow.getLength(); if ( nCustomShowNameLen > 31 ) nCustomShowNameLen = 31; if ( nCustomShowNameLen ) // named show identifier { const sal_Unicode* pCustomShow = aCustomShow.getStr(); for ( i = 0; i < nCustomShowNameLen; i++ ) { *mpStrm << (sal_uInt16)( pCustomShow[ i ] ); } } for ( i = nCustomShowNameLen; i < 32; i++, *mpStrm << (sal_uInt16)0 ) ; *mpStrm << nFlags; ::com::sun::star::uno::Reference< ::com::sun::star::presentation::XCustomPresentationSupplier > aXCPSup( mXModel, ::com::sun::star::uno::UNO_QUERY ); if ( aXCPSup.is() ) { ::com::sun::star::uno::Reference< ::com::sun::star::container::XNameContainer > aXCont( aXCPSup->getCustomPresentations() ); if ( aXCont.is() ) { ::com::sun::star::uno::Sequence< ::rtl::OUString> aNameSeq( aXCont->getElementNames() ); const ::rtl::OUString* pUString = aNameSeq.getArray(); sal_uInt32 nCount = aNameSeq.getLength(); if ( nCount ) { mpPptEscherEx->OpenContainer( EPP_NamedShows ); sal_uInt32 nCustomShowIndex = 0; for( i = 0; i < nCount; i++ ) // Anzahl der Custom Shows { if ( pUString[ i ].getLength() ) { mpPptEscherEx->OpenContainer( EPP_NamedShow, nCustomShowIndex++ ); sal_uInt32 nNamedShowLen = pUString[ i ].getLength(); if ( nNamedShowLen > 31 ) nNamedShowLen = 31; mpPptEscherEx->AddAtom( nNamedShowLen << 1, EPP_CString ); const sal_Unicode* pCustomShowName = pUString[ i ].getStr(); for ( sal_uInt32 k = 0; k < nNamedShowLen; *mpStrm << (sal_uInt16)( pCustomShowName[ k++ ] ) ) ; mAny = aXCont->getByName( pUString[ i ] ); if ( mAny.getValue() ) { ::com::sun::star::uno::Reference< ::com::sun::star::container::XIndexContainer > aXIC; if ( mAny >>= aXIC ) { mpPptEscherEx->BeginAtom(); sal_Int32 nSlideCount = aXIC->getCount(); for ( sal_Int32 j = 0; j < nSlideCount; j++ ) // Anzahl der Slides { mAny = aXIC->getByIndex( j ); if ( mAny.getValue() ) { ::com::sun::star::uno::Reference< ::com::sun::star::drawing::XDrawPage > aXDrawPage; if ( mAny >>= aXDrawPage ) { ::com::sun::star::uno::Reference< ::com::sun::star::container::XNamed > aXName( aXDrawPage, ::com::sun::star::uno::UNO_QUERY ); if ( aXName.is() ) { ::rtl::OUString aSlideName( aXName->getName() ); sal_uInt32 nPageNumber = 0; for ( ::rtl::OUString* pSlideName = (::rtl::OUString*)maSlideNameList.First(); pSlideName; pSlideName = (::rtl::OUString*)maSlideNameList.Next(), nPageNumber++ ) { if ( *pSlideName == aSlideName ) { *mpStrm << (sal_uInt32)( nPageNumber + 0x100 ); // unique slide id break; } } } } } } mpPptEscherEx->EndAtom( EPP_NamedShowSlides ); } } mpPptEscherEx->CloseContainer(); // EPP_NamedShow } } mpPptEscherEx->CloseContainer(); // EPP_NamedShows } } } } } } mpPptEscherEx->AddAtom( 0, EPP_EndDocument ); mpPptEscherEx->CloseContainer(); // EPP_Document return sal_True; }; // --------------------------------------------------------------------------------------------- sal_Bool PPTWriter::ImplCreateHyperBlob( SvMemoryStream& rStrm ) { sal_uInt32 nCurrentOfs, nParaOfs, nParaCount = 0; nParaOfs = rStrm.Tell(); rStrm << (sal_uInt32)0; // property size rStrm << (sal_uInt32)0; // property count for ( EPPTHyperlink* pLink = (EPPTHyperlink*)maHyperlink.First(); pLink; pLink = (EPPTHyperlink*)maHyperlink.Next() ) { nParaCount += 6; rStrm << (sal_uInt32)3 // Type VT_I4 << (sal_uInt32)7 // (VTI4 - Private1) << (sal_uInt32)3 // Type VT_I4 << (sal_uInt32)6 // (VTI4 - Private2) << (sal_uInt32)3 // Type VT_I4 << (sal_uInt32)0; // (VTI4 - Private3) // INFO // HIWORD: = 0 : do not change anything // = 1 : replace the hyperlink with the target and subadress in the following two VTLPWSTR // = 2 : delete the hyperlink // LOWORD: = 0 : graphic shown as background (link) // = 1 : graphic shown as shape (link) // = 2 : graphic is used to fill a shape // = 3 : graphic used to fill a shape outline (future use) // = 4 : hyperlink attached to a shape // = 5 : " " " " (Word) field // = 6 : " " " " (Excel) range // = 7 : " " " " (PPT) text range // = 8 : " " " " (Project) task sal_uInt32 nUrlLen = pLink->aURL.Len(); const sal_Unicode* pUrl = pLink->aURL.GetBuffer(); sal_uInt32 nInfo = 7; rStrm << (sal_uInt32)3 // Type VT_I4 << nInfo; // Info switch( pLink->nType & 0xff ) { case 1 : // click action to slidenumber { rStrm << (sal_uInt32)0x1f << (sal_uInt32)1 << (sal_uInt32)0; // path rStrm << (sal_uInt32)0x1f << (sal_uInt32)( nUrlLen + 1 ); for ( sal_uInt32 i = 0; i < nUrlLen; i++ ) { rStrm << pUrl[ i ]; } rStrm << (sal_uInt16)0; } break; case 2 : { sal_uInt32 i; rStrm << (sal_uInt32)0x1f << (sal_uInt32)( nUrlLen + 1 ); for ( i = 0; i < nUrlLen; i++ ) { rStrm << pUrl[ i ]; } if ( ! ( i & 1 ) ) rStrm << (sal_uInt16)0; rStrm << (sal_uInt16)0 << (sal_uInt32)0x1f << (sal_uInt32)1 << (sal_uInt32)0; } break; } } nCurrentOfs = rStrm.Tell(); rStrm.Seek( nParaOfs ); rStrm << (sal_uInt32)( nCurrentOfs - ( nParaOfs + 4 ) ); rStrm << nParaCount; rStrm.Seek( nCurrentOfs ); return sal_True; } // --------------------------------------------------------------------------------------------- sal_Bool PPTWriter::ImplCreateMainNotes() { EscherSolverContainer aSolverContainer; mpPptEscherEx->PtReplaceOrInsert( EPP_Persist_MainNotes, mpStrm->Tell() ); mpPptEscherEx->OpenContainer( EPP_Notes ); mpPptEscherEx->AddAtom( 8, EPP_NotesAtom, 1 ); *mpStrm << (sal_uInt32)0x80000001 // Number that identifies this slide << (sal_uInt32)0; // follow nothing mpPptEscherEx->OpenContainer( EPP_PPDrawing ); mpPptEscherEx->OpenContainer( ESCHER_DgContainer ); mpPptEscherEx->EnterGroup(0,0); ImplWritePage( GetLayout( 20 ), aSolverContainer, NOTICE, sal_True ); mpPptEscherEx->LeaveGroup(); mpPptEscherEx->OpenContainer( ESCHER_SpContainer ); mpPptEscherEx->AddShape( ESCHER_ShpInst_Rectangle, 0xc00 ); EscherPropertyContainer aPropOpt; aPropOpt.AddOpt( ESCHER_Prop_fillColor, 0xffffff ); // stock valued fill color aPropOpt.AddOpt( ESCHER_Prop_fillBackColor, 0 ); aPropOpt.AddOpt( ESCHER_Prop_fillRectRight, 0x68bdde ); aPropOpt.AddOpt( ESCHER_Prop_fillRectBottom, 0x8b9f8e ); aPropOpt.AddOpt( ESCHER_Prop_fNoFillHitTest, 0x120012 ); aPropOpt.AddOpt( ESCHER_Prop_fNoLineDrawDash, 0 ); aPropOpt.AddOpt( ESCHER_Prop_bWMode, ESCHER_wDontShow ); aPropOpt.AddOpt( ESCHER_Prop_fBackground, 0x10001 ); // if true, this is the background shape aPropOpt.Commit( *mpStrm ); mpPptEscherEx->CloseContainer(); // ESCHER_SpContainer aSolverContainer.WriteSolver( *mpStrm ); mpPptEscherEx->CloseContainer(); // ESCHER_DgContainer mpPptEscherEx->CloseContainer(); // EPP_Drawing mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 1 ); *mpStrm << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x808080 << (sal_uInt32)0x000000 << (sal_uInt32)0x99cc00 << (sal_uInt32)0xcc3333 << (sal_uInt32)0xffcccc << (sal_uInt32)0xb2b2b2; mpPptEscherEx->CloseContainer(); // EPP_Notes return sal_True; } // --------------------------------------------------------------------------------------------- static rtl::OUString getInitials( const rtl::OUString& rName ) { rtl::OUString sInitials; const sal_Unicode * pStr = rName.getStr(); sal_Int32 nLength = rName.getLength(); while( nLength ) { // skip whitespace while( nLength && (*pStr <= ' ') ) { nLength--; pStr++; } // take letter if( nLength ) { sInitials += rtl::OUString( *pStr ); nLength--; pStr++; } // skip letters until whitespace while( nLength && (*pStr > ' ') ) { nLength--; pStr++; } } return sInitials; } void ImplExportComments( uno::Reference< drawing::XDrawPage > xPage, SvMemoryStream& rBinaryTagData10Atom ) { try { uno::Reference< office::XAnnotationAccess > xAnnotationAccess( xPage, uno::UNO_QUERY_THROW ); uno::Reference< office::XAnnotationEnumeration > xAnnotationEnumeration( xAnnotationAccess->createAnnotationEnumeration() ); sal_Int32 nIndex = 1; while( xAnnotationEnumeration->hasMoreElements() ) { EscherExContainer aComment10( rBinaryTagData10Atom, EPP_Comment10 ); { uno::Reference< office::XAnnotation > xAnnotation( xAnnotationEnumeration->nextElement() ); geometry::RealPoint2D aRealPoint2D( xAnnotation->getPosition() ); MapMode aMapDest( MAP_INCH, Point(), Fraction( 1, 576 ), Fraction( 1, 576 ) ); Point aPoint( OutputDevice::LogicToLogic( Point( static_cast< sal_Int32 >( aRealPoint2D.X * 100.0 ), static_cast< sal_Int32 >( aRealPoint2D.Y * 100.0 ) ), MAP_100TH_MM, aMapDest ) ); rtl::OUString sAuthor( xAnnotation->getAuthor() ); uno::Reference< text::XText > xText( xAnnotation->getTextRange() ); rtl::OUString sText( xText->getString() ); rtl::OUString sInitials( getInitials( sAuthor ) ); util::DateTime aDateTime( xAnnotation->getDateTime() ); if ( sAuthor.getLength() ) PPTWriter::WriteCString( rBinaryTagData10Atom, sAuthor, 0 ); if ( sText.getLength() ) PPTWriter::WriteCString( rBinaryTagData10Atom, sText, 1 ); if ( sInitials.getLength() ) PPTWriter::WriteCString( rBinaryTagData10Atom, sInitials, 2 ); sal_Int16 nMilliSeconds = aDateTime.HundredthSeconds * 10; EscherExAtom aCommentAtom10( rBinaryTagData10Atom, EPP_CommentAtom10 ); rBinaryTagData10Atom << nIndex++ << aDateTime.Year << aDateTime.Month << aDateTime.Day // todo: day of week << aDateTime.Day << aDateTime.Hours << aDateTime.Minutes << aDateTime.Seconds << nMilliSeconds << static_cast< sal_Int32 >( aPoint.X() ) << static_cast< sal_Int32 >( aPoint.Y() ); } } } catch ( uno::Exception& ) { } } // --------------------------------------------------------------------------------------------- void PPTWriter::ImplWriteNotes( sal_uInt32 nPageNum ) { mpPptEscherEx->PtReplaceOrInsert( EPP_Persist_Notes | nPageNum, mpStrm->Tell() ); mpPptEscherEx->OpenContainer( EPP_Notes ); mpPptEscherEx->AddAtom( 8, EPP_NotesAtom, 1 ); *mpStrm << (sal_uInt32)nPageNum + 0x100 << (sal_uInt16)3 // follow master .... << (sal_uInt16)0; ImplCreateHeaderFooters( mXPagePropSet ); EscherSolverContainer aSolverContainer; mpPptEscherEx->OpenContainer( EPP_PPDrawing ); mpPptEscherEx->OpenContainer( ESCHER_DgContainer ); mpPptEscherEx->EnterGroup(0,0); ImplWritePage( GetLayout( 20 ), aSolverContainer, NOTICE, sal_False ); // Die Shapes der Seite werden im PPT Dok. erzeugt mpPptEscherEx->LeaveGroup(); mpPptEscherEx->OpenContainer( ESCHER_SpContainer ); mpPptEscherEx->AddShape( ESCHER_ShpInst_Rectangle, 0xc00 ); // Flags: Connector | Background | HasSpt EscherPropertyContainer aPropOpt; aPropOpt.AddOpt( ESCHER_Prop_fillColor, 0xffffff ); // stock valued fill color aPropOpt.AddOpt( ESCHER_Prop_fillBackColor, 0 ); aPropOpt.AddOpt( ESCHER_Prop_fillRectRight, 0x8b9f8e ); aPropOpt.AddOpt( ESCHER_Prop_fillRectBottom, 0x68bdde ); aPropOpt.AddOpt( ESCHER_Prop_fNoFillHitTest, 0x120012 ); aPropOpt.AddOpt( ESCHER_Prop_fNoLineDrawDash, 0x80000 ); aPropOpt.AddOpt( ESCHER_Prop_bWMode, ESCHER_wDontShow ); aPropOpt.AddOpt( ESCHER_Prop_fBackground, 0x10001 ); aPropOpt.Commit( *mpStrm ); mpPptEscherEx->CloseContainer(); // ESCHER_SpContainer aSolverContainer.WriteSolver( *mpStrm ); mpPptEscherEx->CloseContainer(); // ESCHER_DgContainer mpPptEscherEx->CloseContainer(); // EPP_Drawing mpPptEscherEx->AddAtom( 32, EPP_ColorSchemeAtom, 0, 1 ); *mpStrm << (sal_uInt32)0xffffff << (sal_uInt32)0x000000 << (sal_uInt32)0x808080 << (sal_uInt32)0x000000 << (sal_uInt32)0x99cc00 << (sal_uInt32)0xcc3333 << (sal_uInt32)0xffcccc << (sal_uInt32)0xb2b2b2; mpPptEscherEx->CloseContainer(); // EPP_Notes }; void PPTWriter::ImplWriteBackground( ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > & rXPropSet ) { //************************ ****** //** DEFAULT BACKGROUND SHAPE ** //****************************** sal_uInt32 nFillColor = 0xffffff; sal_uInt32 nFillBackColor = 0; mpPptEscherEx->OpenContainer( ESCHER_SpContainer ); mpPptEscherEx->AddShape( ESCHER_ShpInst_Rectangle, 0xc00 ); // Flags: Connector | Background | HasSpt Point aEmptyPoint = Point(); Rectangle aRect( aEmptyPoint, Size( 28000, 21000 ) ); EscherPropertyContainer aPropOpt( mpPptEscherEx->GetGraphicProvider(), mpPicStrm, aRect ); aPropOpt.AddOpt( ESCHER_Prop_fillType, ESCHER_FillSolid ); ::com::sun::star::drawing::FillStyle aFS( ::com::sun::star::drawing::FillStyle_NONE ); if ( ImplGetPropertyValue( rXPropSet, String( RTL_CONSTASCII_USTRINGPARAM( "FillStyle" ) ) ) ) mAny >>= aFS; switch( aFS ) { case ::com::sun::star::drawing::FillStyle_GRADIENT : { aPropOpt.CreateGradientProperties( rXPropSet ); aPropOpt.AddOpt( ESCHER_Prop_fNoFillHitTest, 0x1f001e ); aPropOpt.GetOpt( ESCHER_Prop_fillColor, nFillColor ); aPropOpt.GetOpt( ESCHER_Prop_fillBackColor, nFillBackColor ); } break; case ::com::sun::star::drawing::FillStyle_BITMAP : aPropOpt.CreateGraphicProperties( rXPropSet, String( RTL_CONSTASCII_USTRINGPARAM( "FillBitmapURL" ) ), sal_True ); break; case ::com::sun::star::drawing::FillStyle_HATCH : aPropOpt.CreateGraphicProperties( rXPropSet, String( RTL_CONSTASCII_USTRINGPARAM( "FillHatch" ) ), sal_True ); break; case ::com::sun::star::drawing::FillStyle_SOLID : { if ( ImplGetPropertyValue( rXPropSet, String( RTL_CONSTASCII_USTRINGPARAM( "FillColor" ) ) ) ) { nFillColor = mpPptEscherEx->GetColor( *((sal_uInt32*)mAny.getValue()) ); nFillBackColor = nFillColor ^ 0xffffff; } } // PASSTHROUGH INTENDED case ::com::sun::star::drawing::FillStyle_NONE : default: aPropOpt.AddOpt( ESCHER_Prop_fNoFillHitTest, 0x120012 ); break; } aPropOpt.AddOpt( ESCHER_Prop_fillColor, nFillColor ); aPropOpt.AddOpt( ESCHER_Prop_fillBackColor, nFillBackColor ); aPropOpt.AddOpt( ESCHER_Prop_fillRectRight, PPTtoEMU( maDestPageSize.Width ) ); aPropOpt.AddOpt( ESCHER_Prop_fillRectBottom, PPTtoEMU( maDestPageSize.Height ) ); aPropOpt.AddOpt( ESCHER_Prop_fNoLineDrawDash, 0x80000 ); aPropOpt.AddOpt( ESCHER_Prop_bWMode, ESCHER_bwWhite ); aPropOpt.AddOpt( ESCHER_Prop_fBackground, 0x10001 ); aPropOpt.Commit( *mpStrm ); mpPptEscherEx->CloseContainer(); // ESCHER_SpContainer } void PPTWriter::ImplWriteVBA() { if ( mpVBA ) { mpVBA->Seek( STREAM_SEEK_TO_END ); sal_uInt32 nLen = mpVBA->Tell(); if ( nLen > 8 ) { nLen -= 8; mnVBAOleOfs = mpStrm->Tell(); mpPptEscherEx->BeginAtom(); mpStrm->Write( (sal_Int8*)mpVBA->GetData() + 8, nLen ); mpPptEscherEx->EndAtom( EPP_ExOleObjStg, 0, 1 ); } } } // --------------------------------------------------------------------------------------------- void PPTWriter::ImplWriteOLE( ) { PPTExOleObjEntry* pPtr; SvxMSExportOLEObjects aOleExport( mnCnvrtFlags ); for ( pPtr = (PPTExOleObjEntry*)maExOleObj.First(); pPtr; pPtr = (PPTExOleObjEntry*)maExOleObj.Next() ) { SvMemoryStream* pStrm = NULL; pPtr->nOfsB = mpStrm->Tell(); switch ( pPtr->eType ) { case NORMAL_OLE_OBJECT : { SdrObject* pSdrObj = GetSdrObjectFromXShape( pPtr->xShape ); if ( pSdrObj && pSdrObj->ISA( SdrOle2Obj ) ) { ::uno::Reference < embed::XEmbeddedObject > xObj( ( (SdrOle2Obj*) pSdrObj )->GetObjRef() ); if( xObj.is() ) { SvStorageRef xTempStorage( new SvStorage( new SvMemoryStream(), sal_True ) ); aOleExport.ExportOLEObject( xObj, *xTempStorage ); //TODO/MBA: testing String aPersistStream( String::CreateFromAscii( RTL_CONSTASCII_STRINGPARAM( SVEXT_PERSIST_STREAM ) ) ); SvMemoryStream aStream; SvStorageRef xCleanStorage( new SvStorage( sal_False, aStream ) ); xTempStorage->CopyTo( xCleanStorage ); // create a dummy content stream, the dummy content is necessary for ppt, but not for // doc files, so we can't share code. SotStorageStreamRef xStm = xCleanStorage->OpenSotStream( aPersistStream, STREAM_STD_READWRITE ); *xStm << (sal_uInt32)0 // no ClipboardId << (sal_uInt32)4 // no target device << (sal_uInt32)1 // aspect ratio << (sal_Int32)-1 // L-Index << (sal_uInt32)0 // Advanced Flags << (sal_uInt32)0 // compression << (sal_uInt32)0 // Size << (sal_uInt32)0 // " << (sal_uInt32)0; pStrm = xCleanStorage->CreateMemoryStream(); } } } break; case OCX_CONTROL : { if ( pPtr->xControlModel.is() ) { String aName; ::com::sun::star::awt::Size aSize; SvStorageRef xDest( new SvStorage( new SvMemoryStream(), sal_True ) ); sal_Bool bOk = SvxMSConvertOCXControls::WriteOCXStream( xDest, pPtr->xControlModel, aSize, aName ); if ( bOk ) pStrm = xDest->CreateMemoryStream(); } } } if ( pStrm ) { mpPptEscherEx->BeginAtom(); pStrm->Seek( STREAM_SEEK_TO_END ); sal_uInt32 npStrmSize = pStrm->Tell(); *mpStrm << npStrmSize; // uncompressed size pStrm->Seek( 0 ); ZCodec aZCodec( 0x8000, 0x8000 ); aZCodec.BeginCompression(); aZCodec.Compress( *pStrm, *mpStrm ); aZCodec.EndCompression(); delete pStrm; mpPptEscherEx->EndAtom( EPP_ExOleObjStg, 0, 1 ); } } } // --------------------------------------------------------------------------------------------- // PersistantTable und UserEditAtom schreiben sal_Bool PPTWriter::ImplWriteAtomEnding() { #define EPP_LastViewTypeNone 0 #define EPP_LastViewTypeSlideView 1 #define EPP_LastViewTypeOutlineView 2 #define EPP_LastViewTypeNotes 3 sal_uInt32 i, nPos, nOfs, nPersistOfs = mpStrm->Tell(); sal_uInt32 nPersistEntrys = 0; *mpStrm << (sal_uInt32)0 << (sal_uInt32)0 << (sal_uInt32)0; // Record Header und ersten Eintrag ueberspringen // Document pesist schreiben nPersistEntrys++; *mpStrm << (sal_uInt32)0; // MasterPages persists schreiben for ( i = 0; i < mnMasterPages; i++ ) { nOfs = mpPptEscherEx->PtGetOffsetByID( EPP_Persist_MainMaster | i ); if ( nOfs ) { *mpStrm << nOfs; mpPptEscherEx->InsertAtPersistOffset( EPP_MAINMASTER_PERSIST_KEY | i, ++nPersistEntrys ); } } // MainNotesMaster persist schreiben nOfs = mpPptEscherEx->PtGetOffsetByID( EPP_Persist_MainNotes ); if ( nOfs ) { *mpStrm << nOfs; mpPptEscherEx->InsertAtPersistOffset( EPP_MAINNOTESMASTER_PERSIST_KEY, ++nPersistEntrys ); } // Slide persists schreiben -> es gilt hier auch den EPP_SlidePersistAtome mit einem gueltigen wert zu beschreiben for ( i = 0; i < mnPages; i++ ) { nOfs = mpPptEscherEx->PtGetOffsetByID( EPP_Persist_Slide | i ); if ( nOfs ) { *mpStrm << nOfs; mpPptEscherEx->InsertAtPersistOffset( EPP_MAINSLIDE_PERSIST_KEY | i, ++nPersistEntrys ); } } // Notes persists schreiben for ( i = 0; i < mnPages; i++ ) { nOfs = mpPptEscherEx->PtGetOffsetByID( EPP_Persist_Notes | i ); if ( nOfs ) { *mpStrm << nOfs; mpPptEscherEx->InsertAtPersistOffset( EPP_MAINNOTES_PERSIST_KEY | i, ++nPersistEntrys ); } } // Ole persists PPTExOleObjEntry* pPtr; for ( pPtr = (PPTExOleObjEntry*)maExOleObj.First(); pPtr; pPtr = (PPTExOleObjEntry*)maExOleObj.Next() ) { nOfs = mpPptEscherEx->PtGetOffsetByID( EPP_Persist_ExObj ); if ( nOfs ) { nPersistEntrys++; *mpStrm << pPtr->nOfsB; sal_uInt32 nOldPos, nPersOfs = nOfs + pPtr->nOfsA + 16 + 8; // 8 bytes atom header, +16 to the persist entry nOldPos = mpStrm->Tell(); mpStrm->Seek( nPersOfs ); *mpStrm << nPersistEntrys; mpStrm->Seek( nOldPos ); } } // VB persist if ( mnVBAOleOfs && mpVBA ) { nOfs = mpPptEscherEx->PtGetOffsetByID( EPP_Persist_VBAInfoAtom ); if ( nOfs ) { nPersistEntrys++; sal_uInt32 n1, n2; mpVBA->Seek( 0 ); *mpVBA >> n1 >> n2; *mpStrm << mnVBAOleOfs; sal_uInt32 nOldPos = mpStrm->Tell(); mpStrm->Seek( nOfs ); // Fill the VBAInfoAtom with the correct index to the persisttable *mpStrm << nPersistEntrys << n1 << 2; mpStrm->Seek( nOldPos ); } } nPos = mpStrm->Tell(); mpStrm->Seek( nPersistOfs ); mpPptEscherEx->AddAtom( ( nPersistEntrys + 1 ) << 2, EPP_PersistPtrIncrementalBlock ); // Record Header eintragen *mpStrm << (sal_uInt32)( ( nPersistEntrys << 20 ) | 1 ); mpStrm->Seek( nPos ); *mpCurUserStrm << (sal_uInt32)nPos; // offset to current edit setzen mpPptEscherEx->AddAtom( 28, EPP_UserEditAtom ); *mpStrm << (sal_Int32)0x100 // last slide ID << (sal_uInt32)0x03000dbc // minor and major app version that did the save << (sal_uInt32)0 // offset last save, 0 after a full save << nPersistOfs // File offset to persist pointers for this save operation << (sal_uInt32)1 // Persist reference to the document persist object << (sal_uInt32)nPersistEntrys // max persists written, Seed value for persist object id management << (sal_Int16)EPP_LastViewTypeSlideView // last view type << (sal_Int16)0x12; // padword return sal_True; } // --------------------- // - exported function - // --------------------- extern "C" SAL_DLLPUBLIC_EXPORT sal_Bool __LOADONCALLAPI ExportPPT( SvStorageRef& rSvStorage, ::com::sun::star::uno::Reference< ::com::sun::star::frame::XModel > & rXModel, ::com::sun::star::uno::Reference< ::com::sun::star::task::XStatusIndicator > & rXStatInd, SvMemoryStream* pVBA, sal_uInt32 nCnvrtFlags ) { PPTWriter* pPPTWriter; sal_Bool bStatus = sal_False; pPPTWriter = new PPTWriter( rSvStorage, rXModel, rXStatInd, pVBA, nCnvrtFlags ); if ( pPPTWriter ) { pPPTWriter->exportPPT(); bStatus = ( pPPTWriter->IsValid() == sal_True ); delete pPPTWriter; } return bStatus; } extern "C" SAL_DLLPUBLIC_EXPORT sal_Bool __LOADONCALLAPI SaveVBA( SfxObjectShell& rDocShell, SvMemoryStream*& pBas ) { SvStorageRef xDest( new SvStorage( new SvMemoryStream(), sal_True ) ); SvxImportMSVBasic aMSVBas( rDocShell, *xDest, sal_False, sal_False ); aMSVBas.SaveOrDelMSVBAStorage( sal_True, String( RTL_CONSTASCII_USTRINGPARAM("_MS_VBA_Overhead") ) ); SvStorageRef xOverhead = xDest->OpenSotStorage( String( RTL_CONSTASCII_USTRINGPARAM("_MS_VBA_Overhead") ) ); if ( xOverhead.Is() && ( xOverhead->GetError() == SVSTREAM_OK ) ) { SvStorageRef xOverhead2 = xOverhead->OpenSotStorage( String( RTL_CONSTASCII_USTRINGPARAM("_MS_VBA_Overhead") ) ); if ( xOverhead2.Is() && ( xOverhead2->GetError() == SVSTREAM_OK ) ) { SvStorageStreamRef xTemp = xOverhead2->OpenSotStream( String( RTL_CONSTASCII_USTRINGPARAM("_MS_VBA_Overhead2") ) ); if ( xTemp.Is() && ( xTemp->GetError() == SVSTREAM_OK ) ) { sal_uInt32 nLen = xTemp->GetSize(); if ( nLen ) { char* pTemp = new char[ nLen ]; if ( pTemp ) { xTemp->Seek( STREAM_SEEK_TO_BEGIN ); xTemp->Read( pTemp, nLen ); pBas = new SvMemoryStream( pTemp, nLen, STREAM_READ ); pBas->ObjectOwnsMemory( sal_True ); return sal_True; } } } } } return sal_False; } /* vim:set shiftwidth=4 softtabstop=4 expandtab: */