1*f78e906fSAndrew Rist /************************************************************** 2cdf0e10cSrcweir * 3*f78e906fSAndrew Rist * Licensed to the Apache Software Foundation (ASF) under one 4*f78e906fSAndrew Rist * or more contributor license agreements. See the NOTICE file 5*f78e906fSAndrew Rist * distributed with this work for additional information 6*f78e906fSAndrew Rist * regarding copyright ownership. The ASF licenses this file 7*f78e906fSAndrew Rist * to you under the Apache License, Version 2.0 (the 8*f78e906fSAndrew Rist * "License"); you may not use this file except in compliance 9*f78e906fSAndrew Rist * with the License. You may obtain a copy of the License at 10*f78e906fSAndrew Rist * 11*f78e906fSAndrew Rist * http://www.apache.org/licenses/LICENSE-2.0 12*f78e906fSAndrew Rist * 13*f78e906fSAndrew Rist * Unless required by applicable law or agreed to in writing, 14*f78e906fSAndrew Rist * software distributed under the License is distributed on an 15*f78e906fSAndrew Rist * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16*f78e906fSAndrew Rist * KIND, either express or implied. See the License for the 17*f78e906fSAndrew Rist * specific language governing permissions and limitations 18*f78e906fSAndrew Rist * under the License. 19*f78e906fSAndrew Rist * 20*f78e906fSAndrew Rist *************************************************************/ 21*f78e906fSAndrew Rist 22*f78e906fSAndrew Rist 23cdf0e10cSrcweir #if defined(_MSC_VER) && (_MSC_VER > 1310) 24cdf0e10cSrcweir #pragma warning(disable : 4917 4555) 25cdf0e10cSrcweir #endif 26cdf0e10cSrcweir 27cdf0e10cSrcweir #include "embeddoc.hxx" 28cdf0e10cSrcweir #include <com/sun/star/uno/Any.h> 29cdf0e10cSrcweir #include <com/sun/star/uno/Exception.hpp> 30cdf0e10cSrcweir #include <com/sun/star/lang/XMultiServiceFactory.hpp> 31cdf0e10cSrcweir #include <com/sun/star/lang/XComponent.hpp> 32cdf0e10cSrcweir #include <com/sun/star/io/XInputStream.hpp> 33cdf0e10cSrcweir #include <com/sun/star/io/XOutputStream.hpp> 34cdf0e10cSrcweir #include <com/sun/star/io/XSeekable.hpp> 35cdf0e10cSrcweir #include <com/sun/star/frame/XModel.hpp> 36cdf0e10cSrcweir #include <com/sun/star/frame/XLoadable.hpp> 37cdf0e10cSrcweir #include <com/sun/star/util/XModifiable.hpp> 38cdf0e10cSrcweir #include <com/sun/star/frame/XStorable.hpp> 39cdf0e10cSrcweir #include <com/sun/star/frame/XComponentLoader.hpp> 40cdf0e10cSrcweir #include <com/sun/star/util/XUrlTransformer.hpp> 41cdf0e10cSrcweir 42cdf0e10cSrcweir 43cdf0e10cSrcweir #include <osl/mutex.hxx> 44cdf0e10cSrcweir #include <osl/diagnose.h> 45cdf0e10cSrcweir 46cdf0e10cSrcweir #include <string.h> 47cdf0e10cSrcweir 48cdf0e10cSrcweir #define EXT_STREAM_LENGTH 16 49cdf0e10cSrcweir 50cdf0e10cSrcweir using namespace ::com::sun::star; 51cdf0e10cSrcweir 52cdf0e10cSrcweir extern ::rtl::OUString getStorageTypeFromGUID_Impl( GUID* guid ); 53cdf0e10cSrcweir extern ::rtl::OUString getServiceNameFromGUID_Impl( GUID* ); 54cdf0e10cSrcweir extern ::rtl::OUString getFilterNameFromGUID_Impl( GUID* ); 55cdf0e10cSrcweir // extern CLIPFORMAT getClipFormatFromGUID_Impl( GUID* ); 56cdf0e10cSrcweir ::rtl::OUString getTestFileURLFromGUID_Impl( GUID* guid ); 57cdf0e10cSrcweir 58cdf0e10cSrcweir const ::rtl::OUString aOfficeEmbedStreamName( RTL_CONSTASCII_USTRINGPARAM ( "package_stream" ) ); 59cdf0e10cSrcweir const ::rtl::OUString aExtentStreamName( RTL_CONSTASCII_USTRINGPARAM ( "properties_stream" ) ); 60cdf0e10cSrcweir 61cdf0e10cSrcweir uno::Reference< io::XInputStream > createTempXInStreamFromIStream( 62cdf0e10cSrcweir uno::Reference< lang::XMultiServiceFactory > xFactory, 63cdf0e10cSrcweir IStream *pStream ) 64cdf0e10cSrcweir { 65cdf0e10cSrcweir uno::Reference< io::XInputStream > xResult; 66cdf0e10cSrcweir 67cdf0e10cSrcweir if ( !pStream ) 68cdf0e10cSrcweir return xResult; 69cdf0e10cSrcweir 70cdf0e10cSrcweir const ::rtl::OUString aServiceName ( RTL_CONSTASCII_USTRINGPARAM ( "com.sun.star.io.TempFile" ) ); 71cdf0e10cSrcweir uno::Reference < io::XOutputStream > xTempOut = uno::Reference < io::XOutputStream > ( 72cdf0e10cSrcweir xFactory->createInstance ( aServiceName ), 73cdf0e10cSrcweir uno::UNO_QUERY ); 74cdf0e10cSrcweir if ( xTempOut.is() ) 75cdf0e10cSrcweir { 76cdf0e10cSrcweir ULARGE_INTEGER nNewPos; 77cdf0e10cSrcweir LARGE_INTEGER aZero = { 0L, 0L }; 78cdf0e10cSrcweir HRESULT hr = pStream->Seek( aZero, STREAM_SEEK_SET, &nNewPos ); 79cdf0e10cSrcweir if ( FAILED( hr ) ) return xResult; 80cdf0e10cSrcweir 81cdf0e10cSrcweir STATSTG aStat; 82cdf0e10cSrcweir hr = pStream->Stat( &aStat, STATFLAG_NONAME ); 83cdf0e10cSrcweir if ( FAILED( hr ) ) return xResult; 84cdf0e10cSrcweir 85cdf0e10cSrcweir sal_uInt32 nSize = (sal_uInt32)aStat.cbSize.QuadPart; 86cdf0e10cSrcweir sal_uInt32 nCopied = 0; 87cdf0e10cSrcweir uno::Sequence< sal_Int8 > aBuffer( nConstBufferSize ); 88cdf0e10cSrcweir try 89cdf0e10cSrcweir { 90cdf0e10cSrcweir sal_uInt32 nRead = 0; 91cdf0e10cSrcweir do 92cdf0e10cSrcweir { 93cdf0e10cSrcweir pStream->Read( (void*)aBuffer.getArray(), nConstBufferSize, &nRead ); 94cdf0e10cSrcweir 95cdf0e10cSrcweir if ( nRead < nConstBufferSize ) 96cdf0e10cSrcweir aBuffer.realloc( nRead ); 97cdf0e10cSrcweir 98cdf0e10cSrcweir xTempOut->writeBytes( aBuffer ); 99cdf0e10cSrcweir nCopied += nRead; 100cdf0e10cSrcweir } while( nRead == nConstBufferSize ); 101cdf0e10cSrcweir 102cdf0e10cSrcweir if ( nCopied == nSize ) 103cdf0e10cSrcweir { 104cdf0e10cSrcweir uno::Reference < io::XSeekable > xTempSeek ( xTempOut, uno::UNO_QUERY ); 105cdf0e10cSrcweir if ( xTempSeek.is() ) 106cdf0e10cSrcweir { 107cdf0e10cSrcweir xTempSeek->seek ( 0 ); 108cdf0e10cSrcweir xResult = uno::Reference< io::XInputStream >( xTempOut, uno::UNO_QUERY ); 109cdf0e10cSrcweir } 110cdf0e10cSrcweir } 111cdf0e10cSrcweir } 112cdf0e10cSrcweir catch( uno::Exception& ) 113cdf0e10cSrcweir { 114cdf0e10cSrcweir } 115cdf0e10cSrcweir } 116cdf0e10cSrcweir 117cdf0e10cSrcweir return xResult; 118cdf0e10cSrcweir } 119cdf0e10cSrcweir 120cdf0e10cSrcweir HRESULT copyXTempOutToIStream( uno::Reference< io::XOutputStream > xTempOut, IStream* pStream ) 121cdf0e10cSrcweir { 122cdf0e10cSrcweir if ( !xTempOut.is() || !pStream ) 123cdf0e10cSrcweir return E_FAIL; 124cdf0e10cSrcweir 125cdf0e10cSrcweir uno::Reference < io::XSeekable > xTempSeek ( xTempOut, uno::UNO_QUERY ); 126cdf0e10cSrcweir if ( !xTempSeek.is() ) 127cdf0e10cSrcweir return E_FAIL; 128cdf0e10cSrcweir 129cdf0e10cSrcweir xTempSeek->seek ( 0 ); 130cdf0e10cSrcweir 131cdf0e10cSrcweir uno::Reference< io::XInputStream > xTempIn ( xTempOut, uno::UNO_QUERY ); 132cdf0e10cSrcweir if ( !xTempSeek.is() ) 133cdf0e10cSrcweir return E_FAIL; 134cdf0e10cSrcweir 135cdf0e10cSrcweir // Seek to zero and truncate the stream 136cdf0e10cSrcweir ULARGE_INTEGER nNewPos; 137cdf0e10cSrcweir LARGE_INTEGER aZero = { 0L, 0L }; 138cdf0e10cSrcweir HRESULT hr = pStream->Seek( aZero, STREAM_SEEK_SET, &nNewPos ); 139cdf0e10cSrcweir if ( FAILED( hr ) ) return E_FAIL; 140cdf0e10cSrcweir ULARGE_INTEGER aUZero = { 0L, 0L }; 141cdf0e10cSrcweir hr = pStream->SetSize( aUZero ); 142cdf0e10cSrcweir if ( FAILED( hr ) ) return E_FAIL; 143cdf0e10cSrcweir 144cdf0e10cSrcweir uno::Sequence< sal_Int8 > aBuffer( nConstBufferSize ); 145cdf0e10cSrcweir sal_uInt32 nReadBytes = 0; 146cdf0e10cSrcweir 147cdf0e10cSrcweir do 148cdf0e10cSrcweir { 149cdf0e10cSrcweir try { 150cdf0e10cSrcweir nReadBytes = xTempIn->readBytes( aBuffer, nConstBufferSize ); 151cdf0e10cSrcweir } 152cdf0e10cSrcweir catch( uno::Exception& ) 153cdf0e10cSrcweir { 154cdf0e10cSrcweir return E_FAIL; 155cdf0e10cSrcweir } 156cdf0e10cSrcweir 157cdf0e10cSrcweir sal_uInt32 nWritten = 0; 158cdf0e10cSrcweir HRESULT hr = pStream->Write( (void*)aBuffer.getArray(), nReadBytes, &nWritten ); 159cdf0e10cSrcweir if ( !SUCCEEDED( hr ) || nWritten != nReadBytes ) 160cdf0e10cSrcweir return E_FAIL; 161cdf0e10cSrcweir 162cdf0e10cSrcweir } while( nReadBytes == nConstBufferSize ); 163cdf0e10cSrcweir 164cdf0e10cSrcweir return S_OK; 165cdf0e10cSrcweir } 166cdf0e10cSrcweir 167cdf0e10cSrcweir 168cdf0e10cSrcweir //=============================================================================== 169cdf0e10cSrcweir // EmbedDocument_Impl 170cdf0e10cSrcweir //=============================================================================== 171cdf0e10cSrcweir 172cdf0e10cSrcweir EmbedDocument_Impl::EmbedDocument_Impl( const uno::Reference< lang::XMultiServiceFactory >& xFactory, const GUID* guid ) 173cdf0e10cSrcweir : m_refCount( 0L ) 174cdf0e10cSrcweir , m_xFactory( xFactory ) 175cdf0e10cSrcweir , m_guid( *guid ) 176cdf0e10cSrcweir , m_bIsDirty( sal_False ) 177cdf0e10cSrcweir , m_nAdviseNum( 0 ) 178cdf0e10cSrcweir , m_bIsInVerbHandling( sal_False ) 179cdf0e10cSrcweir //, m_bLoadedFromFile( sal_False ) 180cdf0e10cSrcweir { 181cdf0e10cSrcweir m_xOwnAccess = new EmbeddedDocumentInstanceAccess_Impl( this ); 182cdf0e10cSrcweir m_pDocHolder = new DocumentHolder( xFactory, m_xOwnAccess ); 183cdf0e10cSrcweir m_pDocHolder->acquire(); 184cdf0e10cSrcweir } 185cdf0e10cSrcweir 186cdf0e10cSrcweir EmbedDocument_Impl::~EmbedDocument_Impl() 187cdf0e10cSrcweir { 188cdf0e10cSrcweir m_pDocHolder->FreeOffice(); 189cdf0e10cSrcweir 190cdf0e10cSrcweir if ( m_pDocHolder->HasFrame() && m_pDocHolder->IsLink() ) 191cdf0e10cSrcweir { 192cdf0e10cSrcweir // a link with frame should be only disconnected, not closed 193cdf0e10cSrcweir m_pDocHolder->DisconnectFrameDocument( sal_True ); 194cdf0e10cSrcweir } 195cdf0e10cSrcweir else 196cdf0e10cSrcweir { 197cdf0e10cSrcweir m_pDocHolder->CloseDocument(); 198cdf0e10cSrcweir m_pDocHolder->CloseFrame(); 199cdf0e10cSrcweir } 200cdf0e10cSrcweir 201cdf0e10cSrcweir m_pDocHolder->release(); 202cdf0e10cSrcweir } 203cdf0e10cSrcweir 204cdf0e10cSrcweir uno::Sequence< beans::PropertyValue > EmbedDocument_Impl::fillArgsForLoading_Impl( uno::Reference< io::XInputStream > xStream, DWORD /*nStreamMode*/, LPCOLESTR pFilePath ) 205cdf0e10cSrcweir { 206cdf0e10cSrcweir uno::Sequence< beans::PropertyValue > aArgs( 3 ); 207cdf0e10cSrcweir 208cdf0e10cSrcweir sal_Int32 nInd = 0; // must not be bigger than the preset size 209cdf0e10cSrcweir aArgs[nInd].Name = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM ( "FilterName" ) ); 210cdf0e10cSrcweir aArgs[nInd++].Value <<= getFilterNameFromGUID_Impl( &m_guid ); 211cdf0e10cSrcweir 212cdf0e10cSrcweir if ( xStream.is() ) 213cdf0e10cSrcweir { 214cdf0e10cSrcweir aArgs[nInd].Name = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM ( "InputStream" ) ); 215cdf0e10cSrcweir aArgs[nInd++].Value <<= xStream; 216cdf0e10cSrcweir aArgs[nInd].Name = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM ( "URL" ) ); 217cdf0e10cSrcweir aArgs[nInd++].Value <<= ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM ( "private:stream" ) ); 218cdf0e10cSrcweir } 219cdf0e10cSrcweir else 220cdf0e10cSrcweir { 221cdf0e10cSrcweir aArgs[nInd].Name = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM ( "URL" ) ); 222cdf0e10cSrcweir 223cdf0e10cSrcweir rtl::OUString sDocUrl; 224cdf0e10cSrcweir if ( pFilePath ) 225cdf0e10cSrcweir { 226cdf0e10cSrcweir ::rtl::OUString aServiceName( RTL_CONSTASCII_USTRINGPARAM ( "com.sun.star.util.URLTransformer" ) ); 227cdf0e10cSrcweir uno::Reference< util::XURLTransformer > aTransformer( m_xFactory->createInstance( aServiceName ), 228cdf0e10cSrcweir uno::UNO_QUERY ); 229cdf0e10cSrcweir if ( aTransformer.is() ) 230cdf0e10cSrcweir { 231cdf0e10cSrcweir util::URL aURL; 232cdf0e10cSrcweir 233cdf0e10cSrcweir aURL.Complete = ::rtl::OUString( reinterpret_cast<const sal_Unicode*>(pFilePath) ); 234cdf0e10cSrcweir 235cdf0e10cSrcweir if ( aTransformer->parseSmart( aURL, ::rtl::OUString() ) ) 236cdf0e10cSrcweir sDocUrl = aURL.Complete; 237cdf0e10cSrcweir } 238cdf0e10cSrcweir } 239cdf0e10cSrcweir 240cdf0e10cSrcweir aArgs[nInd++].Value <<= sDocUrl; 241cdf0e10cSrcweir } 242cdf0e10cSrcweir 243cdf0e10cSrcweir aArgs.realloc( nInd ); 244cdf0e10cSrcweir 245cdf0e10cSrcweir // aArgs[].Name = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM ( "ReadOnly" ) ); 246cdf0e10cSrcweir // aArgs[].Value <<= sal_False; //( ( nStreamMode & ( STGM_READWRITE | STGM_WRITE ) ) ? sal_True : sal_False ); 247cdf0e10cSrcweir 248cdf0e10cSrcweir return aArgs; 249cdf0e10cSrcweir } 250cdf0e10cSrcweir 251cdf0e10cSrcweir uno::Sequence< beans::PropertyValue > EmbedDocument_Impl::fillArgsForStoring_Impl( uno::Reference< io::XOutputStream > xStream) 252cdf0e10cSrcweir { 253cdf0e10cSrcweir uno::Sequence< beans::PropertyValue > aArgs( xStream.is() ? 2 : 1 ); 254cdf0e10cSrcweir 255cdf0e10cSrcweir aArgs[0].Name = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM ( "FilterName" ) ); 256cdf0e10cSrcweir aArgs[0].Value <<= getFilterNameFromGUID_Impl( &m_guid ); 257cdf0e10cSrcweir 258cdf0e10cSrcweir if ( xStream.is() ) 259cdf0e10cSrcweir { 260cdf0e10cSrcweir aArgs[1].Name = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM ( "OutputStream" ) ); 261cdf0e10cSrcweir aArgs[1].Value <<= xStream; 262cdf0e10cSrcweir } 263cdf0e10cSrcweir 264cdf0e10cSrcweir return aArgs; 265cdf0e10cSrcweir } 266cdf0e10cSrcweir 267cdf0e10cSrcweir HRESULT EmbedDocument_Impl::SaveTo_Impl( IStorage* pStg ) 268cdf0e10cSrcweir { 269cdf0e10cSrcweir if ( !pStg || pStg == m_pMasterStorage ) 270cdf0e10cSrcweir return E_FAIL; 271cdf0e10cSrcweir 272cdf0e10cSrcweir // for saveto operation the master storage 273cdf0e10cSrcweir // should not enter NoScribble mode 274cdf0e10cSrcweir CComPtr< IStream > pOrigOwn = m_pOwnStream; 275cdf0e10cSrcweir CComPtr< IStream > pOrigExt = m_pExtStream; 276cdf0e10cSrcweir HRESULT hr = Save( pStg, sal_False ); 277cdf0e10cSrcweir pStg->Commit( STGC_ONLYIFCURRENT ); 278cdf0e10cSrcweir m_pOwnStream = pOrigOwn; 279cdf0e10cSrcweir m_pExtStream = pOrigExt; 280cdf0e10cSrcweir 281cdf0e10cSrcweir return hr; 282cdf0e10cSrcweir } 283cdf0e10cSrcweir 284cdf0e10cSrcweir //------------------------------------------------------------------------------- 285cdf0e10cSrcweir // IUnknown 286cdf0e10cSrcweir 287cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::QueryInterface( REFIID riid, void FAR* FAR* ppv ) 288cdf0e10cSrcweir { 289cdf0e10cSrcweir if(IsEqualIID(riid, IID_IUnknown)) 290cdf0e10cSrcweir { 291cdf0e10cSrcweir AddRef(); 292cdf0e10cSrcweir *ppv = (IUnknown*) (IPersistStorage*) this; 293cdf0e10cSrcweir return S_OK; 294cdf0e10cSrcweir } 295cdf0e10cSrcweir else if (IsEqualIID(riid, IID_IPersist)) 296cdf0e10cSrcweir { 297cdf0e10cSrcweir AddRef(); 298cdf0e10cSrcweir *ppv = (IPersist*) (IPersistStorage*) this; 299cdf0e10cSrcweir return S_OK; 300cdf0e10cSrcweir } 301cdf0e10cSrcweir else if (IsEqualIID(riid, IID_IExternalConnection)) 302cdf0e10cSrcweir { 303cdf0e10cSrcweir AddRef(); 304cdf0e10cSrcweir *ppv = (IExternalConnection*) this; 305cdf0e10cSrcweir return S_OK; 306cdf0e10cSrcweir } 307cdf0e10cSrcweir else if (IsEqualIID(riid, IID_IPersistStorage)) 308cdf0e10cSrcweir { 309cdf0e10cSrcweir AddRef(); 310cdf0e10cSrcweir *ppv = (IPersistStorage*) this; 311cdf0e10cSrcweir return S_OK; 312cdf0e10cSrcweir } 313cdf0e10cSrcweir else if (IsEqualIID(riid, IID_IDataObject)) 314cdf0e10cSrcweir { 315cdf0e10cSrcweir AddRef(); 316cdf0e10cSrcweir *ppv = (IDataObject*) this; 317cdf0e10cSrcweir return S_OK; 318cdf0e10cSrcweir } 319cdf0e10cSrcweir else if (IsEqualIID(riid, IID_IOleObject)) 320cdf0e10cSrcweir { 321cdf0e10cSrcweir AddRef(); 322cdf0e10cSrcweir *ppv = (IOleObject*) this; 323cdf0e10cSrcweir return S_OK; 324cdf0e10cSrcweir } 325cdf0e10cSrcweir else if (IsEqualIID(riid, IID_IOleWindow)) 326cdf0e10cSrcweir { 327cdf0e10cSrcweir AddRef(); 328cdf0e10cSrcweir *ppv = (IOleWindow*) this; 329cdf0e10cSrcweir return S_OK; 330cdf0e10cSrcweir } 331cdf0e10cSrcweir else if (IsEqualIID(riid, IID_IOleInPlaceObject)) 332cdf0e10cSrcweir { 333cdf0e10cSrcweir AddRef(); 334cdf0e10cSrcweir *ppv = (IOleInPlaceObject*) this; 335cdf0e10cSrcweir return S_OK; 336cdf0e10cSrcweir } 337cdf0e10cSrcweir else if (IsEqualIID(riid, IID_IPersistFile)) 338cdf0e10cSrcweir { 339cdf0e10cSrcweir AddRef(); 340cdf0e10cSrcweir *ppv = (IPersistFile*) this; 341cdf0e10cSrcweir return S_OK; 342cdf0e10cSrcweir } 343cdf0e10cSrcweir else if (IsEqualIID(riid, IID_IDispatch)) 344cdf0e10cSrcweir { 345cdf0e10cSrcweir AddRef(); 346cdf0e10cSrcweir *ppv = (IDispatch*) this; 347cdf0e10cSrcweir return S_OK; 348cdf0e10cSrcweir } 349cdf0e10cSrcweir 350cdf0e10cSrcweir *ppv = NULL; 351cdf0e10cSrcweir return ResultFromScode(E_NOINTERFACE); 352cdf0e10cSrcweir } 353cdf0e10cSrcweir 354cdf0e10cSrcweir STDMETHODIMP_(ULONG) EmbedDocument_Impl::AddRef() 355cdf0e10cSrcweir { 356cdf0e10cSrcweir return osl_incrementInterlockedCount( &m_refCount); 357cdf0e10cSrcweir } 358cdf0e10cSrcweir 359cdf0e10cSrcweir STDMETHODIMP_(ULONG) EmbedDocument_Impl::Release() 360cdf0e10cSrcweir { 361cdf0e10cSrcweir // if there is a time when the last reference is destructed, that means that only internal pointers are alive 362cdf0e10cSrcweir // after the following call either the refcount is increased or the pointers are empty 363cdf0e10cSrcweir if ( m_refCount == 1 ) 364cdf0e10cSrcweir m_xOwnAccess->ClearEmbedDocument(); 365cdf0e10cSrcweir 366cdf0e10cSrcweir sal_Int32 nCount = osl_decrementInterlockedCount( &m_refCount ); 367cdf0e10cSrcweir if ( nCount == 0 ) 368cdf0e10cSrcweir delete this; 369cdf0e10cSrcweir return nCount; 370cdf0e10cSrcweir } 371cdf0e10cSrcweir 372cdf0e10cSrcweir //------------------------------------------------------------------------------- 373cdf0e10cSrcweir // IPersist 374cdf0e10cSrcweir 375cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::GetClassID( CLSID* pClassId ) 376cdf0e10cSrcweir { 377cdf0e10cSrcweir *pClassId = *&m_guid; 378cdf0e10cSrcweir return S_OK; 379cdf0e10cSrcweir } 380cdf0e10cSrcweir 381cdf0e10cSrcweir //------------------------------------------------------------------------------- 382cdf0e10cSrcweir // IPersistStorage 383cdf0e10cSrcweir 384cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::IsDirty() 385cdf0e10cSrcweir { 386cdf0e10cSrcweir // the link modified state is controlled by the document 387cdf0e10cSrcweir if ( m_bIsDirty && !m_aFileName.getLength() ) 388cdf0e10cSrcweir return S_OK; 389cdf0e10cSrcweir 390cdf0e10cSrcweir uno::Reference< util::XModifiable > xMod( m_pDocHolder->GetDocument(), uno::UNO_QUERY ); 391cdf0e10cSrcweir if ( xMod.is() ) 392cdf0e10cSrcweir return xMod->isModified() ? S_OK : S_FALSE; 393cdf0e10cSrcweir return S_FALSE; 394cdf0e10cSrcweir } 395cdf0e10cSrcweir 396cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::InitNew( IStorage *pStg ) 397cdf0e10cSrcweir { 398cdf0e10cSrcweir HRESULT hr = CO_E_ALREADYINITIALIZED; 399cdf0e10cSrcweir 400cdf0e10cSrcweir if ( !m_pDocHolder->GetDocument().is() ) 401cdf0e10cSrcweir { 402cdf0e10cSrcweir 403cdf0e10cSrcweir STATSTG aStat; 404cdf0e10cSrcweir hr = pStg->Stat( &aStat, STATFLAG_NONAME ); 405cdf0e10cSrcweir if ( FAILED( hr ) ) return E_FAIL; 406cdf0e10cSrcweir 407cdf0e10cSrcweir DWORD nStreamMode = aStat.grfMode; 408cdf0e10cSrcweir 409cdf0e10cSrcweir hr = E_FAIL; 410cdf0e10cSrcweir if ( m_xFactory.is() && pStg ) 411cdf0e10cSrcweir { 412cdf0e10cSrcweir uno::Reference< frame::XModel > aDocument( 413cdf0e10cSrcweir m_xFactory->createInstance( getServiceNameFromGUID_Impl( &m_guid ) ), 414cdf0e10cSrcweir uno::UNO_QUERY ); 415cdf0e10cSrcweir if ( aDocument.is() ) 416cdf0e10cSrcweir { 417cdf0e10cSrcweir m_pDocHolder->SetDocument( aDocument ); 418cdf0e10cSrcweir 419cdf0e10cSrcweir uno::Reference< frame::XLoadable > xLoadable( m_pDocHolder->GetDocument(), uno::UNO_QUERY ); 420cdf0e10cSrcweir if( xLoadable.is() ) 421cdf0e10cSrcweir { 422cdf0e10cSrcweir try 423cdf0e10cSrcweir { 424cdf0e10cSrcweir xLoadable->initNew(); 425cdf0e10cSrcweir // xLoadable->load( fillArgsForLoading_Impl( uno::Reference< io::XInputStream >(), nStreamMode ) ); 426cdf0e10cSrcweir hr = S_OK; 427cdf0e10cSrcweir } 428cdf0e10cSrcweir catch( uno::Exception& ) 429cdf0e10cSrcweir { 430cdf0e10cSrcweir } 431cdf0e10cSrcweir } 432cdf0e10cSrcweir 433cdf0e10cSrcweir if ( hr == S_OK ) 434cdf0e10cSrcweir { 435cdf0e10cSrcweir ::rtl::OUString aCurType = getStorageTypeFromGUID_Impl( &m_guid ); // ??? 436cdf0e10cSrcweir CLIPFORMAT cf = (CLIPFORMAT)RegisterClipboardFormatA( "Embedded Object" ); 437cdf0e10cSrcweir hr = WriteFmtUserTypeStg( pStg, 438cdf0e10cSrcweir cf, // ??? 439cdf0e10cSrcweir reinterpret_cast<LPWSTR>(( sal_Unicode* )aCurType.getStr()) ); 440cdf0e10cSrcweir 441cdf0e10cSrcweir if ( hr == S_OK ) 442cdf0e10cSrcweir { 443cdf0e10cSrcweir hr = pStg->CreateStream( reinterpret_cast<LPCWSTR>(aOfficeEmbedStreamName.getStr()), 444cdf0e10cSrcweir STGM_CREATE | ( nStreamMode & 0x73 ), 445cdf0e10cSrcweir 0, 446cdf0e10cSrcweir 0, 447cdf0e10cSrcweir &m_pOwnStream ); 448cdf0e10cSrcweir 449cdf0e10cSrcweir if ( hr == S_OK && m_pOwnStream ) 450cdf0e10cSrcweir { 451cdf0e10cSrcweir hr = pStg->CreateStream( reinterpret_cast<LPCWSTR>(aExtentStreamName.getStr()), 452cdf0e10cSrcweir STGM_CREATE | ( nStreamMode & 0x73 ), 453cdf0e10cSrcweir 0, 454cdf0e10cSrcweir 0, 455cdf0e10cSrcweir &m_pExtStream ); 456cdf0e10cSrcweir 457cdf0e10cSrcweir if ( hr == S_OK && m_pExtStream ) 458cdf0e10cSrcweir { 459cdf0e10cSrcweir 460cdf0e10cSrcweir m_pMasterStorage = pStg; 461cdf0e10cSrcweir m_bIsDirty = sal_True; 462cdf0e10cSrcweir } 463cdf0e10cSrcweir else 464cdf0e10cSrcweir hr = E_FAIL; 465cdf0e10cSrcweir } 466cdf0e10cSrcweir else 467cdf0e10cSrcweir hr = E_FAIL; 468cdf0e10cSrcweir } 469cdf0e10cSrcweir else 470cdf0e10cSrcweir hr = E_FAIL; 471cdf0e10cSrcweir } 472cdf0e10cSrcweir 473cdf0e10cSrcweir if ( hr != S_OK ) 474cdf0e10cSrcweir m_pDocHolder->CloseDocument(); 475cdf0e10cSrcweir } 476cdf0e10cSrcweir } 477cdf0e10cSrcweir } 478cdf0e10cSrcweir 479cdf0e10cSrcweir return hr; 480cdf0e10cSrcweir } 481cdf0e10cSrcweir 482cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::Load( IStorage *pStg ) 483cdf0e10cSrcweir { 484cdf0e10cSrcweir if ( m_pDocHolder->GetDocument().is() ) 485cdf0e10cSrcweir return CO_E_ALREADYINITIALIZED; 486cdf0e10cSrcweir 487cdf0e10cSrcweir if ( !m_xFactory.is() || !pStg ) 488cdf0e10cSrcweir return E_FAIL; 489cdf0e10cSrcweir 490cdf0e10cSrcweir HRESULT hr = E_FAIL; 491cdf0e10cSrcweir 492cdf0e10cSrcweir STATSTG aStat; 493cdf0e10cSrcweir hr = pStg->Stat( &aStat, STATFLAG_NONAME ); 494cdf0e10cSrcweir if ( FAILED( hr ) ) return E_FAIL; 495cdf0e10cSrcweir 496cdf0e10cSrcweir DWORD nStreamMode = aStat.grfMode; 497cdf0e10cSrcweir hr = pStg->OpenStream( reinterpret_cast<LPCWSTR>(aOfficeEmbedStreamName.getStr()), 498cdf0e10cSrcweir 0, 499cdf0e10cSrcweir nStreamMode & 0x73, 500cdf0e10cSrcweir 0, 501cdf0e10cSrcweir &m_pOwnStream ); 502cdf0e10cSrcweir if ( !m_pOwnStream ) hr = E_FAIL; 503cdf0e10cSrcweir 504cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 505cdf0e10cSrcweir { 506cdf0e10cSrcweir hr = pStg->OpenStream( reinterpret_cast<LPCWSTR>(aExtentStreamName.getStr()), 507cdf0e10cSrcweir 0, 508cdf0e10cSrcweir nStreamMode & 0x73, 509cdf0e10cSrcweir 0, 510cdf0e10cSrcweir &m_pExtStream ); 511cdf0e10cSrcweir if ( !m_pExtStream ) hr = E_FAIL; 512cdf0e10cSrcweir } 513cdf0e10cSrcweir 514cdf0e10cSrcweir // RECTL aRectToSet; 515cdf0e10cSrcweir SIZEL aSizeToSet; 516cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 517cdf0e10cSrcweir { 518cdf0e10cSrcweir ULARGE_INTEGER nNewPos; 519cdf0e10cSrcweir LARGE_INTEGER aZero = { 0L, 0L }; 520cdf0e10cSrcweir hr = m_pExtStream->Seek( aZero, STREAM_SEEK_SET, &nNewPos ); 521cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 522cdf0e10cSrcweir { 523cdf0e10cSrcweir sal_uInt32 nRead; 524cdf0e10cSrcweir sal_Int8 aInf[EXT_STREAM_LENGTH]; 525cdf0e10cSrcweir hr = m_pExtStream->Read( (void*)aInf, EXT_STREAM_LENGTH, &nRead ); 526cdf0e10cSrcweir if ( nRead != EXT_STREAM_LENGTH ) hr = E_FAIL; 527cdf0e10cSrcweir 528cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 529cdf0e10cSrcweir { 530cdf0e10cSrcweir // aRectToSet.left = *((sal_Int32*)aInf); 531cdf0e10cSrcweir // aRectToSet.top = *((sal_Int32*)&aInf[4]); 532cdf0e10cSrcweir // aRectToSet.right = *((sal_Int32*)&aInf[8]); 533cdf0e10cSrcweir // aRectToSet.bottom = *((sal_Int32*)&aInf[12]); 534cdf0e10cSrcweir aSizeToSet.cx = *((sal_Int32*)&aInf[8]) - *((sal_Int32*)aInf); 535cdf0e10cSrcweir aSizeToSet.cy = *((sal_Int32*)&aInf[12]) - *((sal_Int32*)&aInf[4]); 536cdf0e10cSrcweir } 537cdf0e10cSrcweir } 538cdf0e10cSrcweir } 539cdf0e10cSrcweir 540cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 541cdf0e10cSrcweir { 542cdf0e10cSrcweir hr = E_FAIL; 543cdf0e10cSrcweir 544cdf0e10cSrcweir uno::Reference < io::XInputStream > xTempIn = createTempXInStreamFromIStream( m_xFactory, m_pOwnStream ); 545cdf0e10cSrcweir if ( xTempIn.is() ) 546cdf0e10cSrcweir { 547cdf0e10cSrcweir uno::Reference< frame::XModel > aDocument( 548cdf0e10cSrcweir m_xFactory->createInstance( getServiceNameFromGUID_Impl( &m_guid ) ), 549cdf0e10cSrcweir uno::UNO_QUERY ); 550cdf0e10cSrcweir if ( aDocument.is() ) 551cdf0e10cSrcweir { 552cdf0e10cSrcweir m_pDocHolder->SetDocument( aDocument ); 553cdf0e10cSrcweir 554cdf0e10cSrcweir uno::Reference< frame::XLoadable > xLoadable( m_pDocHolder->GetDocument(), uno::UNO_QUERY ); 555cdf0e10cSrcweir if( xLoadable.is() ) 556cdf0e10cSrcweir { 557cdf0e10cSrcweir try 558cdf0e10cSrcweir { 559cdf0e10cSrcweir xLoadable->load( fillArgsForLoading_Impl( xTempIn, nStreamMode ) ); 560cdf0e10cSrcweir m_pMasterStorage = pStg; 561cdf0e10cSrcweir hr = m_pDocHolder->SetExtent( &aSizeToSet ); 562cdf0e10cSrcweir // hr = m_pDocHolder->SetVisArea( &aRectToSet ); 563cdf0e10cSrcweir } 564cdf0e10cSrcweir catch( uno::Exception& ) 565cdf0e10cSrcweir { 566cdf0e10cSrcweir } 567cdf0e10cSrcweir } 568cdf0e10cSrcweir 569cdf0e10cSrcweir if ( FAILED( hr ) ) 570cdf0e10cSrcweir m_pDocHolder->CloseDocument(); 571cdf0e10cSrcweir } 572cdf0e10cSrcweir } 573cdf0e10cSrcweir } 574cdf0e10cSrcweir 575cdf0e10cSrcweir if ( FAILED( hr ) ) 576cdf0e10cSrcweir { 577cdf0e10cSrcweir m_pOwnStream = CComPtr< IStream >(); 578cdf0e10cSrcweir m_pExtStream = CComPtr< IStream >(); 579cdf0e10cSrcweir hr = pStg->DestroyElement( reinterpret_cast<LPCWSTR>(aOfficeEmbedStreamName.getStr()) ); 580cdf0e10cSrcweir hr = pStg->DestroyElement( reinterpret_cast<LPCWSTR>(aExtentStreamName.getStr()) ); 581cdf0e10cSrcweir 582cdf0e10cSrcweir OSL_ENSURE( SUCCEEDED( hr ), "Can not destroy created stream!\n" ); 583cdf0e10cSrcweir if ( FAILED( hr ) ) 584cdf0e10cSrcweir hr = E_FAIL; 585cdf0e10cSrcweir } 586cdf0e10cSrcweir 587cdf0e10cSrcweir return hr; 588cdf0e10cSrcweir } 589cdf0e10cSrcweir 590cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::Save( IStorage *pStgSave, BOOL fSameAsLoad ) 591cdf0e10cSrcweir { 592cdf0e10cSrcweir if ( !m_pDocHolder->GetDocument().is() || !m_xFactory.is() || !pStgSave || !m_pOwnStream || !m_pExtStream ) 593cdf0e10cSrcweir return E_FAIL; 594cdf0e10cSrcweir 595cdf0e10cSrcweir CComPtr< IStream > pTargetStream; 596cdf0e10cSrcweir CComPtr< IStream > pNewExtStream; 597cdf0e10cSrcweir 598cdf0e10cSrcweir if ( !fSameAsLoad && pStgSave != m_pMasterStorage ) 599cdf0e10cSrcweir { 600cdf0e10cSrcweir OSL_ENSURE( m_pMasterStorage, "How could the document be initialized without storage!??\n" ); 601cdf0e10cSrcweir HRESULT hr = m_pMasterStorage->CopyTo( NULL, NULL, NULL, pStgSave ); 602cdf0e10cSrcweir if ( FAILED( hr ) ) return E_FAIL; 603cdf0e10cSrcweir 604cdf0e10cSrcweir STATSTG aStat; 605cdf0e10cSrcweir hr = pStgSave->Stat( &aStat, STATFLAG_NONAME ); 606cdf0e10cSrcweir if ( FAILED( hr ) ) return E_FAIL; 607cdf0e10cSrcweir 608cdf0e10cSrcweir DWORD nStreamMode = aStat.grfMode; 609cdf0e10cSrcweir hr = pStgSave->CreateStream( reinterpret_cast<LPCWSTR>(aOfficeEmbedStreamName.getStr()), 610cdf0e10cSrcweir STGM_CREATE | ( nStreamMode & 0x73 ), 611cdf0e10cSrcweir 0, 612cdf0e10cSrcweir 0, 613cdf0e10cSrcweir &pTargetStream ); 614cdf0e10cSrcweir if ( FAILED( hr ) || !pTargetStream ) return E_FAIL; 615cdf0e10cSrcweir 616cdf0e10cSrcweir hr = pStgSave->CreateStream( reinterpret_cast<LPCWSTR>(aExtentStreamName.getStr()), 617cdf0e10cSrcweir STGM_CREATE | ( nStreamMode & 0x73 ), 618cdf0e10cSrcweir 0, 619cdf0e10cSrcweir 0, 620cdf0e10cSrcweir &pNewExtStream ); 621cdf0e10cSrcweir if ( FAILED( hr ) || !pNewExtStream ) return E_FAIL; 622cdf0e10cSrcweir } 623cdf0e10cSrcweir else 624cdf0e10cSrcweir { 625cdf0e10cSrcweir pTargetStream = m_pOwnStream; 626cdf0e10cSrcweir pNewExtStream = m_pExtStream; 627cdf0e10cSrcweir } 628cdf0e10cSrcweir 629cdf0e10cSrcweir HRESULT hr = E_FAIL; 630cdf0e10cSrcweir 631cdf0e10cSrcweir const ::rtl::OUString aServiceName ( RTL_CONSTASCII_USTRINGPARAM ( "com.sun.star.io.TempFile" ) ); 632cdf0e10cSrcweir uno::Reference < io::XOutputStream > xTempOut = uno::Reference < io::XOutputStream > ( 633cdf0e10cSrcweir m_xFactory->createInstance ( aServiceName ), 634cdf0e10cSrcweir uno::UNO_QUERY ); 635cdf0e10cSrcweir 636cdf0e10cSrcweir if ( xTempOut.is() ) 637cdf0e10cSrcweir { 638cdf0e10cSrcweir uno::Reference< frame::XStorable > xStorable( m_pDocHolder->GetDocument(), uno::UNO_QUERY ); 639cdf0e10cSrcweir if( xStorable.is() ) 640cdf0e10cSrcweir { 641cdf0e10cSrcweir try 642cdf0e10cSrcweir { 643cdf0e10cSrcweir xStorable->storeToURL( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM ( "private:stream" ) ), 644cdf0e10cSrcweir fillArgsForStoring_Impl( xTempOut ) ); 645cdf0e10cSrcweir hr = copyXTempOutToIStream( xTempOut, pTargetStream ); 646cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 647cdf0e10cSrcweir { 648cdf0e10cSrcweir // no need to truncate the stream, the size of the stream is always the same 649cdf0e10cSrcweir ULARGE_INTEGER nNewPos; 650cdf0e10cSrcweir LARGE_INTEGER aZero = { 0L, 0L }; 651cdf0e10cSrcweir hr = pNewExtStream->Seek( aZero, STREAM_SEEK_SET, &nNewPos ); 652cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 653cdf0e10cSrcweir { 654cdf0e10cSrcweir SIZEL aSize; 655cdf0e10cSrcweir hr = m_pDocHolder->GetExtent( &aSize ); 656cdf0e10cSrcweir 657cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 658cdf0e10cSrcweir { 659cdf0e10cSrcweir sal_uInt32 nWritten; 660cdf0e10cSrcweir sal_Int8 aInf[EXT_STREAM_LENGTH]; 661cdf0e10cSrcweir *((sal_Int32*)aInf) = 0; 662cdf0e10cSrcweir *((sal_Int32*)&aInf[4]) = 0; 663cdf0e10cSrcweir *((sal_Int32*)&aInf[8]) = aSize.cx; 664cdf0e10cSrcweir *((sal_Int32*)&aInf[12]) = aSize.cy; 665cdf0e10cSrcweir 666cdf0e10cSrcweir hr = pNewExtStream->Write( (void*)aInf, EXT_STREAM_LENGTH, &nWritten ); 667cdf0e10cSrcweir if ( nWritten != EXT_STREAM_LENGTH ) hr = E_FAIL; 668cdf0e10cSrcweir 669cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 670cdf0e10cSrcweir { 671cdf0e10cSrcweir m_pOwnStream = CComPtr< IStream >(); 672cdf0e10cSrcweir m_pExtStream = CComPtr< IStream >(); 673cdf0e10cSrcweir if ( fSameAsLoad || pStgSave == m_pMasterStorage ) 674cdf0e10cSrcweir { 675cdf0e10cSrcweir uno::Reference< util::XModifiable > xMod( m_pDocHolder->GetDocument(), uno::UNO_QUERY ); 676cdf0e10cSrcweir if ( xMod.is() ) 677cdf0e10cSrcweir xMod->setModified( sal_False ); 678cdf0e10cSrcweir m_bIsDirty = sal_False; 679cdf0e10cSrcweir } 680cdf0e10cSrcweir } 681cdf0e10cSrcweir } 682cdf0e10cSrcweir } 683cdf0e10cSrcweir } 684cdf0e10cSrcweir } 685cdf0e10cSrcweir catch( uno::Exception& ) 686cdf0e10cSrcweir { 687cdf0e10cSrcweir } 688cdf0e10cSrcweir } 689cdf0e10cSrcweir } 690cdf0e10cSrcweir 691cdf0e10cSrcweir return hr; 692cdf0e10cSrcweir } 693cdf0e10cSrcweir 694cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::SaveCompleted( IStorage *pStgNew ) 695cdf0e10cSrcweir { 696cdf0e10cSrcweir // m_pOwnStream == NULL && m_pMasterStorage != NULL means the object is in NoScribble mode 697cdf0e10cSrcweir // m_pOwnStream == NULL && m_pMasterStorage == NULL means the object is in HandsOff mode 698cdf0e10cSrcweir 699cdf0e10cSrcweir if ( m_pOwnStream || m_pExtStream ) 700cdf0e10cSrcweir return E_UNEXPECTED; 701cdf0e10cSrcweir 702cdf0e10cSrcweir if ( !m_pMasterStorage && !pStgNew ) 703cdf0e10cSrcweir return E_INVALIDARG; 704cdf0e10cSrcweir 705cdf0e10cSrcweir if ( pStgNew ) 706cdf0e10cSrcweir m_pMasterStorage = pStgNew; 707cdf0e10cSrcweir 708cdf0e10cSrcweir STATSTG aStat; 709cdf0e10cSrcweir HRESULT hr = m_pMasterStorage->Stat( &aStat, STATFLAG_NONAME ); 710cdf0e10cSrcweir if ( FAILED( hr ) ) return E_OUTOFMEMORY; 711cdf0e10cSrcweir 712cdf0e10cSrcweir DWORD nStreamMode = aStat.grfMode; 713cdf0e10cSrcweir hr = m_pMasterStorage->OpenStream( reinterpret_cast<LPCWSTR>(aOfficeEmbedStreamName.getStr()), 714cdf0e10cSrcweir 0, 715cdf0e10cSrcweir nStreamMode & 0x73, 716cdf0e10cSrcweir 0, 717cdf0e10cSrcweir &m_pOwnStream ); 718cdf0e10cSrcweir if ( FAILED( hr ) || !m_pOwnStream ) return E_OUTOFMEMORY; 719cdf0e10cSrcweir 720cdf0e10cSrcweir hr = m_pMasterStorage->OpenStream( reinterpret_cast<LPCWSTR>(aExtentStreamName.getStr()), 721cdf0e10cSrcweir 0, 722cdf0e10cSrcweir nStreamMode & 0x73, 723cdf0e10cSrcweir 0, 724cdf0e10cSrcweir &m_pExtStream ); 725cdf0e10cSrcweir if ( FAILED( hr ) || !m_pExtStream ) return E_OUTOFMEMORY; 726cdf0e10cSrcweir 727cdf0e10cSrcweir sal_Bool bModified = sal_False; 728cdf0e10cSrcweir uno::Reference< util::XModifiable > xMod( m_pDocHolder->GetDocument(), uno::UNO_QUERY ); 729cdf0e10cSrcweir if ( xMod.is() ) 730cdf0e10cSrcweir bModified = xMod->isModified(); 731cdf0e10cSrcweir 732cdf0e10cSrcweir for ( AdviseSinkHashMapIterator iAdvise = m_aAdviseHashMap.begin(); iAdvise != m_aAdviseHashMap.end(); iAdvise++ ) 733cdf0e10cSrcweir { 734cdf0e10cSrcweir if ( iAdvise->second ) 735cdf0e10cSrcweir iAdvise->second->OnSave(); 736cdf0e10cSrcweir } 737cdf0e10cSrcweir 738cdf0e10cSrcweir if ( xMod.is() ) 739cdf0e10cSrcweir bModified = xMod->isModified(); 740cdf0e10cSrcweir 741cdf0e10cSrcweir return S_OK; 742cdf0e10cSrcweir } 743cdf0e10cSrcweir 744cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::HandsOffStorage() 745cdf0e10cSrcweir { 746cdf0e10cSrcweir m_pMasterStorage = CComPtr< IStorage >(); 747cdf0e10cSrcweir m_pOwnStream = CComPtr< IStream >(); 748cdf0e10cSrcweir m_pExtStream = CComPtr< IStream >(); 749cdf0e10cSrcweir 750cdf0e10cSrcweir return S_OK; 751cdf0e10cSrcweir } 752cdf0e10cSrcweir 753cdf0e10cSrcweir //------------------------------------------------------------------------------- 754cdf0e10cSrcweir // IPersistFile 755cdf0e10cSrcweir 756cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::Load( LPCOLESTR pszFileName, DWORD /*dwMode*/ ) 757cdf0e10cSrcweir { 758cdf0e10cSrcweir if ( m_pDocHolder->GetDocument().is() ) 759cdf0e10cSrcweir return CO_E_ALREADYINITIALIZED; 760cdf0e10cSrcweir 761cdf0e10cSrcweir if ( !m_xFactory.is() ) 762cdf0e10cSrcweir return E_FAIL; 763cdf0e10cSrcweir 764cdf0e10cSrcweir DWORD nStreamMode = STGM_CREATE | STGM_READWRITE | STGM_DELETEONRELEASE | STGM_SHARE_EXCLUSIVE; 765cdf0e10cSrcweir HRESULT hr = StgCreateDocfile( NULL, 766cdf0e10cSrcweir nStreamMode , 767cdf0e10cSrcweir 0, 768cdf0e10cSrcweir &m_pMasterStorage ); 769cdf0e10cSrcweir 770cdf0e10cSrcweir if ( FAILED( hr ) || !m_pMasterStorage ) return E_FAIL; 771cdf0e10cSrcweir 772cdf0e10cSrcweir ::rtl::OUString aCurType = getServiceNameFromGUID_Impl( &m_guid ); // ??? 773cdf0e10cSrcweir CLIPFORMAT cf = (CLIPFORMAT)RegisterClipboardFormatA( "Embedded Object" ); 774cdf0e10cSrcweir hr = WriteFmtUserTypeStg( m_pMasterStorage, 775cdf0e10cSrcweir cf, // ??? 776cdf0e10cSrcweir reinterpret_cast<LPWSTR>(( sal_Unicode* )aCurType.getStr()) ); 777cdf0e10cSrcweir if ( FAILED( hr ) ) return E_FAIL; 778cdf0e10cSrcweir 779cdf0e10cSrcweir hr = m_pMasterStorage->SetClass( m_guid ); 780cdf0e10cSrcweir if ( FAILED( hr ) ) return E_FAIL; 781cdf0e10cSrcweir 782cdf0e10cSrcweir hr = m_pMasterStorage->CreateStream( reinterpret_cast<LPCWSTR>(aOfficeEmbedStreamName.getStr()), 783cdf0e10cSrcweir STGM_CREATE | ( nStreamMode & 0x73 ), 784cdf0e10cSrcweir 0, 785cdf0e10cSrcweir 0, 786cdf0e10cSrcweir &m_pOwnStream ); 787cdf0e10cSrcweir if ( FAILED( hr ) || !m_pOwnStream ) return E_FAIL; 788cdf0e10cSrcweir 789cdf0e10cSrcweir hr = m_pMasterStorage->CreateStream( reinterpret_cast<LPCWSTR>(aExtentStreamName.getStr()), 790cdf0e10cSrcweir STGM_CREATE | ( nStreamMode & 0x73 ), 791cdf0e10cSrcweir 0, 792cdf0e10cSrcweir 0, 793cdf0e10cSrcweir &m_pExtStream ); 794cdf0e10cSrcweir if ( FAILED( hr ) || !m_pExtStream ) return E_FAIL; 795cdf0e10cSrcweir 796cdf0e10cSrcweir 797cdf0e10cSrcweir uno::Reference< frame::XModel > aDocument( 798cdf0e10cSrcweir m_xFactory->createInstance( getServiceNameFromGUID_Impl( &m_guid ) ), 799cdf0e10cSrcweir uno::UNO_QUERY ); 800cdf0e10cSrcweir if ( aDocument.is() ) 801cdf0e10cSrcweir { 802cdf0e10cSrcweir m_pDocHolder->SetDocument( aDocument, sal_True ); 803cdf0e10cSrcweir 804cdf0e10cSrcweir uno::Reference< frame::XLoadable > xLoadable( m_pDocHolder->GetDocument(), uno::UNO_QUERY ); 805cdf0e10cSrcweir if( xLoadable.is() ) 806cdf0e10cSrcweir { 807cdf0e10cSrcweir try 808cdf0e10cSrcweir { 809cdf0e10cSrcweir xLoadable->load( fillArgsForLoading_Impl( uno::Reference< io::XInputStream >(), 810cdf0e10cSrcweir STGM_READWRITE, 811cdf0e10cSrcweir pszFileName ) ); 812cdf0e10cSrcweir hr = S_OK; 813cdf0e10cSrcweir 814cdf0e10cSrcweir m_aFileName = ::rtl::OUString( reinterpret_cast<const sal_Unicode*>(pszFileName) ); 815cdf0e10cSrcweir } 816cdf0e10cSrcweir catch( uno::Exception& ) 817cdf0e10cSrcweir { 818cdf0e10cSrcweir } 819cdf0e10cSrcweir } 820cdf0e10cSrcweir 821cdf0e10cSrcweir if ( hr == S_OK ) 822cdf0e10cSrcweir { 823cdf0e10cSrcweir ::rtl::OUString aCurType = getServiceNameFromGUID_Impl( &m_guid ); // ??? 824cdf0e10cSrcweir CLIPFORMAT cf = (CLIPFORMAT)RegisterClipboardFormatA( "Embedded Object" ); 825cdf0e10cSrcweir hr = WriteFmtUserTypeStg( m_pMasterStorage, 826cdf0e10cSrcweir cf, // ??? 827cdf0e10cSrcweir reinterpret_cast<LPWSTR>(( sal_Unicode* )aCurType.getStr()) ); 828cdf0e10cSrcweir 829cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 830cdf0e10cSrcweir { 831cdf0e10cSrcweir // no need to truncate the stream, the size of the stream is always the same 832cdf0e10cSrcweir ULARGE_INTEGER nNewPos; 833cdf0e10cSrcweir LARGE_INTEGER aZero = { 0L, 0L }; 834cdf0e10cSrcweir hr = m_pExtStream->Seek( aZero, STREAM_SEEK_SET, &nNewPos ); 835cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 836cdf0e10cSrcweir { 837cdf0e10cSrcweir SIZEL aSize; 838cdf0e10cSrcweir hr = m_pDocHolder->GetExtent( &aSize ); 839cdf0e10cSrcweir 840cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 841cdf0e10cSrcweir { 842cdf0e10cSrcweir sal_uInt32 nWritten; 843cdf0e10cSrcweir sal_Int8 aInf[EXT_STREAM_LENGTH]; 844cdf0e10cSrcweir *((sal_Int32*)aInf) = 0; 845cdf0e10cSrcweir *((sal_Int32*)&aInf[4]) = 0; 846cdf0e10cSrcweir *((sal_Int32*)&aInf[8]) = aSize.cx; 847cdf0e10cSrcweir *((sal_Int32*)&aInf[12]) = aSize.cy; 848cdf0e10cSrcweir 849cdf0e10cSrcweir hr = m_pExtStream->Write( (void*)aInf, EXT_STREAM_LENGTH, &nWritten ); 850cdf0e10cSrcweir if ( nWritten != EXT_STREAM_LENGTH ) hr = E_FAIL; 851cdf0e10cSrcweir } 852cdf0e10cSrcweir } 853cdf0e10cSrcweir } 854cdf0e10cSrcweir 855cdf0e10cSrcweir if ( SUCCEEDED( hr ) ) 856cdf0e10cSrcweir m_bIsDirty = sal_True; 857cdf0e10cSrcweir else 858cdf0e10cSrcweir hr = E_FAIL; 859cdf0e10cSrcweir } 860cdf0e10cSrcweir 861cdf0e10cSrcweir if ( FAILED( hr ) ) 862cdf0e10cSrcweir { 863cdf0e10cSrcweir m_pDocHolder->CloseDocument(); 864cdf0e10cSrcweir m_pOwnStream = NULL; 865cdf0e10cSrcweir m_pExtStream = NULL; 866cdf0e10cSrcweir m_pMasterStorage = NULL; 867cdf0e10cSrcweir } 868cdf0e10cSrcweir } 869cdf0e10cSrcweir 870cdf0e10cSrcweir return hr; 871cdf0e10cSrcweir } 872cdf0e10cSrcweir 873cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::Save( LPCOLESTR pszFileName, BOOL fRemember ) 874cdf0e10cSrcweir { 875cdf0e10cSrcweir if ( !m_pDocHolder->GetDocument().is() || !m_xFactory.is() ) 876cdf0e10cSrcweir return E_FAIL; 877cdf0e10cSrcweir 878cdf0e10cSrcweir HRESULT hr = E_FAIL; 879cdf0e10cSrcweir 880cdf0e10cSrcweir // TODO/LATER: currently there is no hands off state implemented 881cdf0e10cSrcweir try 882cdf0e10cSrcweir { 883cdf0e10cSrcweir uno::Reference< frame::XStorable > xStorable( m_pDocHolder->GetDocument(), uno::UNO_QUERY_THROW ); 884cdf0e10cSrcweir 885cdf0e10cSrcweir if ( !pszFileName ) 886cdf0e10cSrcweir xStorable->store(); 887cdf0e10cSrcweir else 888cdf0e10cSrcweir { 889cdf0e10cSrcweir util::URL aURL; 890cdf0e10cSrcweir aURL.Complete = ::rtl::OUString( reinterpret_cast<const sal_Unicode*>( pszFileName ) ); 891cdf0e10cSrcweir 892cdf0e10cSrcweir ::rtl::OUString aServiceName( RTL_CONSTASCII_USTRINGPARAM ( "com.sun.star.util.URLTransformer" ) ); 893cdf0e10cSrcweir uno::Reference< util::XURLTransformer > aTransformer( m_xFactory->createInstance( aServiceName ), 894cdf0e10cSrcweir uno::UNO_QUERY_THROW ); 895cdf0e10cSrcweir 896cdf0e10cSrcweir if ( aTransformer->parseSmart( aURL, ::rtl::OUString() ) && aURL.Complete.getLength() ) 897cdf0e10cSrcweir { 898cdf0e10cSrcweir if ( fRemember ) 899cdf0e10cSrcweir { 900cdf0e10cSrcweir xStorable->storeAsURL( aURL.Complete, fillArgsForStoring_Impl( uno::Reference< io::XOutputStream >() ) ); 901cdf0e10cSrcweir m_aFileName = aURL.Complete; 902cdf0e10cSrcweir } 903cdf0e10cSrcweir else 904cdf0e10cSrcweir xStorable->storeToURL( aURL.Complete, fillArgsForStoring_Impl( uno::Reference< io::XOutputStream >() ) ); 905cdf0e10cSrcweir } 906cdf0e10cSrcweir } 907cdf0e10cSrcweir 908cdf0e10cSrcweir hr = S_OK; 909cdf0e10cSrcweir } 910cdf0e10cSrcweir catch( uno::Exception& ) 911cdf0e10cSrcweir { 912cdf0e10cSrcweir } 913cdf0e10cSrcweir 914cdf0e10cSrcweir return hr; 915cdf0e10cSrcweir } 916cdf0e10cSrcweir 917cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::SaveCompleted( LPCOLESTR pszFileName ) 918cdf0e10cSrcweir { 919cdf0e10cSrcweir // the different file name would mean error here 920cdf0e10cSrcweir m_aFileName = ::rtl::OUString( reinterpret_cast<const sal_Unicode*>(pszFileName) ); 921cdf0e10cSrcweir return S_OK; 922cdf0e10cSrcweir } 923cdf0e10cSrcweir 924cdf0e10cSrcweir STDMETHODIMP EmbedDocument_Impl::GetCurFile( LPOLESTR *ppszFileName ) 925cdf0e10cSrcweir { 926cdf0e10cSrcweir CComPtr<IMalloc> pMalloc; 927cdf0e10cSrcweir 928cdf0e10cSrcweir HRESULT hr = CoGetMalloc( 1, &pMalloc ); 929cdf0e10cSrcweir if ( FAILED( hr ) || !pMalloc ) return E_FAIL; 930cdf0e10cSrcweir 931cdf0e10cSrcweir *ppszFileName = (LPOLESTR)( pMalloc->Alloc( sizeof( sal_Unicode ) * ( m_aFileName.getLength() + 1 ) ) ); 932cdf0e10cSrcweir wcsncpy( *ppszFileName, reinterpret_cast<LPCWSTR>(m_aFileName.getStr()), m_aFileName.getLength() + 1 ); 933cdf0e10cSrcweir 934cdf0e10cSrcweir return m_aFileName.getLength() ? S_OK : S_FALSE; 935cdf0e10cSrcweir } 936cdf0e10cSrcweir 937cdf0e10cSrcweir // =============================================== 938cdf0e10cSrcweir 939cdf0e10cSrcweir LockedEmbedDocument_Impl EmbeddedDocumentInstanceAccess_Impl::GetEmbedDocument() 940cdf0e10cSrcweir { 941cdf0e10cSrcweir ::osl::MutexGuard aGuard( m_aMutex ); 942cdf0e10cSrcweir return LockedEmbedDocument_Impl( m_pEmbedDocument ); 943cdf0e10cSrcweir } 944cdf0e10cSrcweir 945cdf0e10cSrcweir void EmbeddedDocumentInstanceAccess_Impl::ClearEmbedDocument() 946cdf0e10cSrcweir { 947cdf0e10cSrcweir ::osl::MutexGuard aGuard( m_aMutex ); 948cdf0e10cSrcweir m_pEmbedDocument = NULL; 949cdf0e10cSrcweir } 950cdf0e10cSrcweir 951cdf0e10cSrcweir // =============================================== 952cdf0e10cSrcweir 953cdf0e10cSrcweir LockedEmbedDocument_Impl::LockedEmbedDocument_Impl() 954cdf0e10cSrcweir : m_pEmbedDocument( NULL ) 955cdf0e10cSrcweir {} 956cdf0e10cSrcweir 957cdf0e10cSrcweir LockedEmbedDocument_Impl::LockedEmbedDocument_Impl( EmbedDocument_Impl* pEmbedDocument ) 958cdf0e10cSrcweir : m_pEmbedDocument( pEmbedDocument ) 959cdf0e10cSrcweir { 960cdf0e10cSrcweir if ( m_pEmbedDocument ) 961cdf0e10cSrcweir m_pEmbedDocument->AddRef(); 962cdf0e10cSrcweir } 963cdf0e10cSrcweir 964cdf0e10cSrcweir LockedEmbedDocument_Impl::LockedEmbedDocument_Impl( const LockedEmbedDocument_Impl& aDocLock ) 965cdf0e10cSrcweir : m_pEmbedDocument( aDocLock.m_pEmbedDocument ) 966cdf0e10cSrcweir { 967cdf0e10cSrcweir if ( m_pEmbedDocument ) 968cdf0e10cSrcweir m_pEmbedDocument->AddRef(); 969cdf0e10cSrcweir } 970cdf0e10cSrcweir 971cdf0e10cSrcweir LockedEmbedDocument_Impl& LockedEmbedDocument_Impl::operator=( const LockedEmbedDocument_Impl& aDocLock ) 972cdf0e10cSrcweir { 973cdf0e10cSrcweir if ( m_pEmbedDocument ) 974cdf0e10cSrcweir m_pEmbedDocument->Release(); 975cdf0e10cSrcweir 976cdf0e10cSrcweir m_pEmbedDocument = aDocLock.m_pEmbedDocument; 977cdf0e10cSrcweir if ( m_pEmbedDocument ) 978cdf0e10cSrcweir m_pEmbedDocument->AddRef(); 979cdf0e10cSrcweir 980cdf0e10cSrcweir return *this; 981cdf0e10cSrcweir } 982cdf0e10cSrcweir 983cdf0e10cSrcweir LockedEmbedDocument_Impl::~LockedEmbedDocument_Impl() 984cdf0e10cSrcweir { 985cdf0e10cSrcweir if ( m_pEmbedDocument ) 986cdf0e10cSrcweir m_pEmbedDocument->Release(); 987cdf0e10cSrcweir } 988cdf0e10cSrcweir 989cdf0e10cSrcweir void LockedEmbedDocument_Impl::ExecuteMethod( sal_Int16 nId ) 990cdf0e10cSrcweir { 991cdf0e10cSrcweir if ( m_pEmbedDocument ) 992cdf0e10cSrcweir { 993cdf0e10cSrcweir if ( nId == OLESERV_SAVEOBJECT ) 994cdf0e10cSrcweir m_pEmbedDocument->SaveObject(); 995cdf0e10cSrcweir else if ( nId == OLESERV_CLOSE ) 996cdf0e10cSrcweir m_pEmbedDocument->Close( 0 ); 997cdf0e10cSrcweir else if ( nId == OLESERV_NOTIFY ) 998cdf0e10cSrcweir m_pEmbedDocument->notify(); 999cdf0e10cSrcweir else if ( nId == OLESERV_NOTIFYCLOSING ) 1000cdf0e10cSrcweir m_pEmbedDocument->OLENotifyClosing(); 1001cdf0e10cSrcweir else if ( nId == OLESERV_SHOWOBJECT ) 1002cdf0e10cSrcweir m_pEmbedDocument->ShowObject(); 1003cdf0e10cSrcweir else if ( nId == OLESERV_DEACTIVATE ) 1004cdf0e10cSrcweir m_pEmbedDocument->Deactivate(); 1005cdf0e10cSrcweir } 1006cdf0e10cSrcweir } 1007cdf0e10cSrcweir 1008cdf0e10cSrcweir // Fix strange warnings about some 1009cdf0e10cSrcweir // ATL::CAxHostWindow::QueryInterface|AddRef|Releae functions. 1010cdf0e10cSrcweir // warning C4505: 'xxx' : unreferenced local function has been removed 1011cdf0e10cSrcweir #if defined(_MSC_VER) 1012cdf0e10cSrcweir #pragma warning(disable: 4505) 1013cdf0e10cSrcweir #endif 1014cdf0e10cSrcweir 1015