| /************************************************************** |
| * |
| * 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_DLGSAVE_HXX |
| #include "dlgsave.hxx" |
| #endif |
| #ifndef DBAUI_DLGSAVE_HRC |
| #include "dlgsave.hrc" |
| #endif |
| #ifndef _SV_MSGBOX_HXX //autogen |
| #include <vcl/msgbox.hxx> |
| #endif |
| #ifndef _DBU_DLG_HRC_ |
| #include "dbu_dlg.hrc" |
| #endif |
| #ifndef _COM_SUN_STAR_SDB_COMMANDTYPE_HPP_ |
| #include <com/sun/star/sdb/CommandType.hpp> |
| #endif |
| #ifndef _COM_SUN_STAR_SDBC_XROW_HPP_ |
| #include <com/sun/star/sdbc/XRow.hpp> |
| #endif |
| #ifndef _DBAUI_SQLMESSAGE_HXX_ |
| #include "sqlmessage.hxx" |
| #endif |
| #ifndef _CONNECTIVITY_DBTOOLS_HXX_ |
| #include <connectivity/dbtools.hxx> |
| #endif |
| #ifndef DBAUI_TOOLS_HXX |
| #include "UITools.hxx" |
| #endif |
| #ifndef _DBA_DBACCESS_HELPID_HRC_ |
| #include "dbaccess_helpid.hrc" |
| #endif |
| #ifndef DBAUI_SQLNAMEEDIT_HXX |
| #include "SqlNameEdit.hxx" |
| #endif |
| #ifndef _BUTTON_HXX //autogen |
| #include <vcl/button.hxx> |
| #endif |
| #ifndef _FIXED_HXX //autogen |
| #include <vcl/fixed.hxx> |
| #endif |
| #ifndef _EDIT_HXX //autogen |
| #include <vcl/edit.hxx> |
| #endif |
| #ifndef _COM_SUN_STAR_CONTAINER_XNAMEACCESS_HPP_ |
| #include <com/sun/star/container/XNameAccess.hpp> |
| #endif |
| #ifndef _COM_SUN_STAR_CONTAINER_XHIERARCHICALNAMEACCESS_HPP_ |
| #include <com/sun/star/container/XHierarchicalNameAccess.hpp> |
| #endif |
| #ifndef _COM_SUN_STAR_SDBC_XDATABASEMETADATA_HPP_ |
| #include <com/sun/star/sdbc/XDatabaseMetaData.hpp> |
| #endif |
| #ifndef _DBAUI_MODULE_DBU_HXX_ |
| #include "moduledbu.hxx" |
| #endif |
| #ifndef DBACCESS_SOURCE_UI_INC_OBJECTNAMECHECK_HXX |
| #include "objectnamecheck.hxx" |
| #endif |
| #ifndef TOOLS_DIAGNOSE_EX_H |
| #include <tools/diagnose_ex.h> |
| #endif |
| |
| |
| using namespace dbaui; |
| using namespace dbtools; |
| using namespace ::com::sun::star::uno; |
| using namespace ::com::sun::star::container; |
| using namespace ::com::sun::star::sdb; |
| using namespace ::com::sun::star::sdbc; |
| namespace dbaui |
| { |
| class OSaveAsDlgImpl |
| { |
| public: |
| FixedText m_aDescription; |
| FixedText m_aCatalogLbl; |
| OSQLNameComboBox m_aCatalog; |
| FixedText m_aSchemaLbl; |
| OSQLNameComboBox m_aSchema; |
| FixedText m_aLabel; |
| OSQLNameEdit m_aTitle; |
| OKButton m_aPB_OK; |
| CancelButton m_aPB_CANCEL; |
| HelpButton m_aPB_HELP; |
| String m_aQryLabel; |
| String m_sTblLabel; |
| rtl::OUString m_sCatalog; |
| rtl::OUString m_sSchema; |
| String m_aName; |
| const IObjectNameCheck& |
| m_rObjectNameCheck; |
| String m_sParentURL; |
| ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XDatabaseMetaData> m_xMetaData; |
| sal_Int32 m_nType; |
| sal_Int32 m_nFlags; |
| |
| OSaveAsDlgImpl( Window * pParent,const sal_Int32& _rType, |
| const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection>& _xConnection, |
| const String& rDefault, |
| const IObjectNameCheck& _rObjectNameCheck, |
| sal_Int32 _nFlags); |
| OSaveAsDlgImpl( Window * pParent, |
| const String& rDefault, |
| const IObjectNameCheck& _rObjectNameCheck, |
| sal_Int32 _nFlags); |
| }; |
| // ----------------------------------------------------------------------------- |
| } // dbaui |
| // ----------------------------------------------------------------------------- |
| OSaveAsDlgImpl::OSaveAsDlgImpl( Window * _pParent, |
| const sal_Int32& _rType, |
| const Reference< XConnection>& _xConnection, |
| const String& rDefault, |
| const IObjectNameCheck& _rObjectNameCheck, |
| sal_Int32 _nFlags) |
| :m_aDescription(_pParent, ModuleRes (FT_DESCRIPTION)) |
| ,m_aCatalogLbl(_pParent, ModuleRes (FT_CATALOG)) |
| ,m_aCatalog(_pParent, ModuleRes (ET_CATALOG), ::rtl::OUString()) |
| ,m_aSchemaLbl(_pParent, ModuleRes (FT_SCHEMA)) |
| ,m_aSchema(_pParent, ModuleRes (ET_SCHEMA), ::rtl::OUString()) |
| ,m_aLabel(_pParent, ModuleRes (FT_TITLE)) |
| ,m_aTitle(_pParent, ModuleRes (ET_TITLE), ::rtl::OUString()) |
| ,m_aPB_OK(_pParent, ModuleRes( PB_OK ) ) |
| ,m_aPB_CANCEL(_pParent, ModuleRes( PB_CANCEL )) |
| ,m_aPB_HELP(_pParent, ModuleRes( PB_HELP)) |
| ,m_aQryLabel(ModuleRes(STR_QRY_LABEL)) |
| ,m_sTblLabel(ModuleRes(STR_TBL_LABEL)) |
| ,m_aName(rDefault) |
| ,m_rObjectNameCheck( _rObjectNameCheck ) |
| ,m_nType(_rType) |
| ,m_nFlags(_nFlags) |
| { |
| if ( _xConnection.is() ) |
| m_xMetaData = _xConnection->getMetaData(); |
| |
| if ( m_xMetaData.is() ) |
| { |
| ::rtl::OUString sExtraNameChars( m_xMetaData->getExtraNameCharacters() ); |
| m_aCatalog.setAllowedChars( sExtraNameChars ); |
| m_aSchema.setAllowedChars( sExtraNameChars ); |
| m_aTitle.setAllowedChars( sExtraNameChars ); |
| } |
| |
| m_aCatalog.SetDropDownLineCount( 10 ); |
| m_aSchema.SetDropDownLineCount( 10 ); |
| } |
| // ----------------------------------------------------------------------------- |
| OSaveAsDlgImpl::OSaveAsDlgImpl( Window * _pParent, |
| const String& rDefault, |
| const IObjectNameCheck& _rObjectNameCheck, |
| sal_Int32 _nFlags) |
| :m_aDescription(_pParent, ModuleRes (FT_DESCRIPTION)) |
| ,m_aCatalogLbl(_pParent, ModuleRes (FT_CATALOG)) |
| ,m_aCatalog(_pParent, ModuleRes (ET_CATALOG)) |
| ,m_aSchemaLbl(_pParent, ModuleRes (FT_SCHEMA)) |
| ,m_aSchema(_pParent, ModuleRes (ET_SCHEMA)) |
| ,m_aLabel(_pParent, ModuleRes (FT_TITLE)) |
| ,m_aTitle(_pParent, ModuleRes (ET_TITLE)) |
| ,m_aPB_OK(_pParent, ModuleRes( PB_OK ) ) |
| ,m_aPB_CANCEL(_pParent, ModuleRes( PB_CANCEL )) |
| ,m_aPB_HELP(_pParent, ModuleRes( PB_HELP)) |
| ,m_aQryLabel(ModuleRes(STR_QRY_LABEL)) |
| ,m_sTblLabel(ModuleRes(STR_TBL_LABEL)) |
| ,m_aName(rDefault) |
| ,m_rObjectNameCheck( _rObjectNameCheck ) |
| ,m_nType(CommandType::COMMAND) |
| ,m_nFlags(_nFlags) |
| { |
| m_aCatalog.SetDropDownLineCount( 10 ); |
| m_aSchema.SetDropDownLineCount( 10 ); |
| } |
| |
| // ----------------------------------------------------------------------------- |
| using namespace ::com::sun::star::lang; |
| |
| //================================================================== |
| namespace |
| { |
| typedef Reference< XResultSet > (SAL_CALL XDatabaseMetaData::*FGetMetaStrings)(); |
| |
| void lcl_fillComboList( ComboBox& _rList, const Reference< XConnection >& _rxConnection, |
| FGetMetaStrings _GetAll, const ::rtl::OUString& _rCurrent ) |
| { |
| try |
| { |
| Reference< XDatabaseMetaData > xMetaData( _rxConnection->getMetaData(), UNO_QUERY_THROW ); |
| |
| Reference< XResultSet > xRes = (xMetaData.get()->*_GetAll)(); |
| Reference< XRow > xRow( xRes, UNO_QUERY_THROW ); |
| ::rtl::OUString sValue; |
| while ( xRes->next() ) |
| { |
| sValue = xRow->getString( 1 ); |
| if ( !xRow->wasNull() ) |
| _rList.InsertEntry( sValue ); |
| } |
| |
| sal_uInt16 nPos = _rList.GetEntryPos( String( _rCurrent ) ); |
| if ( nPos != COMBOBOX_ENTRY_NOTFOUND ) |
| _rList.SelectEntryPos( nPos ); |
| else |
| _rList.SelectEntryPos( 0 ); |
| } |
| catch( const Exception& ) |
| { |
| DBG_UNHANDLED_EXCEPTION(); |
| } |
| } |
| } |
| |
| //================================================================== |
| OSaveAsDlg::OSaveAsDlg( Window * pParent, |
| const sal_Int32& _rType, |
| const Reference< XMultiServiceFactory >& _rxORB, |
| const Reference< XConnection>& _xConnection, |
| const String& rDefault, |
| const IObjectNameCheck& _rObjectNameCheck, |
| sal_Int32 _nFlags) |
| :ModalDialog( pParent, ModuleRes(DLG_SAVE_AS)) |
| ,m_xORB( _rxORB ) |
| { |
| m_pImpl = new OSaveAsDlgImpl(this,_rType,_xConnection,rDefault,_rObjectNameCheck,_nFlags); |
| |
| switch (_rType) |
| { |
| case CommandType::QUERY: |
| implInitOnlyTitle(m_pImpl->m_aQryLabel); |
| break; |
| |
| case CommandType::TABLE: |
| OSL_ENSURE( m_pImpl->m_xMetaData.is(), "OSaveAsDlg::OSaveAsDlg: no meta data for entering table names: this will crash!" ); |
| { |
| m_pImpl->m_aLabel.SetText(m_pImpl->m_sTblLabel); |
| Point aPos(m_pImpl->m_aPB_OK.GetPosPixel()); |
| if(m_pImpl->m_xMetaData.is() && !m_pImpl->m_xMetaData->supportsCatalogsInTableDefinitions()) |
| { |
| m_pImpl->m_aCatalogLbl.Hide(); |
| m_pImpl->m_aCatalog.Hide(); |
| |
| aPos = m_pImpl->m_aLabel.GetPosPixel(); |
| |
| m_pImpl->m_aLabel.SetPosPixel(m_pImpl->m_aSchemaLbl.GetPosPixel()); |
| m_pImpl->m_aTitle.SetPosPixel(m_pImpl->m_aSchema.GetPosPixel()); |
| |
| m_pImpl->m_aSchemaLbl.SetPosPixel(m_pImpl->m_aCatalogLbl.GetPosPixel()); |
| m_pImpl->m_aSchema.SetPosPixel(m_pImpl->m_aCatalog.GetPosPixel()); |
| } |
| else |
| { |
| // now fill the catalogs |
| lcl_fillComboList( m_pImpl->m_aCatalog, _xConnection, |
| &XDatabaseMetaData::getCatalogs, _xConnection->getCatalog() ); |
| } |
| |
| if ( !m_pImpl->m_xMetaData->supportsSchemasInTableDefinitions()) |
| { |
| m_pImpl->m_aSchemaLbl.Hide(); |
| m_pImpl->m_aSchema.Hide(); |
| |
| aPos = m_pImpl->m_aLabel.GetPosPixel(); |
| |
| m_pImpl->m_aLabel.SetPosPixel(m_pImpl->m_aSchemaLbl.GetPosPixel()); |
| m_pImpl->m_aTitle.SetPosPixel(m_pImpl->m_aSchema.GetPosPixel()); |
| } |
| else |
| { |
| lcl_fillComboList( m_pImpl->m_aSchema, _xConnection, |
| &XDatabaseMetaData::getSchemas, m_pImpl->m_xMetaData->getUserName() ); |
| } |
| |
| OSL_ENSURE(m_pImpl->m_xMetaData.is(),"The metadata can not be null!"); |
| if(m_pImpl->m_aName.Search('.') != STRING_NOTFOUND) |
| { |
| ::rtl::OUString sCatalog,sSchema,sTable; |
| ::dbtools::qualifiedNameComponents(m_pImpl->m_xMetaData, |
| m_pImpl->m_aName, |
| sCatalog, |
| sSchema, |
| sTable, |
| ::dbtools::eInDataManipulation); |
| |
| sal_uInt16 nPos = m_pImpl->m_aCatalog.GetEntryPos(String(sCatalog)); |
| if ( nPos != COMBOBOX_ENTRY_NOTFOUND ) |
| m_pImpl->m_aCatalog.SelectEntryPos(nPos); |
| |
| if ( sSchema.getLength() ) |
| { |
| nPos = m_pImpl->m_aSchema.GetEntryPos(String(sSchema)); |
| if ( nPos != COMBOBOX_ENTRY_NOTFOUND ) |
| m_pImpl->m_aSchema.SelectEntryPos(nPos); |
| } |
| m_pImpl->m_aTitle.SetText(sTable); |
| } |
| else |
| m_pImpl->m_aTitle.SetText(m_pImpl->m_aName); |
| m_pImpl->m_aTitle.SetSelection( Selection( SELECTION_MIN, SELECTION_MAX ) ); |
| |
| m_pImpl->m_aPB_OK.SetPosPixel(Point(m_pImpl->m_aPB_OK.GetPosPixel().X(),aPos.Y())); |
| m_pImpl->m_aPB_CANCEL.SetPosPixel(Point(m_pImpl->m_aPB_CANCEL.GetPosPixel().X(),aPos.Y())); |
| m_pImpl->m_aPB_HELP.SetPosPixel(Point(m_pImpl->m_aPB_HELP.GetPosPixel().X(),aPos.Y())); |
| |
| sal_uInt16 nLength = m_pImpl->m_xMetaData.is() ? static_cast<sal_uInt16>(m_pImpl->m_xMetaData->getMaxTableNameLength()) : 0; |
| nLength = nLength ? nLength : EDIT_NOLIMIT; |
| |
| m_pImpl->m_aTitle.SetMaxTextLen(nLength); |
| m_pImpl->m_aSchema.SetMaxTextLen(nLength); |
| m_pImpl->m_aCatalog.SetMaxTextLen(nLength); |
| |
| sal_Bool bCheck = _xConnection.is() && isSQL92CheckEnabled(_xConnection); |
| m_pImpl->m_aTitle.setCheck(bCheck); // enable non valid sql chars as well |
| m_pImpl->m_aSchema.setCheck(bCheck); // enable non valid sql chars as well |
| m_pImpl->m_aCatalog.setCheck(bCheck); // enable non valid sql chars as well |
| |
| Size aSize = GetSizePixel(); |
| aSize.Height() = |
| aPos.Y() + m_pImpl->m_aPB_OK.GetSizePixel().Height() + m_pImpl->m_aTitle.GetSizePixel().Height() / 2; |
| SetSizePixel(aSize); |
| } |
| break; |
| |
| default: |
| OSL_ENSURE( false, "OSaveAsDlg::OSaveAsDlg: Type not supported yet!" ); |
| } |
| |
| implInit(); |
| } |
| // ----------------------------------------------------------------------------- |
| OSaveAsDlg::OSaveAsDlg( Window * pParent, |
| const Reference< XMultiServiceFactory >& _rxORB, |
| const String& rDefault, |
| const String& _sLabel, |
| const IObjectNameCheck& _rObjectNameCheck, |
| sal_Int32 _nFlags) |
| :ModalDialog( pParent, ModuleRes(DLG_SAVE_AS)) |
| ,m_xORB( _rxORB ) |
| { |
| m_pImpl = new OSaveAsDlgImpl(this,rDefault,_rObjectNameCheck,_nFlags); |
| implInitOnlyTitle(_sLabel); |
| implInit(); |
| } |
| // ----------------------------------------------------------------------------- |
| OSaveAsDlg::~OSaveAsDlg() |
| { |
| DELETEZ(m_pImpl); |
| } |
| // ----------------------------------------------------------------------------- |
| IMPL_LINK(OSaveAsDlg, ButtonClickHdl, Button *, pButton) |
| { |
| if (pButton == &m_pImpl->m_aPB_OK) |
| { |
| m_pImpl->m_aName = m_pImpl->m_aTitle.GetText(); |
| |
| ::rtl::OUString sNameToCheck( m_pImpl->m_aName ); |
| |
| if ( m_pImpl->m_nType == CommandType::TABLE ) |
| { |
| sNameToCheck = ::dbtools::composeTableName( |
| m_pImpl->m_xMetaData, |
| getCatalog(), |
| getSchema(), |
| sNameToCheck, |
| sal_False, // no quoting |
| ::dbtools::eInDataManipulation |
| ); |
| } |
| |
| SQLExceptionInfo aNameError; |
| if ( m_pImpl->m_rObjectNameCheck.isNameValid( sNameToCheck, aNameError ) ) |
| EndDialog( RET_OK ); |
| |
| showError( aNameError, this, m_xORB ); |
| m_pImpl->m_aTitle.GrabFocus(); |
| } |
| return 0; |
| } |
| // ----------------------------------------------------------------------------- |
| |
| IMPL_LINK(OSaveAsDlg, EditModifyHdl, Edit *, pEdit ) |
| { |
| if (pEdit == &m_pImpl->m_aTitle) |
| m_pImpl->m_aPB_OK.Enable(0 != m_pImpl->m_aTitle.GetText().Len()); |
| return 0; |
| } |
| // ----------------------------------------------------------------------------- |
| void OSaveAsDlg::implInitOnlyTitle(const String& _rLabel) |
| { |
| m_pImpl->m_aLabel.SetText(_rLabel); |
| m_pImpl->m_aCatalogLbl.Hide(); |
| m_pImpl->m_aCatalog.Hide(); |
| m_pImpl->m_aSchemaLbl.Hide(); |
| m_pImpl->m_aSchema.Hide(); |
| |
| Point aPos(m_pImpl->m_aSchemaLbl.GetPosPixel()); |
| m_pImpl->m_aLabel.SetPosPixel(m_pImpl->m_aCatalogLbl.GetPosPixel()); |
| m_pImpl->m_aTitle.SetPosPixel(m_pImpl->m_aCatalog.GetPosPixel()); |
| |
| m_pImpl->m_aPB_OK.SetPosPixel(Point(m_pImpl->m_aPB_OK.GetPosPixel().X(),aPos.Y())); |
| m_pImpl->m_aPB_CANCEL.SetPosPixel(Point(m_pImpl->m_aPB_CANCEL.GetPosPixel().X(),aPos.Y())); |
| m_pImpl->m_aPB_HELP.SetPosPixel(Point(m_pImpl->m_aPB_HELP.GetPosPixel().X(),aPos.Y())); |
| |
| sal_Int32 nNewHeight = |
| aPos.Y() + m_pImpl->m_aPB_OK.GetSizePixel().Height() + m_pImpl->m_aTitle.GetSizePixel().Height() / 2; |
| |
| SetSizePixel(Size(GetSizePixel().Width(), nNewHeight)); |
| |
| m_pImpl->m_aTitle.SetText(m_pImpl->m_aName); |
| m_pImpl->m_aTitle.setCheck(sal_False); // enable non valid sql chars as well |
| } |
| // ----------------------------------------------------------------------------- |
| void OSaveAsDlg::implInit() |
| { |
| if ( 0 == ( m_pImpl->m_nFlags & SAD_ADDITIONAL_DESCRIPTION ) ) |
| { |
| // hide the description window |
| m_pImpl->m_aDescription.Hide(); |
| |
| // the number of pixels we have to move the other controls |
| sal_Int32 nMoveUp = m_pImpl->m_aCatalog.GetPosPixel().Y() - m_pImpl->m_aDescription.GetPosPixel().Y(); |
| |
| // loop to all controls and move them ... |
| for ( Window* pChildControl = GetWindow( WINDOW_FIRSTCHILD ); |
| pChildControl; |
| pChildControl= pChildControl->GetWindow( WINDOW_NEXT ) |
| ) |
| { |
| if ( &m_pImpl->m_aDescription != pChildControl ) |
| { |
| Point aPos = pChildControl->GetPosPixel(); |
| aPos.Y() -= nMoveUp; |
| pChildControl->SetPosPixel(aPos); |
| } |
| } |
| |
| // change our own size accordingly |
| Size aSize = GetSizePixel(); |
| aSize.Height() -= nMoveUp; |
| SetSizePixel(aSize); |
| } |
| |
| if ( SAD_TITLE_PASTE_AS == ( m_pImpl->m_nFlags & SAD_TITLE_PASTE_AS ) ) |
| SetText( String( ModuleRes( STR_TITLE_PASTE_AS ) ) ); |
| else if ( SAD_TITLE_RENAME == ( m_pImpl->m_nFlags & SAD_TITLE_RENAME ) ) |
| { |
| SetText( String( ModuleRes( STR_TITLE_RENAME ) ) ); |
| m_pImpl->m_aTitle.SetHelpId(HID_DLG_RENAME); |
| } |
| |
| m_pImpl->m_aPB_OK.SetClickHdl(LINK(this,OSaveAsDlg,ButtonClickHdl)); |
| m_pImpl->m_aTitle.SetModifyHdl(LINK(this,OSaveAsDlg,EditModifyHdl)); |
| m_pImpl->m_aTitle.GrabFocus(); |
| FreeResource(); |
| } |
| // ----------------------------------------------------------------------------- |
| String OSaveAsDlg::getName() const { return m_pImpl->m_aName; } |
| String OSaveAsDlg::getCatalog() const { return m_pImpl->m_aCatalog.IsVisible() ? m_pImpl->m_aCatalog.GetText() : String(); } |
| String OSaveAsDlg::getSchema() const { return m_pImpl->m_aSchema.IsVisible() ? m_pImpl->m_aSchema.GetText() : String(); } |
| |