blob: 111e6081a92928cb5e1d261fc6b7b0a7ffdaed52 [file] [log] [blame]
/**************************************************************
*
* 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
*
* Unless required by applicable law or agreed to in writing,
* software distributed under the License is distributed on an
* "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
* KIND, either express or implied. See the License for the
* specific language governing permissions and limitations
* under the License.
*
*************************************************************/
// MARKER(update_precomp.py): autogen include statement, do not remove
#include "precompiled_dbaccess.hxx"
#ifndef _DBAUI_LINKEDDOCUMENTS_HXX_
#include "linkeddocuments.hxx"
#endif
#ifndef _OSL_DIAGNOSE_H_
#include <osl/diagnose.h>
#endif
#include <tools/diagnose_ex.h>
#include <unotools/confignode.hxx>
#ifndef DBACCESS_SHARED_DBUSTRINGS_HRC
#include "dbustrings.hrc"
#endif
#include <comphelper/classids.hxx>
#ifndef COMPHELPER_NAMEDVALUECOLLECTION_HXX
#include <comphelper/namedvaluecollection.hxx>
#endif
#ifndef _COM_SUN_STAR_LANG_XSINGLESERVICEFACTORY_HPP_
#include <com/sun/star/lang/XSingleServiceFactory.hpp>
#endif
#ifndef _COM_SUN_STAR_FRAME_XDISPATCHPROVIDER_HPP_
#include <com/sun/star/frame/XDispatchProvider.hpp>
#endif
#ifndef _COM_SUN_STAR_FRAME_XCOMPONENTLOADER_HPP_
#include <com/sun/star/frame/XComponentLoader.hpp>
#endif
#ifndef _COM_SUN_STAR_UTIL_URL_HPP_
#include <com/sun/star/util/URL.hpp>
#endif
#ifndef _COM_SUN_STAR_FRAME_FRAMESEARCHFLAG_HPP_
#include <com/sun/star/frame/FrameSearchFlag.hpp>
#endif
#ifndef _COM_SUN_STAR_CONTAINER_XNAMECONTAINER_HPP_
#include <com/sun/star/container/XNameContainer.hpp>
#endif
#ifndef _COM_SUN_STAR_UCB_XCOMMANDPROCESSOR_HPP_
#include <com/sun/star/ucb/XCommandProcessor.hpp>
#endif
#ifndef _COM_SUN_STAR_UCB_OPENCOMMANDARGUMENT_HPP_
#include <com/sun/star/ucb/OpenCommandArgument.hpp>
#endif
#ifndef _COM_SUN_STAR_UCB_OPENMODE_HPP_
#include <com/sun/star/ucb/OpenMode.hpp>
#endif
#ifndef _COM_SUN_STAR_TASK_XJOBEXECUTOR_HPP_
#include <com/sun/star/task/XJobExecutor.hpp>
#endif
#ifndef _COMPHELPER_EXTRACT_HXX_
#include <comphelper/extract.hxx>
#endif
#ifndef _COMPHELPER_TYPES_HXX_
#include <comphelper/types.hxx>
#endif
#ifndef _SV_MSGBOX_HXX
#include <vcl/msgbox.hxx>
#endif
#ifndef _UCBHELPER_CONTENT_HXX
#include <ucbhelper/content.hxx>
#endif
#ifndef _DBU_MISC_HRC_
#include "dbu_misc.hrc"
#endif
#ifndef SVTOOLS_FILENOTATION_HXX_
#include <svl/filenotation.hxx>
#endif
#ifndef DBACCESS_UI_BROWSER_ID_HXX
#include "browserids.hxx"
#endif
#ifndef _SFXNEW_HXX
#include <sfx2/new.hxx>
#endif
#ifndef _SVTOOLS_TEMPLDLG_HXX
#include <svtools/templdlg.hxx>
#endif
#ifndef _DBAUI_MODULE_DBU_HXX_
#include "moduledbu.hxx"
#endif
// -----------------
// for calling basic
#ifndef _SFXAPP_HXX
#include <sfx2/app.hxx>
#endif
#ifndef _SBXCLASS_HXX
#include <basic/sbx.hxx>
#endif
#ifndef _SB_SBUNO_HXX
#include <basic/sbuno.hxx>
#endif
#ifndef _EHDL_HXX
#include <svtools/ehdl.hxx>
#endif
#ifndef _SVX_DATACCESSDESCRIPTOR_HXX_
#include <svx/dataaccessdescriptor.hxx>
#endif
#ifndef _COM_SUN_STAR_CONTAINER_XHIERARCHICALNAMECONTAINER_HPP_
#include <com/sun/star/container/XHierarchicalNameContainer.hpp>
#endif
#ifndef _SV_WAITOBJ_HXX
#include <vcl/waitobj.hxx>
#endif
#ifndef _COMPHELPER_MIMECONFIGHELPER_HXX_
#include <comphelper/mimeconfighelper.hxx>
#endif
#include <cppuhelper/exc_hlp.hxx>
#include <connectivity/dbtools.hxx>
#include <toolkit/helper/vclunohelper.hxx>
#include <com/sun/star/io/WrongFormatException.hpp>
#include "com/sun/star/sdb/RowSetVetoException.hpp"
//......................................................................
namespace dbaui
{
//......................................................................
using namespace ::com::sun::star::uno;
using namespace ::com::sun::star::container;
using namespace ::com::sun::star::lang;
using namespace ::com::sun::star::frame;
using namespace ::com::sun::star::beans;
using namespace ::com::sun::star::util;
using namespace ::com::sun::star::ucb;
using namespace ::com::sun::star::sdbc;
using namespace ::com::sun::star::sdb::application;
using namespace ::com::sun::star::task;
using namespace ::svt;
namespace
{
Sequence< sal_Int8 > lcl_GetSequenceClassID( sal_uInt32 n1, sal_uInt16 n2, sal_uInt16 n3,
sal_uInt8 b8, sal_uInt8 b9, sal_uInt8 b10, sal_uInt8 b11,
sal_uInt8 b12, sal_uInt8 b13, sal_uInt8 b14, sal_uInt8 b15 )
{
Sequence< sal_Int8 > aResult( 16 );
aResult[0] = static_cast<sal_Int8>(n1 >> 24);
aResult[1] = static_cast<sal_Int8>(( n1 << 8 ) >> 24);
aResult[2] = static_cast<sal_Int8>(( n1 << 16 ) >> 24);
aResult[3] = static_cast<sal_Int8>(( n1 << 24 ) >> 24);
aResult[4] = static_cast<sal_Int8>(n2 >> 8);
aResult[5] = static_cast<sal_Int8>(( n2 << 8 ) >> 8);
aResult[6] = static_cast<sal_Int8>(n3 >> 8);
aResult[7] = static_cast<sal_Int8>(( n3 << 8 ) >> 8);
aResult[8] = b8;
aResult[9] = b9;
aResult[10] = b10;
aResult[11] = b11;
aResult[12] = b12;
aResult[13] = b13;
aResult[14] = b14;
aResult[15] = b15;
return aResult;
}
}
//==================================================================
//= OLinkedDocumentsAccess
//==================================================================
DBG_NAME(OLinkedDocumentsAccess)
//------------------------------------------------------------------
OLinkedDocumentsAccess::OLinkedDocumentsAccess( Window* _pDialogParent, const Reference< XDatabaseDocumentUI >& i_rDocumentUI,
const Reference< XMultiServiceFactory >& _rxORB, const Reference< XNameAccess >& _rxContainer,
const Reference< XConnection>& _xConnection, const ::rtl::OUString& _sDataSourceName )
:m_xORB(_rxORB)
,m_xDocumentContainer(_rxContainer)
,m_xConnection(_xConnection)
,m_xDocumentUI( i_rDocumentUI )
,m_pDialogParent(_pDialogParent)
,m_sDataSourceName(_sDataSourceName)
{
DBG_CTOR(OLinkedDocumentsAccess,NULL);
OSL_ENSURE(m_xORB.is(), "OLinkedDocumentsAccess::OLinkedDocumentsAccess: invalid service factory!");
OSL_ENSURE(m_pDialogParent, "OLinkedDocumentsAccess::OLinkedDocumentsAccess: really need a dialog parent!");
}
//------------------------------------------------------------------
OLinkedDocumentsAccess::~OLinkedDocumentsAccess()
{
DBG_DTOR(OLinkedDocumentsAccess,NULL);
}
//------------------------------------------------------------------
Reference< XComponent> OLinkedDocumentsAccess::impl_open( const ::rtl::OUString& _rLinkName, Reference< XComponent >& _xDefinition,
ElementOpenMode _eOpenMode, const ::comphelper::NamedValueCollection& _rAdditionalArgs )
{
Reference< XComponent> xRet;
OSL_ENSURE(m_xDocumentContainer.is(), "OLinkedDocumentsAccess::OLinkedDocumentsAccess: invalid document container!");
Reference< XComponentLoader > xComponentLoader(m_xDocumentContainer,UNO_QUERY);
if ( !xComponentLoader.is() )
return xRet;
WaitObject aWaitCursor( m_pDialogParent );
::comphelper::NamedValueCollection aArguments;
::rtl::OUString sOpenMode;
switch ( _eOpenMode )
{
case E_OPEN_NORMAL:
sOpenMode = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "open" ) );
break;
case E_OPEN_FOR_MAIL:
aArguments.put( "Hidden", true );
// fall through
case E_OPEN_DESIGN:
sOpenMode = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "openDesign" ) );
break;
default:
OSL_ENSURE( false, "OLinkedDocumentsAccess::implOpen: invalid open mode!" );
break;
}
aArguments.put( "OpenMode", sOpenMode );
aArguments.put( (::rtl::OUString)PROPERTY_ACTIVE_CONNECTION, m_xConnection );
try
{
Reference<XHierarchicalNameContainer> xHier(m_xDocumentContainer,UNO_QUERY);
if ( xHier.is() && xHier->hasByHierarchicalName(_rLinkName) )
{
_xDefinition.set(xHier->getByHierarchicalName(_rLinkName),UNO_QUERY);
}
aArguments.merge( _rAdditionalArgs, true );
xRet = xComponentLoader->loadComponentFromURL( _rLinkName, ::rtl::OUString(), 0, aArguments.getPropertyValues() );
}
catch(Exception& e)
{
(void)e;
throw;
}
return xRet;
}
//------------------------------------------------------------------
void OLinkedDocumentsAccess::impl_newWithPilot( const char* _pWizardService,
const sal_Int32 _nCommandType, const ::rtl::OUString& _rObjectName )
{
try
{
::comphelper::NamedValueCollection aArgs;
aArgs.put( "DataSourceName", m_sDataSourceName );
if ( m_xConnection.is() )
aArgs.put( "ActiveConnection", m_xConnection );
if ( _rObjectName.getLength() && ( _nCommandType != -1 ) )
{
aArgs.put( "CommandType", _nCommandType );
aArgs.put( "Command", _rObjectName );
}
aArgs.put( "DocumentUI", m_xDocumentUI );
Reference< XJobExecutor > xWizard;
{
WaitObject aWaitCursor( m_pDialogParent );
xWizard.set( m_xORB->createInstanceWithArguments(
::rtl::OUString::createFromAscii( _pWizardService ),
aArgs.getWrappedPropertyValues()
), UNO_QUERY_THROW );
}
xWizard->trigger( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "start" ) ) );
::comphelper::disposeComponent( xWizard );
}
catch(const Exception& e)
{
DBG_UNHANDLED_EXCEPTION();
}
}
//------------------------------------------------------------------
void OLinkedDocumentsAccess::newFormWithPilot( const sal_Int32 _nCommandType,const ::rtl::OUString& _rObjectName )
{
impl_newWithPilot( "com.sun.star.wizards.form.CallFormWizard", _nCommandType, _rObjectName );
}
//------------------------------------------------------------------
void OLinkedDocumentsAccess::newReportWithPilot( const sal_Int32 _nCommandType, const ::rtl::OUString& _rObjectName )
{
impl_newWithPilot( "com.sun.star.wizards.report.CallReportWizard", _nCommandType, _rObjectName );
}
//------------------------------------------------------------------
void OLinkedDocumentsAccess::newTableWithPilot()
{
impl_newWithPilot( "com.sun.star.wizards.table.CallTableWizard", -1, ::rtl::OUString() );
}
//------------------------------------------------------------------
void OLinkedDocumentsAccess::newQueryWithPilot()
{
impl_newWithPilot( "com.sun.star.wizards.query.CallQueryWizard", -1, ::rtl::OUString() );
}
//------------------------------------------------------------------
Reference< XComponent > OLinkedDocumentsAccess::newDocument( sal_Int32 i_nActionID,
const ::comphelper::NamedValueCollection& i_rCreationArgs, Reference< XComponent >& o_rDefinition )
{
OSL_ENSURE(m_xDocumentContainer.is(), "OLinkedDocumentsAccess::newDocument: invalid document container!");
// determine the class ID to use for the new document
Sequence<sal_Int8> aClassId;
if ( !i_rCreationArgs.has( "ClassID" )
&& !i_rCreationArgs.has( "MediaType" )
&& !i_rCreationArgs.has( "DocumentServiceName" )
)
{
switch ( i_nActionID )
{
case ID_FORM_NEW_TEXT:
aClassId = lcl_GetSequenceClassID(SO3_SW_CLASSID);
OSL_ENSURE(aClassId == comphelper::MimeConfigurationHelper::GetSequenceClassID(SO3_SW_CLASSID),"Not equal");
break;
case ID_FORM_NEW_CALC:
aClassId = lcl_GetSequenceClassID(SO3_SC_CLASSID);
break;
case ID_FORM_NEW_IMPRESS:
aClassId = lcl_GetSequenceClassID(SO3_SIMPRESS_CLASSID);
break;
case ID_REPORT_NEW_TEXT:
aClassId = comphelper::MimeConfigurationHelper::GetSequenceClassID(SO3_RPT_CLASSID_90);
break;
default:
OSL_ENSURE( sal_False, "OLinkedDocumentsAccess::newDocument: please use newFormWithPilot!" );
return Reference< XComponent >();
}
}
// load the document as template
Reference< XComponent > xNewDocument;
try
{ // get the desktop object
Reference<XMultiServiceFactory> xORB(m_xDocumentContainer,UNO_QUERY);
if ( xORB.is() )
{
::comphelper::NamedValueCollection aCreationArgs( i_rCreationArgs );
if ( aClassId.getLength() )
aCreationArgs.put( "ClassID", aClassId );
aCreationArgs.put( (::rtl::OUString)PROPERTY_ACTIVE_CONNECTION, m_xConnection );
// separate values which are real creation args from args relevant for opening the doc
::comphelper::NamedValueCollection aCommandArgs;
if ( aCreationArgs.has( "Hidden" ) )
{
aCommandArgs.put( "Hidden", aCreationArgs.get( "Hidden" ) );
aCreationArgs.remove( "Hidden" );
}
Reference< XCommandProcessor > xContent( xORB->createInstanceWithArguments(
SERVICE_SDB_DOCUMENTDEFINITION,
aCreationArgs.getWrappedPropertyValues()
),
UNO_QUERY_THROW
);
o_rDefinition.set( xContent, UNO_QUERY );
// put the OpenMode into the OpenArgs
OpenCommandArgument aOpenModeArg;
aOpenModeArg.Mode = OpenMode::DOCUMENT;
aCommandArgs.put( "OpenMode", aOpenModeArg );
Command aCommand;
aCommand.Name = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "openDesign" ) );
aCommand.Argument <<= aCommandArgs.getPropertyValues();
WaitObject aWaitCursor( m_pDialogParent );
xNewDocument.set( xContent->execute( aCommand, xContent->createCommandIdentifier(), NULL ), UNO_QUERY );
}
}
catch(const Exception& )
{
DBG_UNHANDLED_EXCEPTION();
}
return xNewDocument;
}
//------------------------------------------------------------------
Reference< XComponent > OLinkedDocumentsAccess::open( const ::rtl::OUString& _rLinkName, Reference< XComponent >& _xDefinition,
ElementOpenMode _eOpenMode, const ::comphelper::NamedValueCollection& _rAdditionalArgs )
{
dbtools::SQLExceptionInfo aInfo;
Reference< XComponent > xRet;
try
{
xRet = impl_open( _rLinkName, _xDefinition, _eOpenMode, _rAdditionalArgs );
if ( !xRet.is() )
{
String sMessage = String(ModuleRes(STR_COULDNOTOPEN_LINKEDDOC));
sMessage.SearchAndReplaceAscii("$file$",_rLinkName);
com::sun::star::sdbc::SQLException aSQLException;
aSQLException.Message = sMessage;
// aSQLException.Context = e.Context;
aInfo = dbtools::SQLExceptionInfo(aSQLException);
}
return xRet;
}
catch (com::sun::star::io::WrongFormatException e)
{
com::sun::star::sdbc::SQLException aSQLException;
aSQLException.Message = e.Message;
aSQLException.Context = e.Context;
aInfo = dbtools::SQLExceptionInfo(aSQLException);
// more like a hack, insert an empty message
String sText( ModuleRes( RID_STR_EXTENSION_NOT_PRESENT ) );
sText.SearchAndReplaceAscii("$file$",_rLinkName);
aInfo.prepend(sText);
String sMessage = String(ModuleRes(STR_COULDNOTOPEN_LINKEDDOC));
sMessage.SearchAndReplaceAscii("$file$",_rLinkName);
aInfo.prepend(sMessage);
}
catch(Exception& e)
{
Any aAny = ::cppu::getCaughtException();
com::sun::star::sdbc::SQLException a;
if ( !(aAny >>= a) || (a.ErrorCode != dbtools::ParameterInteractionCancelled) )
{
com::sun::star::sdbc::SQLException aSQLException;
aSQLException.Message = e.Message;
aSQLException.Context = e.Context;
aInfo = dbtools::SQLExceptionInfo(aSQLException);
// more like a hack, insert an empty message
aInfo.prepend(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" \n")));
String sMessage = String(ModuleRes(STR_COULDNOTOPEN_LINKEDDOC));
sMessage.SearchAndReplaceAscii("$file$",_rLinkName);
aInfo.prepend(sMessage);
}
}
if (aInfo.isValid())
{
showError(aInfo, VCLUnoHelper::GetInterface(m_pDialogParent), m_xORB );
}
return xRet;
}
//......................................................................
} // namespace dbaui
//......................................................................