diff options
Diffstat (limited to 'dbaccess/source/ext/adabas/AdabasNewDb.cxx')
-rw-r--r-- | dbaccess/source/ext/adabas/AdabasNewDb.cxx | 752 |
1 files changed, 0 insertions, 752 deletions
diff --git a/dbaccess/source/ext/adabas/AdabasNewDb.cxx b/dbaccess/source/ext/adabas/AdabasNewDb.cxx deleted file mode 100644 index c1abf3f46e68..000000000000 --- a/dbaccess/source/ext/adabas/AdabasNewDb.cxx +++ /dev/null @@ -1,752 +0,0 @@ -/* -*- 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. - * - ************************************************************************/ - -#include "AdabasNewDb.hxx" -#include "AdabasNewDb.hrc" - -#include <osl/process.h> -#include <vcl/msgbox.hxx> -#include <sfx2/passwd.hxx> -#include <tools/urlobj.hxx> -#include <tools/stream.hxx> -#include <tools/debug.hxx> -#include "Acomponentmodule.hxx" -#include <unotools/tempfile.hxx> -#include "adabasui_resource.hrc" -#include <ucbhelper/content.hxx> -#include <vcl/waitobj.hxx> -#include <unotools/pathoptions.hxx> -#include <toolkit/unohlp.hxx> -#include <com/sun/star/beans/PropertyValue.hpp> -#include <comphelper/extract.hxx> -#include <comphelper/string.hxx> -#include <unotools/tempfile.hxx> -#include <unotools/localfilehelper.hxx> -#include <com/sun/star/sdbc/SQLException.hpp> -#include <com/sun/star/ui/dialogs/TemplateDescription.hpp> -#include <unotools/ucbhelper.hxx> -#include <connectivity/dbtools.hxx> -#include <connectivity/dbexception.hxx> -#include "adabasuistrings.hrc" -#include <osl/thread.hxx> -#include <osl/file.hxx> - - -using namespace adabasui; -using namespace ucbhelper; -using namespace utl; -using namespace ::com::sun::star; -using namespace ::com::sun::star::uno; -using namespace ::com::sun::star::beans; -using namespace ::com::sun::star::sdbcx; -using namespace ::com::sun::star::sdbc; -using namespace ::com::sun::star::ucb; -using namespace ::com::sun::star::lang; -namespace adabasui -{ - class ODatabaseCreator : public ::osl::Thread - { - Link m_aTerminateHandler; - Sequence< PropertyValue> m_aValues; - Reference<XCreateCatalog> m_xCreateCatalog; - Reference< XMultiServiceFactory > m_xORB; - Window* m_pErrorWindow; - public: - ODatabaseCreator(const Reference<XCreateCatalog>& _rxCreateCatalog - ,Window* _pErrorWindow - ,const Reference< XMultiServiceFactory >& _xORB - ,const Sequence< PropertyValue>& _rValues) - : m_aValues(_rValues) - , m_xCreateCatalog(_rxCreateCatalog) - , m_xORB(_xORB) - , m_pErrorWindow(_pErrorWindow) - {} - - void setTerminateHandler(const Link& _aTerminateHandler) { m_aTerminateHandler = _aTerminateHandler; } - - protected: - - /// Working method which should be overridden. - virtual void SAL_CALL run(); - virtual void SAL_CALL onTerminated(); - }; - - void SAL_CALL ODatabaseCreator::run() - { - try - { - m_xCreateCatalog->createCatalog(m_aValues); - } - catch(SQLException& e) - { - ::dbtools::showError(::dbtools::SQLExceptionInfo(e),VCLUnoHelper::GetInterface(m_pErrorWindow),m_xORB); - } - catch(Exception&) - { - OSL_ASSERT(0); - } - } - void SAL_CALL ODatabaseCreator::onTerminated() - { - if ( m_aTerminateHandler.IsSet() ) - m_aTerminateHandler.Call(NULL); - } -} -DBG_NAME( OAdabasNewDbDlg ) -//======================================================================== -OAdabasNewDbDlg::OAdabasNewDbDlg( Window* pParent, - const Reference<XCreateCatalog>& _rxCreateCatalog, - const Reference< XMultiServiceFactory >& _rxORB, - sal_Bool _bRestore) - :ModalDialog( pParent, ModuleRes( DLG_ADABAS_NEWDB )) - ,m_FT_DATABASENAME( this, ModuleRes( FT_DATABASENAME ) ) - ,m_ET_DATABASENAME( this, ModuleRes( ET_DATABASENAME ) ) - ,m_FL_USER( this, ModuleRes( FL_USER ) ) - ,m_FT_SYSUSR( this, ModuleRes( FT_SYSUSR ) ) - ,m_FT_CONUSR( this, ModuleRes( FT_CONUSR ) ) - ,m_FT_DOMAIN_USR( this, ModuleRes( FT_DOMAIN_USR ) ) - ,m_ET_SYSUSR( this, ModuleRes( ET_SYSUSR ) ) - ,m_PB_SYSPWD( this, ModuleRes( PB_SYSPWD ) ) - ,m_ET_CONUSR( this, ModuleRes( ET_CONUSR ) ) - ,m_PB_CONPWD( this, ModuleRes( PB_CONPWD ) ) - ,m_ET_DOMAIN_USR( this, ModuleRes( ET_DOMAIN_USR ) ) - ,m_PB_DOMAINPWD( this, ModuleRes( PB_DOMAINPWD ) ) - ,m_BMP_CON( this, ModuleRes( BMP_CON ) ) - ,m_BMP_SYS( this, ModuleRes( BMP_SYS ) ) - ,m_BMP_DOMAIN( this, ModuleRes( BMP_DOMAIN ) ) - ,m_FT_RESTORE( this, ModuleRes( FT_RESTORE ) ) - ,m_ET_RESTORE( this, ModuleRes( ET_RESTORE ) ) - ,m_PB_RESTORE( this, ModuleRes( PB_RESTORE ) ) - ,m_FL_DBSETTINGS( this, ModuleRes( FL_DBSETTINGS ) ) - ,m_FT_SYSDEVSPACE( this, ModuleRes( FT_SYSDEVSPACE ) ) - ,m_FT_TRANSACTIONLOG( this, ModuleRes( FT_TRANSACTIONLOG ) ) - ,m_FT_DATADEVSPACE( this, ModuleRes( FT_DATADEVSPACE ) ) - ,m_ET_SYSDEVSPACE( this, ModuleRes( ET_SYSDEVSPACE ) ) - ,m_PB_SYSDEVSPACE( this, ModuleRes( PB_SYSDEVSPACE ) ) - ,m_ET_TRANSACTIONLOG( this, ModuleRes( ET_TRANSACTIONLOG ) ) - ,m_PB_TRANSACTIONLOG( this, ModuleRes( PB_TRANSACTIONLOG ) ) - ,m_ET_DATADEVSPACE( this, ModuleRes( ET_DATADEVSPACE ) ) - ,m_PB_DATADEVSPACE( this, ModuleRes( PB_DATADEVSPACE ) ) - ,m_FT_TRANSACTIONLOG_SIZE( this, ModuleRes( FT_TRANSACTIONLOG_SIZE ) ) - ,m_NF_TRANSACTIONLOG_SIZE( this, ModuleRes( NF_TRANSACTIONLOG_SIZE ) ) - ,m_FT_DATADEVSPACE_SIZE( this, ModuleRes( FT_DATADEVSPACE_SIZE ) ) - ,m_NF_DATADEVSPACE_SIZE( this, ModuleRes( NF_DATADEVSPACE_SIZE ) ) - ,m_FT_CACHE_SIZE( this, ModuleRes( FT_CACHE_SIZE ) ) - ,m_NF_CACHE_SIZE( this, ModuleRes( NF_CACHE_SIZE ) ) - ,m_FL_END( this, ModuleRes( FL_END ) ) - ,m_PB_OK( this, ModuleRes( PB_OK ) ) - ,m_PB_CANCEL( this, ModuleRes( PB_CANCEL ) ) - ,m_xCreateCatalog(_rxCreateCatalog) - ,m_xORB(_rxORB) - ,m_bRestore(_bRestore) - ,m_nSetBitmap(0) -{ - DBG_CTOR( OAdabasNewDbDlg, NULL ); - FreeResource(); - if(m_bRestore) - { - m_FL_DBSETTINGS.SetPosPixel(m_FL_DBSETTINGS.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_FT_SYSDEVSPACE.SetPosPixel(m_FT_SYSDEVSPACE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_FT_TRANSACTIONLOG.SetPosPixel(m_FT_TRANSACTIONLOG.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_FT_DATADEVSPACE.SetPosPixel(m_FT_DATADEVSPACE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_ET_SYSDEVSPACE.SetPosPixel(m_ET_SYSDEVSPACE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_PB_SYSDEVSPACE.SetPosPixel(m_PB_SYSDEVSPACE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_ET_TRANSACTIONLOG.SetPosPixel(m_ET_TRANSACTIONLOG.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_PB_TRANSACTIONLOG.SetPosPixel(m_PB_TRANSACTIONLOG.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_ET_DATADEVSPACE.SetPosPixel(m_ET_DATADEVSPACE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_PB_DATADEVSPACE.SetPosPixel(m_PB_DATADEVSPACE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_FT_TRANSACTIONLOG_SIZE.SetPosPixel(m_FT_TRANSACTIONLOG_SIZE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_NF_TRANSACTIONLOG_SIZE.SetPosPixel(m_NF_TRANSACTIONLOG_SIZE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_FT_DATADEVSPACE_SIZE.SetPosPixel(m_FT_DATADEVSPACE_SIZE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_NF_DATADEVSPACE_SIZE.SetPosPixel(m_NF_DATADEVSPACE_SIZE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_FT_CACHE_SIZE.SetPosPixel(m_FT_CACHE_SIZE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_NF_CACHE_SIZE.SetPosPixel(m_NF_CACHE_SIZE.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_PB_OK.SetPosPixel(m_PB_OK.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - m_PB_CANCEL.SetPosPixel(m_PB_CANCEL.GetPosPixel()-LogicToPixel( Point(0,14), MAP_APPFONT )); - - Size aSize(GetSizePixel().Width(),GetSizePixel().Height()-LogicToPixel( Size(0,14), MAP_APPFONT ).Height()); - SetSizePixel(aSize); - - m_FT_SYSUSR.Hide(); - m_FT_DOMAIN_USR.Hide(); - m_FL_USER.SetText(ModuleRes(STR_BACKUPFILE_LOAD)); - m_PB_SYSPWD.Hide(); - m_PB_DOMAINPWD.Hide(); - m_ET_SYSUSR.Hide(); - m_ET_DOMAIN_USR.Hide(); - - m_ET_SYSUSR.SetText(String::CreateFromAscii("DUMMY")); - m_BMP_SYS.Hide(); - m_BMP_DOMAIN.Hide(); - m_ET_RESTORE.SetModifyHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - m_ET_RESTORE.SetLoseFocusHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - m_ET_RESTORE.SetMaxTextLen(40); - } - else - { - m_FT_RESTORE.Hide(); - m_ET_RESTORE.Hide(); - m_PB_RESTORE.Hide(); - - m_ET_SYSUSR.SetModifyHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - m_ET_CONUSR.SetModifyHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - m_ET_DOMAIN_USR.Enable(sal_False); - - } - - - m_ET_SYSDEVSPACE.SetLoseFocusHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - m_ET_TRANSACTIONLOG.SetLoseFocusHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - m_ET_DATADEVSPACE.SetLoseFocusHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - - m_ET_SYSDEVSPACE.SetMaxTextLen(40); - m_ET_TRANSACTIONLOG.SetMaxTextLen(40); - m_ET_DATADEVSPACE.SetMaxTextLen(40); - - m_NF_TRANSACTIONLOG_SIZE.SetModifyHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - m_NF_DATADEVSPACE_SIZE.SetModifyHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - m_NF_CACHE_SIZE.SetModifyHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - - m_NF_TRANSACTIONLOG_SIZE.SetMin(10); - m_NF_DATADEVSPACE_SIZE.SetMin(10); - m_NF_CACHE_SIZE.SetMin(4); - - m_NF_TRANSACTIONLOG_SIZE.SetMax(LONG_MAX); - m_NF_DATADEVSPACE_SIZE.SetMax(LONG_MAX); - m_NF_CACHE_SIZE.SetMax(LONG_MAX); - - m_NF_TRANSACTIONLOG_SIZE.SetValue(20); - m_NF_DATADEVSPACE_SIZE.SetValue(20); - m_NF_CACHE_SIZE.SetValue(4); - - m_NF_TRANSACTIONLOG_SIZE.SetDecimalDigits(0); - m_NF_DATADEVSPACE_SIZE.SetDecimalDigits(0); - m_NF_CACHE_SIZE.SetDecimalDigits(0); - - m_ET_DATABASENAME.SetMaxTextLen( 8 ); - - m_PB_CONPWD.SetClickHdl( LINK(this,OAdabasNewDbDlg,PwdClickHdl)); - m_PB_SYSPWD.SetClickHdl( LINK(this,OAdabasNewDbDlg,PwdClickHdl)); - m_PB_DOMAINPWD.SetClickHdl( LINK(this,OAdabasNewDbDlg,PwdClickHdl)); - - m_PB_RESTORE.SetClickHdl( LINK(this,OAdabasNewDbDlg,LoadButtonClickHdl)); - - m_PB_SYSDEVSPACE.SetClickHdl( LINK(this,OAdabasNewDbDlg,ButtonClickHdl)); - m_PB_TRANSACTIONLOG.SetClickHdl( LINK(this,OAdabasNewDbDlg,ButtonClickHdl)); - m_PB_DATADEVSPACE.SetClickHdl( LINK(this,OAdabasNewDbDlg,ButtonClickHdl)); - - m_BMP_CON.SetImage( ModuleRes(UNCHECK_RED) ); - m_BMP_SYS.SetImage( ModuleRes(UNCHECK_RED) ); - m_BMP_DOMAIN.SetImage( ModuleRes(UNCHECK_RED) ); - - static String s_sRoot(RTL_CONSTASCII_USTRINGPARAM("DBROOT")); - static String s_sConfig(RTL_CONSTASCII_USTRINGPARAM("DBCONFIG")); - static String s_sWork(RTL_CONSTASCII_USTRINGPARAM("DBWORK")); - - sal_Bool bError = fillEnvironmentVariable(s_sWork,m_sDbWork); - if ( bError || !m_sDbWork.Len() ) - bError = fillEnvironmentVariable(s_sRoot,m_sDbWork); - - bError = fillEnvironmentVariable(s_sConfig,m_sDbConfig); - if ( bError || !m_sDbConfig.Len() ) - bError = fillEnvironmentVariable(s_sRoot,m_sDbConfig); - - if ( m_sDbConfig.Len() && m_sDbWork.Len() ) - { - m_sDbConfig.AppendAscii("/"); - m_sDbWork.AppendAscii("/"); - - String sDefaultName,sExt; - sDefaultName.AssignAscii("MYDB"); - String sConfig = m_sDbConfig; - sConfig.AppendAscii("config"); - TempFile aDefaultDatabase(sDefaultName,&sExt,&sConfig); - aDefaultDatabase.EnableKillingFile(); - INetURLObject aURL(aDefaultDatabase.GetURL()); - - m_ET_DATABASENAME.SetText(aURL.GetName()); - m_DBName = m_ET_DATABASENAME.GetText(); - - // create temp names for my files - // here we need only a name the creation is done by the driver - // so we delete the files after we get a valid name - // with this we avoiding to mention anything when the user presses cancel - - String aSysExt; - sal_Bool bValid = sal_True; - { - aSysExt.AssignAscii(".sys"); - ::utl::TempFile aTmpFile(m_ET_DATABASENAME.GetText(),&aSysExt,&m_sDbWork); - aTmpFile.EnableKillingFile(); - bValid = aTmpFile.IsValid(); - if(bValid) - LocalFileHelper::ConvertURLToPhysicalName(aTmpFile.GetURL(),m_SYSDEV_File); - } - { - aSysExt.AssignAscii(".trs"); - ::utl::TempFile aTmpFile(m_ET_DATABASENAME.GetText(),&aSysExt,&m_sDbWork); - aTmpFile.EnableKillingFile(); - bValid = !bValid || aTmpFile.IsValid(); - if(aTmpFile.IsValid()) - LocalFileHelper::ConvertURLToPhysicalName(aTmpFile.GetURL(),m_TRANSDEV_File); - } - { - aSysExt.AssignAscii(".dat"); - ::utl::TempFile aTmpFile(m_ET_DATABASENAME.GetText(),&aSysExt,&m_sDbWork); - aTmpFile.EnableKillingFile(); - bValid = !bValid || aTmpFile.IsValid(); - if(aTmpFile.IsValid()) - LocalFileHelper::ConvertURLToPhysicalName(aTmpFile.GetURL(),m_DATADEV_File); - } - if(!bValid) // we found a file which isn't valid so we report an error message - PostUserEvent(LINK(this, OAdabasNewDbDlg, OnNoAccessRights)); - - } - - if(m_SYSDEV_File.getLength() < 41 && m_TRANSDEV_File.getLength() < 41 && m_DATADEV_File.getLength() < 41) - { - m_ET_SYSDEVSPACE.SetText(m_SYSDEV_File ); - m_ET_TRANSACTIONLOG.SetText(m_TRANSDEV_File); - m_ET_DATADEVSPACE.SetText(m_DATADEV_File); - } - else - { - m_SYSDEV_File = m_TRANSDEV_File = m_DATADEV_File = String(); - PostUserEvent(LINK(this, OAdabasNewDbDlg, OnNoDefaultPath)); - } - - m_ET_CONUSR.SetText(String::CreateFromAscii("CONTROL")); - - m_PB_OK.SetClickHdl(LINK(this,OAdabasNewDbDlg,ImplOKHdl)); - m_PB_OK.Enable(sal_False); - - m_ET_DATABASENAME.SetModifyHdl( LINK(this,OAdabasNewDbDlg,LoseFocusHdl)); - -} -// ----------------------------------------------------------------------- -OAdabasNewDbDlg::~OAdabasNewDbDlg() -{ - DBG_DTOR( OAdabasNewDbDlg, NULL ); -} -//------------------------------------------------------------------ -IMPL_LINK(OAdabasNewDbDlg, OnError, void*, /*_pArg*/) -{ - String sErrorMsg(ModuleRes(STR_ERROR_IN_ADABAS_INSTALLATION)); - ErrorBox(this, WB_OK, sErrorMsg).Execute(); - EndDialog(RET_CANCEL); - return 0L; -} -//------------------------------------------------------------------ -IMPL_LINK(OAdabasNewDbDlg, OnNoDefaultPath, void*, /*_pArg*/) -{ - String sErrorMsg(ModuleRes(STR_ADABAS_NO_DEFAULTNAME)); - ErrorBox(this, WB_OK, sErrorMsg).Execute(); - return 0L; -} -//------------------------------------------------------------------ -IMPL_LINK(OAdabasNewDbDlg, OnNoAccessRights, void*, /*_pArg*/) -{ - String sErrorMsg(ModuleRes(STR_ADABAS_NO_ACCESSRIGHTS)); - ErrorBox(this, WB_OK, sErrorMsg).Execute(); - return 0L; -} - -// ----------------------------------------------------------------------- -IMPL_LINK( OAdabasNewDbDlg, ImplOKHdl, OKButton*, /*EMPTYARG*/ ) -{ - m_SYSDEV_File = m_ET_SYSDEVSPACE.GetText(); - m_TRANSDEV_File = m_ET_TRANSACTIONLOG.GetText(); - m_DATADEV_File = m_ET_DATADEVSPACE.GetText(); - - m_Backup_File = m_ET_RESTORE.GetText(); - if(m_bRestore) - { - INetURLObject aURL; - aURL.SetSmartProtocol(INET_PROT_FILE); - aURL.SetURL(m_Backup_File); - Content aContent(aURL.GetURLNoPass(),Reference<XCommandEnvironment>()); - try - { - if(!aContent.isDocument()) - { - String aString1 = String(ModuleRes(STR_ADABAS_NO_BACKUP_FILE)); - String aString2 = String(ModuleRes(STR_STAT_WARNING)); - SQLException aSql(aString1,NULL,aString2,1000,Any()); - return 0; - } - - } - catch(Exception&) - { - String aString1 = String(ModuleRes(STR_ADABAS_NO_BACKUP_FILE)); - String aString2 = String(ModuleRes(STR_STAT_WARNING)); - SQLException aSql(aString1,NULL,aString2,1000,Any()); - throw aSql; - } - if(m_Backup_File.Len() > 40) - { - InfoBox aInfo(this,ModuleRes(INFO_STR_MAX_FILE_LENGTH)); - String aMsg(aInfo.GetMessText()); - aMsg.SearchAndReplace(String::CreateFromAscii("\'#\'"),String::CreateFromAscii("40")); - aInfo.SetMessText(aMsg); - aInfo.Execute(); - return 0; - } - } - else if(m_SYSDEV_File.getLength() > 40 || m_TRANSDEV_File.getLength() > 40 || m_DATADEV_File.getLength() > 40) - { - InfoBox aInfo(this,ModuleRes(INFO_STR_MAX_FILE_LENGTH)); - String aMsg(aInfo.GetMessText()); - aMsg.SearchAndReplace(String::CreateFromAscii("\'#\'"),String::CreateFromAscii("40")); - aInfo.SetMessText(aMsg); - aInfo.Execute(); - return 0; - } - - - sal_Bool bOk = sal_False; - - { - // we need url - rtl::OUString sTemp; - bOk = LocalFileHelper::ConvertPhysicalNameToURL(m_DATADEV_File,sTemp); - m_DATADEV_File = sTemp; - sTemp = rtl::OUString(); - bOk = LocalFileHelper::ConvertPhysicalNameToURL(m_SYSDEV_File,sTemp); - m_SYSDEV_File = sTemp; - sTemp = rtl::OUString(); - bOk = LocalFileHelper::ConvertPhysicalNameToURL(m_TRANSDEV_File,sTemp); - m_TRANSDEV_File = sTemp; - } - String aErrorMessage = String(ModuleRes(STR_DEVSPACE_NO_FILE)); - if(m_SYSDEV_File.isEmpty()) - aErrorMessage.SearchAndReplace(String::CreateFromAscii("$name$"),String::CreateFromAscii("SYSDEVSPACE")); - else if(m_TRANSDEV_File.isEmpty()) - aErrorMessage.SearchAndReplace(String::CreateFromAscii("$name$"),String::CreateFromAscii("TRANSACTIONLOG")); - else if(m_DATADEV_File.isEmpty()) - aErrorMessage.SearchAndReplace(String::CreateFromAscii("$name$"),String::CreateFromAscii("DATDEVSPACE")); - else if(m_ET_SYSUSR.GetText() == m_ET_CONUSR.GetText()) - aErrorMessage = String(ModuleRes(STR_NO_SAME_USER)); - else - bOk = sal_True; - - - if (!bOk) - { - ErrorBox(this, WB_OK, aErrorMessage).Execute(); - return sal_False; - } - - sal_Int32 nPos = 0; - Sequence< PropertyValue> aCreateArgs(m_bRestore ? 14 : 12); - aCreateArgs[nPos].Name = PROPERTY_CONTROL_USER; - aCreateArgs[nPos++].Value <<= ::rtl::OUString(m_ET_CONUSR.GetText().ToUpperAscii()); - aCreateArgs[nPos].Name = PROPERTY_CONTROL_PASSWORD; - aCreateArgs[nPos++].Value <<= ::rtl::OUString(m_ConPwd); - aCreateArgs[nPos].Name = PROPERTY_USER; - aCreateArgs[nPos++].Value <<= ::rtl::OUString(m_ET_SYSUSR.GetText().ToUpperAscii()); - aCreateArgs[nPos].Name = PROPERTY_PASSWORD; - aCreateArgs[nPos++].Value <<= ::rtl::OUString(m_SysPwd); - aCreateArgs[nPos].Name = PROPERTY_DOMAINPASSWORD; - aCreateArgs[nPos++].Value <<= ::rtl::OUString(m_DomainPwd); - aCreateArgs[nPos].Name = PROPERTY_CACHESIZE; - aCreateArgs[nPos++].Value <<= ::rtl::OUString::valueOf(sal_Int32(m_NF_CACHE_SIZE.GetValue()*256)); - aCreateArgs[nPos].Name = PROPERTY_DATABASENAME; - aCreateArgs[nPos++].Value <<= ::rtl::OUString(m_ET_DATABASENAME.GetText().ToUpperAscii()); - aCreateArgs[nPos].Name = PROPERTY_DATADEVSPACE; - aCreateArgs[nPos++].Value <<= m_DATADEV_File; - aCreateArgs[nPos].Name = PROPERTY_SYSDEVSPACE; - aCreateArgs[nPos++].Value <<= m_SYSDEV_File; - aCreateArgs[nPos].Name = PROPERTY_TRANSACTION_LOG; - aCreateArgs[nPos++].Value <<= m_TRANSDEV_File; - aCreateArgs[nPos].Name = PROPERTY_DATADEVSIZE; - aCreateArgs[nPos++].Value <<= sal_Int32(m_NF_DATADEVSPACE_SIZE.GetValue()*256); - aCreateArgs[nPos].Name = PROPERTY_LOGDEVSIZE; - aCreateArgs[nPos++].Value <<= sal_Int32(m_NF_TRANSACTIONLOG_SIZE.GetValue()*256); - - if(m_bRestore) - { - aCreateArgs[nPos].Name = PROPERTY_RESTOREDATABASE; - aCreateArgs[nPos++].Value <<= ::cppu::bool2any(sal_True); - aCreateArgs[nPos].Name = PROPERTY_BACKUPNAME; - aCreateArgs[nPos++].Value <<= ::rtl::OUString(m_Backup_File); - } - - Disable(); - - m_aCreatorWait = ::std::auto_ptr<WaitObject>(new WaitObject(this)); - m_aCreatorThread = ::std::auto_ptr<ODatabaseCreator>(new ODatabaseCreator(m_xCreateCatalog,this,m_xORB,aCreateArgs)); - m_aCreatorThread->setTerminateHandler(LINK(this,OAdabasNewDbDlg,TerminateHdl)); - m_aCreatorThread->create(); - - return sal_True; -} -//------------------------------------------------------------------------- -IMPL_LINK( OAdabasNewDbDlg, TerminateHdl, void*, /*NOTUSABLE*/ ) -{ - EndDialog(RET_OK); - return 0; -} -//------------------------------------------------------------------------ -IMPL_LINK( OAdabasNewDbDlg, LoseFocusHdl, Edit *, pEdit ) -{ - if(&m_ET_SYSDEVSPACE == pEdit) - m_SYSDEV_File = pEdit->GetText(); - else if(&m_ET_TRANSACTIONLOG == pEdit) - m_TRANSDEV_File = pEdit->GetText(); - else if(&m_ET_DATADEVSPACE == pEdit) - m_DATADEV_File = pEdit->GetText(); - else if(&m_ET_RESTORE == pEdit) - m_Backup_File = pEdit->GetText(); - else if(&m_ET_DATABASENAME == pEdit) - {// check if the new dbname already exists - String sNewDbName = pEdit->GetText(); - String sConfig = m_sDbConfig; - sConfig.AppendAscii("config/"); - sConfig += sNewDbName; - if(UCBContentHelper::IsDocument(sConfig)) - { - String sErrorMessage = String(ModuleRes(STR_ADABAS_DB_EXISTS)); - ErrorBox(this, WB_OK, sErrorMessage).Execute(); - m_DBName.Erase(); - } - else if ( m_DBName.SearchAscii(" ") != STRING_NOTFOUND ) - { - String sErrorMessage = String(ModuleRes(STR_ADABAS_DB_EXISTS)); - ErrorBox(this, WB_OK, sErrorMessage).Execute(); - m_DBName = m_DBName.GetToken(0,' '); - } - else - m_DBName = sNewDbName; - } - - CheckBitmaps(); - return 0; -} -//------------------------------------------------------------------------ -IMPL_LINK( OAdabasNewDbDlg, LoadButtonClickHdl, Button *, /*pButton*/ ) -{ - ::sfx2::FileDialogHelper aLoad( - ui::dialogs::TemplateDescription::FILEOPEN_READONLY_VERSION, 0); - if(!m_Backup_File.Len()) - aLoad.SetDisplayDirectory(SvtPathOptions().GetWorkPath()); - else - aLoad.SetDisplayDirectory(m_Backup_File); - if (aLoad.Execute()) - { - INetURLObject aUrl(aLoad.GetPath()); - m_Backup_File = aUrl.PathToFileName(); - if(m_Backup_File.Len() > 40) - { - InfoBox aInfo(this,ModuleRes(INFO_STR_MAX_FILE_LENGTH)); - String aMsg(aInfo.GetMessText()); - aMsg.SearchAndReplace(String::CreateFromAscii("\'#\'"),String::CreateFromAscii("40")); - aInfo.SetMessText(aMsg); - } - m_ET_RESTORE.SetText(m_Backup_File); - } - CheckBitmaps(); - return 0; -} -//------------------------------------------------------------------------ -IMPL_LINK( OAdabasNewDbDlg, ButtonClickHdl, Button *, pButton ) -{ - ::sfx2::FileDialogHelper aFileDlg( - ui::dialogs::TemplateDescription::FILESAVE_SIMPLE, 0); - - String aPath; - if(pButton == &m_PB_SYSDEVSPACE) - aPath = m_SYSDEV_File; - else if(pButton == &m_PB_TRANSACTIONLOG) - aPath = m_TRANSDEV_File; - else if(pButton == &m_PB_DATADEVSPACE) - aPath = m_DATADEV_File; - - rtl::OUString sUrl; - ::utl::LocalFileHelper::ConvertPhysicalNameToURL(aPath,sUrl); - aFileDlg.SetDisplayDirectory(sUrl); - - - - if (aFileDlg.Execute() == ERRCODE_NONE) - { - INetURLObject aUrl(aFileDlg.GetPath()); - if(pButton == &m_PB_SYSDEVSPACE) - { - m_SYSDEV_File = aUrl.PathToFileName(); - if(m_SYSDEV_File.getLength() > 40) - { - InfoBox aInfo(this,ModuleRes(INFO_STR_MAX_FILE_LENGTH)); - String aMsg(aInfo.GetMessText()); - aMsg.SearchAndReplace(String::CreateFromAscii("\'#\'"),String::CreateFromAscii("40")); - aInfo.SetMessText(aMsg); - aInfo.Execute(); - return 0; - } - m_ET_SYSDEVSPACE.SetText(aUrl.PathToFileName()); - } - else if(pButton == &m_PB_TRANSACTIONLOG) - { - m_TRANSDEV_File = aUrl.PathToFileName(); - if(m_TRANSDEV_File.getLength() > 40) - { - InfoBox aInfo(this,ModuleRes(INFO_STR_MAX_FILE_LENGTH)); - String aMsg(aInfo.GetMessText()); - aMsg.SearchAndReplace(String::CreateFromAscii("\'#\'"),String::CreateFromAscii("40")); - aInfo.SetMessText(aMsg); - aInfo.Execute(); - return 0; - } - m_ET_TRANSACTIONLOG.SetText(aUrl.PathToFileName()); - } - else if(pButton == &m_PB_DATADEVSPACE) - { - m_DATADEV_File = aUrl.PathToFileName(); - if(m_DATADEV_File.getLength() > 40) - { - InfoBox aInfo(this,ModuleRes(INFO_STR_MAX_FILE_LENGTH)); - String aMsg(aInfo.GetMessText()); - aMsg.SearchAndReplace(String::CreateFromAscii("\'#\'"),String::CreateFromAscii("40")); - aInfo.SetMessText(aMsg); - aInfo.Execute(); - return 0; - } - m_ET_DATADEVSPACE.SetText(aUrl.PathToFileName()); - } - } - - CheckBitmaps(); - return 0; -} -//------------------------------------------------------------------------ -IMPL_LINK( OAdabasNewDbDlg, PwdClickHdl, Button *, pButton ) -{ - SfxPasswordDialog aDlg(this); - aDlg.ShowExtras(SHOWEXTRAS_CONFIRM); - if(aDlg.Execute()) - { - String sPwd = aDlg.GetPassword().ToUpperAscii(); - // no space in password allowed - if ( comphelper::string::getTokenCount(sPwd, ' ') == 1 ) - { - if(pButton == &m_PB_CONPWD) - { - m_ConPwd = sPwd; - m_nSetBitmap &=~2; - } - else if(pButton == &m_PB_SYSPWD) - { - m_SysPwd = sPwd; - if(!m_DomainPwd.Len()) - { - m_nSetBitmap = 1; - m_DomainPwd = m_SysPwd; - } - if(!m_ConPwd.Len()) - { - m_nSetBitmap |= 2; - m_ConPwd = m_SysPwd; - } - - } - else if(pButton == &m_PB_DOMAINPWD) - { - m_DomainPwd = sPwd; - m_nSetBitmap &=~1; - } - } - else - { - String sErrorMsg(ModuleRes(STR_ADABAS_PASSWORD_ILLEGAL)); - ErrorBox(this, WB_OK, sErrorMsg).Execute(); - } - } - CheckBitmaps(); - return 0; -} -//------------------------------------------------------------------------ -void OAdabasNewDbDlg::CheckBitmaps() -{ - sal_Int16 i=0; - if(m_ConPwd.Len() && m_ET_CONUSR.GetText().Len()) - i++,m_BMP_CON.SetImage(ModuleRes(((m_nSetBitmap & 2) == 2) ? DEFAULT_BLUE : CHECK_GREEN)); - else - m_BMP_CON.SetImage(ModuleRes(UNCHECK_RED)); - - if(!m_bRestore) - { - if(m_SysPwd.Len() && m_ET_SYSUSR.GetText().Len()) - i++,m_BMP_SYS.SetImage(ModuleRes(CHECK_GREEN)); - else - m_BMP_SYS.SetImage(ModuleRes(UNCHECK_RED)); - - if(m_DomainPwd.Len() ) - i++,m_BMP_DOMAIN.SetImage(ModuleRes(((m_nSetBitmap & 1) == 1) ? DEFAULT_BLUE : CHECK_GREEN)); - else - m_BMP_DOMAIN.SetImage(ModuleRes(UNCHECK_RED)); - } - else if(m_Backup_File.Len()) - i+=2; - - if(m_ET_SYSDEVSPACE.GetText().Len() && m_ET_TRANSACTIONLOG.GetText().Len() && m_ET_DATADEVSPACE.GetText().Len() && - m_ET_SYSDEVSPACE.GetText() != m_ET_TRANSACTIONLOG.GetText() && m_ET_SYSDEVSPACE.GetText() != m_ET_DATADEVSPACE.GetText() && - m_ET_DATADEVSPACE.GetText() != m_ET_TRANSACTIONLOG.GetText()) - i++; - - if(m_DBName.Len()) - i++; - - m_PB_OK.Enable(i == 5); -} -// ----------------------------------------------------------------------------- -sal_Bool OAdabasNewDbDlg::fillEnvironmentVariable(const ::rtl::OUString& _sVariableName,String& _rsValue) -{ - rtl_uString* pDbVar = NULL; - sal_Bool bError = sal_False; - if(osl_getEnvironment(_sVariableName.pData,&pDbVar) == osl_Process_E_None && pDbVar) - { - _rsValue = pDbVar; - rtl::OUString sTemp; - LocalFileHelper::ConvertPhysicalNameToURL(_rsValue, sTemp); - _rsValue = sTemp; - rtl_uString_release(pDbVar); - pDbVar = NULL; - - // ensure dir exists - osl::FileBase::RC rc = osl::Directory::createPath(_rsValue); - if(rc != osl::FileBase::E_None && rc != osl::FileBase::E_EXIST) - { - bError = sal_True; - PostUserEvent(LINK(this, OAdabasNewDbDlg, OnError)); - } - } - return bError; -} -// ----------------------------------------------------------------------------- - -/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ |