/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ /* * This file is part of the LibreOffice project. * * This Source Code Form is subject to the terms of the Mozilla Public * License, v. 2.0. If a copy of the MPL was not distributed with this * file, You can obtain one at http://mozilla.org/MPL/2.0/. * * This file incorporates work covered by the following license notice: * * Licensed to the Apache Software Foundation (ASF) under one or more * contributor license agreements. See the NOTICE file distributed * with this work for additional information regarding copyright * ownership. The ASF licenses this file to you under the Apache * License, Version 2.0 (the "License"); you may not use this file * except in compliance with the License. You may obtain a copy of * the License at http://www.apache.org/licenses/LICENSE-2.0 . */ #include #include #include #include #include #include #include #include #include #include #include #include "platform.h" #include #include #include #include "xdialogcreator.hxx" #include "oleembobj.hxx" #include #include #ifdef WNT #include class InitializedOleGuard { public: InitializedOleGuard() { if ( !SUCCEEDED( OleInitialize( NULL ) ) ) throw ::com::sun::star::uno::RuntimeException(); } ~InitializedOleGuard() { OleUninitialize(); } }; extern "C" { typedef UINT STDAPICALLTYPE OleUIInsertObjectA_Type(LPOLEUIINSERTOBJECTA); } #endif using namespace ::com::sun::star; using namespace ::comphelper; uno::Sequence< sal_Int8 > GetRelatedInternalID_Impl( const uno::Sequence< sal_Int8 >& aClassID ) { // Writer if ( MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SW_OLE_EMBED_CLASSID_60 ) ) || MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SW_OLE_EMBED_CLASSID_8 ) ) ) return MimeConfigurationHelper::GetSequenceClassID( SO3_SW_CLASSID_60 ); // Calc if ( MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SC_OLE_EMBED_CLASSID_60 ) ) || MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SC_OLE_EMBED_CLASSID_8 ) ) ) return MimeConfigurationHelper::GetSequenceClassID( SO3_SC_CLASSID_60 ); // Impress if ( MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SIMPRESS_OLE_EMBED_CLASSID_60 ) ) || MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SIMPRESS_OLE_EMBED_CLASSID_8 ) ) ) return MimeConfigurationHelper::GetSequenceClassID( SO3_SIMPRESS_CLASSID_60 ); // Draw if ( MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SDRAW_OLE_EMBED_CLASSID_60 ) ) || MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SDRAW_OLE_EMBED_CLASSID_8 ) ) ) return MimeConfigurationHelper::GetSequenceClassID( SO3_SDRAW_CLASSID_60 ); // Chart if ( MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SCH_OLE_EMBED_CLASSID_60 ) ) || MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SCH_OLE_EMBED_CLASSID_8 ) ) ) return MimeConfigurationHelper::GetSequenceClassID( SO3_SCH_CLASSID_60 ); // Math if ( MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SM_OLE_EMBED_CLASSID_60 ) ) || MimeConfigurationHelper::ClassIDsEqual( aClassID, MimeConfigurationHelper::GetSequenceClassID( SO3_SM_OLE_EMBED_CLASSID_8 ) ) ) return MimeConfigurationHelper::GetSequenceClassID( SO3_SM_CLASSID_60 ); return aClassID; } uno::Sequence< OUString > SAL_CALL MSOLEDialogObjectCreator::impl_staticGetSupportedServiceNames() { uno::Sequence< OUString > aRet(2); aRet[0] = "com.sun.star.embed.MSOLEObjectSystemCreator"; aRet[1] = "com.sun.star.comp.embed.MSOLEObjectSystemCreator"; return aRet; } OUString SAL_CALL MSOLEDialogObjectCreator::impl_staticGetImplementationName() { return OUString("com.sun.star.comp.embed.MSOLEObjectSystemCreator"); } uno::Reference< uno::XInterface > SAL_CALL MSOLEDialogObjectCreator::impl_staticCreateSelfInstance( const uno::Reference< lang::XMultiServiceFactory >& xServiceManager ) { return uno::Reference< uno::XInterface >( *new MSOLEDialogObjectCreator( xServiceManager ) ); } embed::InsertedObjectInfo SAL_CALL MSOLEDialogObjectCreator::createInstanceByDialog( const uno::Reference< embed::XStorage >& xStorage, const OUString& sEntName, const uno::Sequence< beans::PropertyValue >& aInObjArgs ) throw ( lang::IllegalArgumentException, io::IOException, uno::Exception, uno::RuntimeException ) { embed::InsertedObjectInfo aObjectInfo; uno::Sequence< beans::PropertyValue > aObjArgs( aInObjArgs ); #ifdef WNT if ( !xStorage.is() ) throw lang::IllegalArgumentException( "No parent storage is provided!", static_cast< ::cppu::OWeakObject* >(this), 1 ); if ( !sEntName.getLength() ) throw lang::IllegalArgumentException( "Empty element name is provided!", static_cast< ::cppu::OWeakObject* >(this), 2 ); InitializedOleGuard aGuard; OLEUIINSERTOBJECT io; char szFile[MAX_PATH]; UINT uTemp; memset(&io, 0, sizeof(io)); io.cbStruct = sizeof(io); io.hWndOwner = GetActiveWindow(); szFile[0] = 0; io.lpszFile = szFile; io.cchFile = MAX_PATH; io.dwFlags = IOF_SELECTCREATENEW | IOF_DISABLELINK; ::osl::Module aOleDlgLib; if( !aOleDlgLib.load( OUString( "oledlg" ) )) throw uno::RuntimeException(); OleUIInsertObjectA_Type * pInsertFct = (OleUIInsertObjectA_Type *) aOleDlgLib.getSymbol( OUString( "OleUIInsertObjectA" )); if( !pInsertFct ) throw uno::RuntimeException(); uTemp=pInsertFct(&io); if ( OLEUI_OK == uTemp ) { if (io.dwFlags & IOF_SELECTCREATENEW) { uno::Reference< embed::XEmbeddedObjectCreator > xEmbCreator = embed::EmbeddedObjectCreator::create( comphelper::getComponentContext(m_xFactory) ); uno::Sequence< sal_Int8 > aClassID = MimeConfigurationHelper::GetSequenceClassID( io.clsid.Data1, io.clsid.Data2, io.clsid.Data3, io.clsid.Data4[0], io.clsid.Data4[1], io.clsid.Data4[2], io.clsid.Data4[3], io.clsid.Data4[4], io.clsid.Data4[5], io.clsid.Data4[6], io.clsid.Data4[7] ); aClassID = GetRelatedInternalID_Impl( aClassID ); //TODO: retrieve ClassName OUString aClassName; aObjectInfo.Object = uno::Reference< embed::XEmbeddedObject >( xEmbCreator->createInstanceInitNew( aClassID, aClassName, xStorage, sEntName, aObjArgs ), uno::UNO_QUERY ); } else { OUString aFileName = OStringToOUString( OString( szFile ), osl_getThreadTextEncoding() ); OUString aFileURL; if ( osl::FileBase::getFileURLFromSystemPath( aFileName, aFileURL ) != osl::FileBase::E_None ) throw uno::RuntimeException(); uno::Sequence< beans::PropertyValue > aMediaDescr( 1 ); aMediaDescr[0].Name = "URL"; aMediaDescr[0].Value <<= aFileURL; // TODO: use config helper for type detection uno::Reference< embed::XEmbeddedObjectCreator > xEmbCreator; ::comphelper::MimeConfigurationHelper aHelper( comphelper::getComponentContext(m_xFactory) ); if ( aHelper.AddFilterNameCheckOwnFile( aMediaDescr ) ) xEmbCreator = embed::EmbeddedObjectCreator::create( comphelper::getComponentContext(m_xFactory) ); else xEmbCreator = embed::OLEEmbeddedObjectFactory::create( comphelper::getComponentContext(m_xFactory) ); if ( !xEmbCreator.is() ) throw uno::RuntimeException(); aObjectInfo.Object = uno::Reference< embed::XEmbeddedObject >( xEmbCreator->createInstanceInitFromMediaDescriptor( xStorage, sEntName, aMediaDescr, aObjArgs ), uno::UNO_QUERY ); } if ( ( io.dwFlags & IOF_CHECKDISPLAYASICON) && io.hMetaPict != NULL ) { METAFILEPICT* pMF = ( METAFILEPICT* )GlobalLock( io.hMetaPict ); if ( pMF ) { sal_uInt32 nBufSize = GetMetaFileBitsEx( pMF->hMF, 0, NULL ); uno::Sequence< sal_Int8 > aMetafile( nBufSize + 22 ); sal_uInt8* pBuf = (sal_uInt8*)( aMetafile.getArray() ); *( (long* )pBuf ) = 0x9ac6cdd7L; *( (short* )( pBuf+6 )) = ( SHORT ) 0; *( (short* )( pBuf+8 )) = ( SHORT ) 0; *( (short* )( pBuf+10 )) = ( SHORT ) pMF->xExt; *( (short* )( pBuf+12 )) = ( SHORT ) pMF->yExt; *( (short* )( pBuf+14 )) = ( USHORT ) 2540; if ( nBufSize && nBufSize == GetMetaFileBitsEx( pMF->hMF, nBufSize, pBuf+22 ) ) { datatransfer::DataFlavor aFlavor( OUString( "application/x-openoffice-wmf;windows_formatname=\"Image WMF\"" ), OUString( "Image WMF" ), getCppuType( ( const uno::Sequence< sal_Int8 >* ) 0 ) ); aObjectInfo.Options.realloc( 2 ); aObjectInfo.Options[0].Name = "Icon"; aObjectInfo.Options[0].Value <<= aMetafile; aObjectInfo.Options[1].Name = "IconFormat"; aObjectInfo.Options[1].Value <<= aFlavor; } GlobalUnlock( io.hMetaPict ); } } } else throw ucb::CommandAbortedException(); OSL_ENSURE( aObjectInfo.Object.is(), "No object was created!\n" ); if ( !aObjectInfo.Object.is() ) throw uno::RuntimeException(); return aObjectInfo; #else throw lang::NoSupportException(); // TODO: #endif } embed::InsertedObjectInfo SAL_CALL MSOLEDialogObjectCreator::createInstanceInitFromClipboard( const uno::Reference< embed::XStorage >& xStorage, const OUString& sEntryName, const uno::Sequence< beans::PropertyValue >& aObjectArgs ) throw ( lang::IllegalArgumentException, io::IOException, uno::Exception, uno::RuntimeException ) { embed::InsertedObjectInfo aObjectInfo; #ifdef WNT if ( !xStorage.is() ) throw lang::IllegalArgumentException( "No parent storage is provided!", static_cast< ::cppu::OWeakObject* >(this), 1 ); if ( !sEntryName.getLength() ) throw lang::IllegalArgumentException( "Empty element name is provided!", static_cast< ::cppu::OWeakObject* >(this), 2 ); uno::Reference< embed::XEmbeddedObject > xResult( static_cast< ::cppu::OWeakObject* > ( new OleEmbeddedObject( m_xFactory ) ), uno::UNO_QUERY ); uno::Reference< embed::XEmbedPersist > xPersist( xResult, uno::UNO_QUERY ); if ( !xPersist.is() ) throw uno::RuntimeException(); // TODO: the interface must be supported by own document objects xPersist->setPersistentEntry( xStorage, sEntryName, embed::EntryInitModes::DEFAULT_INIT, uno::Sequence< beans::PropertyValue >(), aObjectArgs ); aObjectInfo.Object = xResult; // TODO/LATER: in case of iconifie object the icon should be stored in aObjectInfo OSL_ENSURE( aObjectInfo.Object.is(), "No object was created!\n" ); if ( !aObjectInfo.Object.is() ) throw uno::RuntimeException(); return aObjectInfo; #else throw lang::NoSupportException(); // TODO: #endif } OUString SAL_CALL MSOLEDialogObjectCreator::getImplementationName() throw ( uno::RuntimeException ) { return impl_staticGetImplementationName(); } sal_Bool SAL_CALL MSOLEDialogObjectCreator::supportsService( const OUString& ServiceName ) throw ( uno::RuntimeException ) { return cppu::supportsService(this, ServiceName); } uno::Sequence< OUString > SAL_CALL MSOLEDialogObjectCreator::getSupportedServiceNames() throw ( uno::RuntimeException ) { return impl_staticGetSupportedServiceNames(); } /* vim:set shiftwidth=4 softtabstop=4 expandtab: */