diff options
Diffstat (limited to 'dbaccess/source/ui/dlg/ConnectionHelper.cxx')
| -rw-r--r-- | dbaccess/source/ui/dlg/ConnectionHelper.cxx | 905 |
1 files changed, 905 insertions, 0 deletions
diff --git a/dbaccess/source/ui/dlg/ConnectionHelper.cxx b/dbaccess/source/ui/dlg/ConnectionHelper.cxx new file mode 100644 index 000000000000..d2f87d016152 --- /dev/null +++ b/dbaccess/source/ui/dlg/ConnectionHelper.cxx @@ -0,0 +1,905 @@ +/* -*- 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 + * <http://www.openoffice.org/license.html> + * for a copy of the LGPLv3 License. + * + ************************************************************************/ + +// MARKER(update_precomp.py): autogen include statement, do not remove +#include "precompiled_dbaccess.hxx" + +#include "dsnItem.hxx" +#include "ConnectionHelper.hxx" +#include "AutoControls.hrc" +#include "dbu_dlg.hrc" +#include "dbu_misc.hrc" +#include <svl/itemset.hxx> +#include <unotools/moduleoptions.hxx> +#include <sfx2/fcontnr.hxx> +#include <unotools/pathoptions.hxx> +#include <svl/stritem.hxx> +#include <svl/eitem.hxx> +#include <svl/intitem.hxx> +#include "dsitems.hxx" +#include "dbaccess_helpid.hrc" +#include "localresaccess.hxx" +#include <osl/process.h> +#include <osl/diagnose.h> +#include <vcl/msgbox.hxx> +#include <sfx2/filedlghelper.hxx> +#include "dbadmin.hxx" +#include <comphelper/types.hxx> +#include <vcl/stdtext.hxx> +#include "sqlmessage.hxx" +#include "odbcconfig.hxx" +#include "dsselect.hxx" +#include <svl/filenotation.hxx> +#include "dbustrings.hrc" +#include <com/sun/star/ui/dialogs/XFolderPicker.hpp> +#include <com/sun/star/sdbc/XRow.hpp> +#include <com/sun/star/awt/XWindow.hpp> +#include <com/sun/star/task/XInteractionHandler.hpp> +#include <com/sun/star/ucb/XProgressHandler.hpp> +#include "UITools.hxx" +#include <unotools/localfilehelper.hxx> +#include <unotools/ucbhelper.hxx> +#include <ucbhelper/commandenvironment.hxx> +#include "finteraction.hxx" +#include <connectivity/CommonTools.hxx> +#include <tools/urlobj.hxx> +#include <tools/diagnose_ex.h> +#include <sfx2/docfilt.hxx> +#if !defined(WINDOWS_VISTA_PSDK) && defined(WNT) +#define _ADO_DATALINK_BROWSE_ +#endif + +#ifdef _ADO_DATALINK_BROWSE_ +#include <vcl/sysdata.hxx> +#include "adodatalinks.hxx" +#endif //_ADO_DATALINK_BROWSE_ + +#include <com/sun/star/mozilla/XMozillaBootstrap.hpp> +#include <unotools/processfactory.hxx> + + + +//......................................................................... +namespace dbaui +{ +//......................................................................... + using namespace ::com::sun::star::uno; + using namespace ::com::sun::star::ucb; + using namespace ::com::sun::star::ui::dialogs; + using namespace ::com::sun::star::sdbc; + using namespace ::com::sun::star::beans; + using namespace ::com::sun::star::lang; + using namespace ::com::sun::star::container; + using namespace ::com::sun::star::mozilla; + using namespace ::dbtools; + using namespace ::svt; + + +DBG_NAME(OConnectionHelper) + + OConnectionHelper::OConnectionHelper( Window* pParent, const ResId& _rId, const SfxItemSet& _rCoreAttrs) + :OGenericAdministrationPage(pParent, _rId, _rCoreAttrs) + ,m_aFT_Connection ( this, ResId( FT_AUTOBROWSEURL, *_rId.GetResMgr() ) ) + ,m_aConnectionURL ( this, ResId( ET_AUTOBROWSEURL, *_rId.GetResMgr() ) ) + ,m_aPB_Connection ( this, ResId( PB_AUTOBROWSEURL, *_rId.GetResMgr() ) ) + { + DBG_CTOR(OConnectionHelper,NULL); + + // extract the datasource type collection from the item set + DbuTypeCollectionItem* pCollectionItem = PTR_CAST(DbuTypeCollectionItem, _rCoreAttrs.GetItem(DSID_TYPECOLLECTION)); + if (pCollectionItem) + m_pCollection = pCollectionItem->getCollection(); + m_aPB_Connection.SetClickHdl(LINK(this, OConnectionHelper, OnBrowseConnections)); + OSL_ENSURE(m_pCollection, "OConnectionHelper::OConnectionHelper : really need a DSN type collection !"); + m_aConnectionURL.SetTypeCollection(m_pCollection); + } + + + OConnectionHelper::~OConnectionHelper() + { + + DBG_DTOR(OConnectionHelper,NULL); + } + + + // ----------------------------------------------------------------------- + void OConnectionHelper::implInitControls(const SfxItemSet& _rSet, sal_Bool _bSaveValue) + { + // check whether or not the selection is invalid or readonly (invalid implies readonly, but not vice versa) + sal_Bool bValid, bReadonly; + getFlags(_rSet, bValid, bReadonly); + + m_aFT_Connection.Show(); + m_aConnectionURL.Show(); + m_aConnectionURL.ShowPrefix( ::dbaccess::DST_JDBC == m_pCollection->determineType(m_eType) ); + + sal_Bool bEnableBrowseButton = m_pCollection->supportsBrowsing( m_eType ); + m_aPB_Connection.Show( bEnableBrowseButton ); + + SFX_ITEMSET_GET(_rSet, pUrlItem, SfxStringItem, DSID_CONNECTURL, sal_True); + + // forward the values to the controls + if ( bValid ) + { + String sUrl = pUrlItem->GetValue(); + setURL( sUrl ); + + checkTestConnection(); + m_aConnectionURL.ClearModifyFlag(); + } + + OGenericAdministrationPage::implInitControls(_rSet, _bSaveValue); + } + + // ----------------------------------------------------------------------- + void OConnectionHelper::implUpdateURLDependentStates() const + { + OSL_PRECOND( m_pAdminDialog, "OConnectionHelper::implUpdateURLDependentStates: no admin dialog!" ); + if ( !m_pAdminDialog ) + return; + + if ( m_pCollection->isFileSystemBased(m_eType) ) + m_pAdminDialog->enableConfirmSettings( getURLNoPrefix().Len() > 0 ); + } + + // ----------------------------------------------------------------------- + IMPL_LINK(OConnectionHelper, OnBrowseConnections, PushButton*, /*_pButton*/) + { + OSL_ENSURE(m_pAdminDialog,"No Admin dialog set! ->GPF"); + const ::dbaccess::DATASOURCE_TYPE eType = m_pCollection->determineType(m_eType); + switch ( eType ) + { + case ::dbaccess::DST_DBASE: + case ::dbaccess::DST_FLAT: + { + try + { + ::rtl::OUString sFolderPickerService(SERVICE_UI_FOLDERPICKER); + Reference< XFolderPicker > xFolderPicker(m_xORB->createInstance(sFolderPickerService), UNO_QUERY); + if (!xFolderPicker.is()) + { + ShowServiceNotAvailableError(GetParent(), sFolderPickerService, sal_True); + break; + } + + sal_Bool bDoBrowse = sal_False; + String sOldPath = getURLNoPrefix(); + do + { + if (sOldPath.Len()) + xFolderPicker->setDisplayDirectory(sOldPath); + if (0 == xFolderPicker->execute()) + // cancelled by the user + return 0L; + + sOldPath = xFolderPicker->getDirectory(); + switch (checkPathExistence(sOldPath)) + { + case RET_RETRY: + bDoBrowse = sal_True; + break; + case RET_CANCEL: + return 0L; + default: + break; + } + } + while (bDoBrowse); + + String sSelectedDirectory = xFolderPicker->getDirectory(); + INetURLObject aSelectedDirectory( sSelectedDirectory, INetURLObject::WAS_ENCODED, RTL_TEXTENCODING_UTF8 ); + + // for UI purpose, we don't want to have the path encoded + sSelectedDirectory = aSelectedDirectory.GetMainURL( INetURLObject::DECODE_WITH_CHARSET, RTL_TEXTENCODING_UTF8 ); + + setURLNoPrefix( sSelectedDirectory ); + SetRoadmapStateValue(sal_True); + callModifiedHdl(); + } + catch( const Exception& ) + { + DBG_UNHANDLED_EXCEPTION(); + } + } + break; + case ::dbaccess::DST_CALC: + { + SvtModuleOptions aModule; + ::sfx2::FileDialogHelper aFileDlg(WB_3DLOOK | WB_STDMODAL | WB_OPEN + ,aModule.GetFactoryEmptyDocumentURL(SvtModuleOptions::E_CALC) + ,SFX_FILTER_IMPORT); + askForFileName(aFileDlg); + } + break; + case ::dbaccess::DST_MSACCESS: + { + const ::rtl::OUString sExt(RTL_CONSTASCII_USTRINGPARAM("*.mdb")); + String sFilterName(ModuleRes (STR_MSACCESS_FILTERNAME)); + ::sfx2::FileDialogHelper aFileDlg(WB_3DLOOK | WB_STDMODAL | WB_OPEN); + aFileDlg.AddFilter(sFilterName,sExt); + aFileDlg.SetCurrentFilter(sFilterName); + askForFileName(aFileDlg); + } + break; + case ::dbaccess::DST_MSACCESS_2007: + { + const ::rtl::OUString sAccdb(RTL_CONSTASCII_USTRINGPARAM("*.accdb")); + String sFilterName2(ModuleRes (STR_MSACCESS_2007_FILTERNAME)); + ::sfx2::FileDialogHelper aFileDlg(WB_3DLOOK | WB_STDMODAL | WB_OPEN); + aFileDlg.AddFilter(sFilterName2,sAccdb); + aFileDlg.SetCurrentFilter(sFilterName2); + askForFileName(aFileDlg); + } + break; + case ::dbaccess::DST_ADABAS: + { + // collect all names from the config dir + // and all dir's of the DBWORK/wrk or DBROOT/wrk dir + // compare the names + + // collect the names of the installed databases + StringBag aInstalledDBs; + ::rtl::OUString sAdabasConfigDir,sAdabasWorkDir,sRootDir; + ::rtl::OUString sEnvVarName(RTL_CONSTASCII_USTRINGPARAM("DBWORK")); + rtl_uString* pDbVar = NULL; + if(osl_getEnvironment(sEnvVarName.pData,&pDbVar) == osl_Process_E_None && pDbVar) + { + sAdabasWorkDir = pDbVar; + String sURL; + utl::LocalFileHelper::ConvertPhysicalNameToURL(sAdabasWorkDir,sURL); + sAdabasWorkDir = sURL; + rtl_uString_release(pDbVar); + pDbVar = NULL; + } + + sEnvVarName = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("DBCONFIG")); + if(osl_getEnvironment(sEnvVarName.pData,&pDbVar) == osl_Process_E_None && pDbVar) + { + sAdabasConfigDir = pDbVar; + String sURL; + utl::LocalFileHelper::ConvertPhysicalNameToURL(sAdabasConfigDir,sURL); + sAdabasConfigDir = sURL; + rtl_uString_release(pDbVar); + pDbVar = NULL; + } + + sEnvVarName = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("DBROOT")); + if(osl_getEnvironment(sEnvVarName.pData,&pDbVar) == osl_Process_E_None && pDbVar) + { + sRootDir = pDbVar; + String sURL; + utl::LocalFileHelper::ConvertPhysicalNameToURL(sRootDir,sURL); + sRootDir = sURL; + rtl_uString_release(pDbVar); + pDbVar = NULL; + } + + sal_Bool bOldFashion = sAdabasConfigDir.getLength() && sAdabasWorkDir.getLength(); + + if(!bOldFashion) // we have a normal adabas installation + { // so we check the local database names in $DBROOT/config + sAdabasConfigDir = sRootDir; + sAdabasWorkDir = sRootDir; + } + + if(sAdabasConfigDir.getLength() && sAdabasWorkDir.getLength() && sRootDir.getLength()) + { + + aInstalledDBs = getInstalledAdabasDBs(sAdabasConfigDir,sAdabasWorkDir); + + if(!aInstalledDBs.size() && bOldFashion) + { + sAdabasConfigDir = sRootDir; + sAdabasWorkDir = sRootDir; + aInstalledDBs = getInstalledAdabasDBs(sAdabasConfigDir,sAdabasWorkDir); + } + + ODatasourceSelectDialog aSelector(GetParent(), aInstalledDBs, true,m_pItemSetHelper->getWriteOutputSet()); + if (RET_OK == aSelector.Execute()) + { + setURLNoPrefix(aSelector.GetSelected()); + SetRoadmapStateValue(sal_True); + callModifiedHdl(); + } + } + else + { + LocalResourceAccess aLocRes( PAGE_CONNECTION, RSC_TABPAGE ); + String sError = String(ModuleRes(STR_NO_ADABASE_DATASOURCES)); + ErrorBox aBox(this, WB_OK, sError); + aBox.Execute(); + } + } + break; + case ::dbaccess::DST_MYSQL_ODBC: + case ::dbaccess::DST_ODBC: + { + // collect all ODBC data source names + ::rtl::OUString sCurrDatasource = getURLNoPrefix(); + ::rtl::OUString sDataSource; + if ( getSelectedDataSource(sDataSource,sCurrDatasource) && sDataSource.getLength() ) + { + setURLNoPrefix(sDataSource); + SetRoadmapStateValue(sal_True); + callModifiedHdl(); + } + else + return 1L; + } + break; +#ifdef _ADO_DATALINK_BROWSE_ + case ::dbaccess::DST_ADO: + { + ::rtl::OUString sOldDataSource=getURLNoPrefix(); + ::rtl::OUString sNewDataSource; + HWND hWnd = GetParent()->GetSystemData()->hWnd; + sNewDataSource = getAdoDatalink((long)hWnd,sOldDataSource); + if ( sNewDataSource.getLength() ) + { + setURLNoPrefix(sNewDataSource); + SetRoadmapStateValue(sal_True); + callModifiedHdl(); + } + else + return 1L; + } + break; +#endif + case ::dbaccess::DST_MOZILLA: + case ::dbaccess::DST_THUNDERBIRD: + { + MozillaProductType profileType = MozillaProductType_Mozilla; + if (eType == ::dbaccess::DST_THUNDERBIRD) + profileType = MozillaProductType_Thunderbird; + + Reference<XMultiServiceFactory> xFactory = ::comphelper::getProcessServiceFactory(); + OSL_ENSURE( xFactory.is(), "can't get service factory" ); + + Reference<XInterface> xInstance = xFactory->createInstance(::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("com.sun.star.mozilla.MozillaBootstrap")) ); + OSL_ENSURE( xInstance.is(), "failed to create instance" ); + Reference<XMozillaBootstrap> xMozillaBootstrap = Reference<XMozillaBootstrap>(xInstance,UNO_QUERY); + OSL_ENSURE( xMozillaBootstrap.is(), "failed to create instance" ); + + if (xMozillaBootstrap.is()) + { + // collect all Mozilla Profiles + ::com::sun::star::uno::Sequence< ::rtl::OUString > list; + + xMozillaBootstrap->getProfileList( profileType, list ); + const ::rtl::OUString * pArray = list.getConstArray(); + + sal_Int32 count = list.getLength(); + + StringBag aProfiles; + for (sal_Int32 index=0; index < count; index++) + aProfiles.insert(pArray[index]); + + + // execute the select dialog + ODatasourceSelectDialog aSelector(GetParent(), aProfiles, eType); + ::rtl::OUString sOldProfile=getURLNoPrefix(); + + if (sOldProfile.getLength()) + aSelector.Select(sOldProfile); + else + aSelector.Select(xMozillaBootstrap->getDefaultProfile(profileType)); + + if ( RET_OK == aSelector.Execute() ) + setURLNoPrefix(aSelector.GetSelected()); + break; + } + } + default: + break; + } + + checkTestConnection(); + + return 0L; + } + + //------------------------------------------------------------------------- + + bool OConnectionHelper::checkTestConnection() + { + return true; + } + + //------------------------------------------------------------------------- + void OConnectionHelper::impl_setURL( const String& _rURL, sal_Bool _bPrefix ) + { + String sURL( _rURL ); + OSL_ENSURE( m_pCollection, "OConnectionHelper::impl_setURL: have no interpreter for the URLs!" ); + + if ( m_pCollection && sURL.Len() ) + { + if ( m_pCollection->isFileSystemBased( m_eType ) ) + { + // get the two parts: prefix and file URL + String sTypePrefix, sFileURLEncoded; + if ( _bPrefix ) + { + sTypePrefix = m_pCollection->getPrefix( m_eType ); + sFileURLEncoded = m_pCollection->cutPrefix( sURL ); + } + else + { + sFileURLEncoded = sURL; + } + + // substitute any variables + sFileURLEncoded = SvtPathOptions().SubstituteVariable( sFileURLEncoded ); + + // decode the URL + sURL = sTypePrefix; + if ( sFileURLEncoded.Len() ) + { + OFileNotation aFileNotation(sFileURLEncoded); + // set this decoded URL as text + sURL += String(aFileNotation.get(OFileNotation::N_SYSTEM)); + } + } + } + + if ( _bPrefix ) + m_aConnectionURL.SetText( sURL ); + else + m_aConnectionURL.SetTextNoPrefix( sURL ); + + implUpdateURLDependentStates(); + } + + //------------------------------------------------------------------------- + String OConnectionHelper::impl_getURL( sal_Bool _bPrefix ) const + { + // get the pure text + String sURL = _bPrefix ? m_aConnectionURL.GetText() : m_aConnectionURL.GetTextNoPrefix(); + + OSL_ENSURE( m_pCollection, "OConnectionHelper::impl_getURL: have no interpreter for the URLs!" ); + + if ( m_pCollection && sURL.Len() ) + { + if ( m_pCollection->isFileSystemBased( m_eType ) ) + { + // get the two parts: prefix and file URL + String sTypePrefix, sFileURLDecoded; + if ( _bPrefix ) + { + sTypePrefix = m_pCollection->getPrefix( m_eType ); + sFileURLDecoded = m_pCollection->cutPrefix( sURL ); + } + else + { + sFileURLDecoded = sURL; + } + + sURL = sTypePrefix; + if ( sFileURLDecoded.Len() ) + { + OFileNotation aFileNotation( sFileURLDecoded, OFileNotation::N_SYSTEM ); + sURL += String( aFileNotation.get( OFileNotation::N_URL ) ); + } + + // encode the URL + INetURLObject aFileURL( sFileURLDecoded, INetURLObject::ENCODE_ALL, RTL_TEXTENCODING_UTF8 ); + sFileURLDecoded = aFileURL.GetMainURL( INetURLObject::NO_DECODE ); + } + } + return sURL; + } + + //------------------------------------------------------------------------- + void OConnectionHelper::setURL( const String& _rURL ) + { + impl_setURL( _rURL, sal_True ); + } + + //------------------------------------------------------------------------- + String OConnectionHelper::getURLNoPrefix( ) const + { + return impl_getURL( sal_False ); + } + + //------------------------------------------------------------------------- + void OConnectionHelper::setURLNoPrefix( const String& _rURL ) + { + impl_setURL( _rURL, sal_False ); + } + + //------------------------------------------------------------------------- + sal_Int32 OConnectionHelper::checkPathExistence(const String& _rURL) + { + IS_PATH_EXIST e_exists = pathExists(_rURL, sal_False); + if (( e_exists == PATH_NOT_EXIST) || ( e_exists == PATH_NOT_KNOWN)) + { + String sQuery(ModuleRes(STR_ASK_FOR_DIRECTORY_CREATION)); + OFileNotation aTransformer(_rURL); + sQuery.SearchAndReplaceAscii("$path$", aTransformer.get(OFileNotation::N_SYSTEM)); + + m_bUserGrabFocus = sal_False; + QueryBox aQuery(GetParent(), WB_YES_NO | WB_DEF_YES, sQuery); + sal_Int32 nQueryResult = aQuery.Execute(); + m_bUserGrabFocus = sal_True; + + switch (nQueryResult) + { + case RET_YES: + { + sal_Bool bTryCreate = sal_False; + do + { + if ( !createDirectoryDeep(_rURL) ) + { // could not create the directory + sQuery = String(ModuleRes(STR_COULD_NOT_CREATE_DIRECTORY)); + sQuery.SearchAndReplaceAscii("$name$", aTransformer.get(OFileNotation::N_SYSTEM)); + + m_bUserGrabFocus = sal_False; + QueryBox aWhatToDo(GetParent(), WB_RETRY_CANCEL | WB_DEF_RETRY, sQuery); + nQueryResult = aWhatToDo.Execute(); + m_bUserGrabFocus = sal_True; + + if (RET_RETRY == nQueryResult) + bTryCreate = sal_True; + else + { + SetRoadmapStateValue(sal_False); + callModifiedHdl(); + return RET_RETRY; + } + } + } + while (bTryCreate); + } + break; + + case RET_NO: + callModifiedHdl(); + return RET_OK; + + default: + // cancelled + SetRoadmapStateValue(sal_False); + callModifiedHdl(); + return RET_CANCEL; + } + } +/* else + { + // TODO: error msg + return RET_CANCEL; + } */ + SetRoadmapStateValue(sal_True); + callModifiedHdl(); + return RET_OK; + } + + + //------------------------------------------------------------------------- + StringBag OConnectionHelper::getInstalledAdabasDBDirs(const String& _rPath,const ::ucbhelper::ResultSetInclude& _reResultSetInclude) + { + INetURLObject aNormalizer; + aNormalizer.SetSmartProtocol(INET_PROT_FILE); + aNormalizer.SetSmartURL(_rPath); + String sAdabasConfigDir = aNormalizer.GetMainURL(INetURLObject::NO_DECODE); + + ::ucbhelper::Content aAdabasConfigDir; + try + { + aAdabasConfigDir = ::ucbhelper::Content(sAdabasConfigDir, Reference< ::com::sun::star::ucb::XCommandEnvironment >()); + } + catch(::com::sun::star::ucb::ContentCreationException&) + { + return StringBag(); + } + + StringBag aInstalledDBs; + sal_Bool bIsFolder = sal_False; + try + { + bIsFolder = aAdabasConfigDir.isFolder(); + } + catch(Exception&) // the exception is thrown when the path doesn't exists + { + } + if (bIsFolder && aAdabasConfigDir.get().is()) + { // we have a content for the directory, loop through all entries + Sequence< ::rtl::OUString > aProperties(1); + aProperties[0] = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Title")); + + try + { + Reference< XResultSet > xFiles = aAdabasConfigDir.createCursor(aProperties, _reResultSetInclude); + Reference< XRow > xRow(xFiles, UNO_QUERY); + xFiles->beforeFirst(); + while (xFiles->next()) + { +#ifdef DBG_UTIL + ::rtl::OUString sName = xRow->getString(1); +#endif + aInstalledDBs.insert(xRow->getString(1)); + } + } + catch(Exception&) + { + OSL_FAIL("OConnectionHelper::getInstalledAdabasDBDirs: could not enumerate the adabas config files!"); + } + } + + + return aInstalledDBs; + } + // ----------------------------------------------------------------------------- + StringBag OConnectionHelper::getInstalledAdabasDBs(const String &_rConfigDir,const String &_rWorkDir) + { + String sAdabasConfigDir(_rConfigDir),sAdabasWorkDir(_rWorkDir); + + if (sAdabasConfigDir.Len() && ('/' == sAdabasConfigDir.GetBuffer()[sAdabasConfigDir.Len() - 1])) + sAdabasConfigDir.AppendAscii("config"); + else + sAdabasConfigDir.AppendAscii("/config"); + + if (sAdabasWorkDir.Len() && ('/' == sAdabasWorkDir.GetBuffer()[sAdabasWorkDir.Len() - 1])) + sAdabasWorkDir.AppendAscii("wrk"); + else + sAdabasWorkDir.AppendAscii("/wrk"); + // collect the names of the installed databases + StringBag aInstalledDBs; + // collect the names of the installed databases + StringBag aConfigDBs,aWrkDBs; + aConfigDBs = getInstalledAdabasDBDirs(sAdabasConfigDir,::ucbhelper::INCLUDE_DOCUMENTS_ONLY); + aWrkDBs = getInstalledAdabasDBDirs(sAdabasWorkDir,::ucbhelper::INCLUDE_FOLDERS_ONLY); + ConstStringBagIterator aOuter = aConfigDBs.begin(); + ConstStringBagIterator aOuterEnd = aConfigDBs.end(); + for(;aOuter != aOuterEnd;++aOuter) + { + ConstStringBagIterator aInner = aWrkDBs.begin(); + ConstStringBagIterator aInnerEnd = aWrkDBs.end(); + for (;aInner != aInnerEnd; ++aInner) + { + if (aInner->equalsIgnoreAsciiCase(*aOuter)) + { + aInstalledDBs.insert(*aInner); + break; + } + } + } + return aInstalledDBs; + } + // ----------------------------------------------------------------------------- + IS_PATH_EXIST OConnectionHelper::pathExists(const ::rtl::OUString& _rURL, sal_Bool bIsFile) const + { + ::ucbhelper::Content aCheckExistence; + sal_Bool bExists = sal_False; + IS_PATH_EXIST eExists = PATH_NOT_EXIST; + Reference< ::com::sun::star::task::XInteractionHandler > xInteractionHandler = Reference< ::com::sun::star::task::XInteractionHandler >( + m_xORB->createInstance( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("com.sun.star.task.InteractionHandler") ) ), UNO_QUERY ); + OFilePickerInteractionHandler* pHandler = new OFilePickerInteractionHandler(xInteractionHandler); + xInteractionHandler = pHandler; + + Reference< XCommandEnvironment > xCmdEnv = new ::ucbhelper::CommandEnvironment( xInteractionHandler, Reference< XProgressHandler >() ); + try + { + aCheckExistence = ::ucbhelper::Content(_rURL, xCmdEnv ); + bExists = bIsFile? aCheckExistence.isDocument(): aCheckExistence.isFolder(); + eExists = bExists? PATH_EXIST: PATH_NOT_EXIST; + } + catch(const Exception&) + { + eExists = ( pHandler && pHandler->isDoesNotExist() ) ? PATH_NOT_EXIST: (bIsFile ? PATH_NOT_EXIST : PATH_NOT_KNOWN); + } + return eExists; + } + //------------------------------------------------------------------------- + long OConnectionHelper::PreNotify( NotifyEvent& _rNEvt ) + { + if ( m_pCollection->isFileSystemBased(m_eType) ) + { + switch (_rNEvt.GetType()) + { + case EVENT_GETFOCUS: + if (m_aConnectionURL.IsWindowOrChild(_rNEvt.GetWindow()) && m_bUserGrabFocus) + { // a descendant of the URL edit field got the focus + m_aConnectionURL.SaveValueNoPrefix(); + } + break; + + case EVENT_LOSEFOCUS: + if (m_aConnectionURL.IsWindowOrChild(_rNEvt.GetWindow()) && m_bUserGrabFocus) + { // a descendant of the URL edit field lost the focus + if (!commitURL()) + return 1L; // handled + } + break; + } + } + + return OGenericAdministrationPage::PreNotify( _rNEvt ); + } + + //------------------------------------------------------------------------- + + sal_Bool OConnectionHelper::createDirectoryDeep(const String& _rPathURL) + { + ::rtl::OUString sPath(_rPathURL); + + // get an URL object analyzing the URL for us ... + INetURLObject aParser; + aParser.SetURL(_rPathURL); + + INetProtocol eProtocol = aParser.GetProtocol(); + + ::std::vector< ::rtl::OUString > aToBeCreated; // the to-be-created levels + + // search a level which exists + IS_PATH_EXIST eParentExists = PATH_NOT_EXIST; + while ( eParentExists == PATH_NOT_EXIST && aParser.getSegmentCount()) + { + aToBeCreated.push_back(aParser.getName()); // remember the local name for creation + aParser.removeSegment(); // cut the local name + eParentExists = pathExists(aParser.GetMainURL(INetURLObject::NO_DECODE), sal_False); + } + + if (!aParser.getSegmentCount()) + return sal_False; + + // create all the missing levels + try + { + // the parent content + Reference< XCommandEnvironment > xEmptyEnv; + ::ucbhelper::Content aParent(aParser.GetMainURL(INetURLObject::NO_DECODE), xEmptyEnv); + + ::rtl::OUString sContentType; + if ( INET_PROT_FILE == eProtocol ) + { + sContentType = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("application/vnd.sun.staroffice.fsys-folder")); + // the file UCP currently does not support the ContentType property + } + else + { + Any aContentType = aParent.getPropertyValue( ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("ContentType")) ); + aContentType >>= sContentType; + } + + // the properties which need to be set on the new content + Sequence< ::rtl::OUString > aNewDirectoryProperties(1); + aNewDirectoryProperties[0] = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Title")); + + // the values to be set + Sequence< Any > aNewDirectoryAttributes(1); + + // loop + for ( ::std::vector< ::rtl::OUString >::reverse_iterator aLocalName = aToBeCreated.rbegin(); + aLocalName != aToBeCreated.rend(); + ++aLocalName + ) + { + aNewDirectoryAttributes[0] <<= *aLocalName; + if (!aParent.insertNewContent(sContentType, aNewDirectoryProperties, aNewDirectoryAttributes, aParent)) + return sal_False; + } + } + catch ( const Exception& ) + { + DBG_UNHANDLED_EXCEPTION(); + return sal_False; + } + + return sal_True; + } + + + // ----------------------------------------------------------------------- + void OConnectionHelper::fillWindows(::std::vector< ISaveValueWrapper* >& _rControlList) + { + _rControlList.push_back(new ODisableWrapper<FixedText>(&m_aFT_Connection)); + _rControlList.push_back(new ODisableWrapper<PushButton>(&m_aPB_Connection)); + } + + + // ----------------------------------------------------------------------- + void OConnectionHelper::fillControls(::std::vector< ISaveValueWrapper* >& _rControlList) + { + _rControlList.push_back( new OSaveValueWrapper<Edit>( &m_aConnectionURL ) ); + } + + //------------------------------------------------------------------------- + sal_Bool OConnectionHelper::commitURL() + { + String sURL; + String sOldPath; + sOldPath = m_aConnectionURL.GetSavedValueNoPrefix(); + sURL = m_aConnectionURL.GetTextNoPrefix(); + + if ( m_pCollection->isFileSystemBased(m_eType) ) + { + if ( ( sURL != sOldPath ) && ( 0 != sURL.Len() ) ) + { // the text changed since entering the control + + // the path may be in system notation .... + OFileNotation aTransformer(sURL); + sURL = aTransformer.get(OFileNotation::N_URL); + + const ::dbaccess::DATASOURCE_TYPE eType = m_pCollection->determineType(m_eType); + + if ( ( ::dbaccess::DST_CALC == eType) || ( ::dbaccess::DST_MSACCESS == eType) || ( ::dbaccess::DST_MSACCESS_2007 == eType) ) + { + if( pathExists(sURL, sal_True) == PATH_NOT_EXIST ) + { + String sFile = String( ModuleRes( STR_FILE_DOES_NOT_EXIST ) ); + sFile.SearchAndReplaceAscii("$file$", aTransformer.get(OFileNotation::N_SYSTEM)); + OSQLWarningBox( this, sFile ).Execute(); + setURLNoPrefix(sOldPath); + SetRoadmapStateValue(sal_False); + callModifiedHdl(); + return sal_False; + } + } + else + { + switch (checkPathExistence(sURL)) + { + case RET_RETRY: + m_bUserGrabFocus = sal_False; + m_aConnectionURL.GrabFocus(); + m_bUserGrabFocus = sal_True; + return sal_False; + + case RET_CANCEL: + setURLNoPrefix(sOldPath); + return sal_False; + } + } + } + } + + setURLNoPrefix(sURL); + m_aConnectionURL.SaveValueNoPrefix(); + return sal_True; + } + //------------------------------------------------------------------------- + void OConnectionHelper::askForFileName(::sfx2::FileDialogHelper& _aFileOpen) + { + String sOldPath = getURLNoPrefix(); + if ( sOldPath.Len() ) + _aFileOpen.SetDisplayDirectory(sOldPath); + else + _aFileOpen.SetDisplayDirectory( SvtPathOptions().GetWorkPath() ); + if (0 == _aFileOpen.Execute()) + { + setURLNoPrefix(_aFileOpen.GetPath()); + SetRoadmapStateValue(checkTestConnection()); + callModifiedHdl(); + } + } + +//......................................................................... +} // namespace dbaui +//......................................................................... + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ |