LCOV - code coverage report
Current view: top level - dbaccess/source/ui/dlg - dlgsave.cxx (source / functions) Hit Total Coverage
Test: commit 10e77ab3ff6f4314137acd6e2702a6e5c1ce1fae Lines: 1 138 0.7 %
Date: 2014-11-03 Functions: 2 19 10.5 %
Legend: Lines: hit not hit

          Line data    Source code
       1             : /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
       2             : /*
       3             :  * This file is part of the LibreOffice project.
       4             :  *
       5             :  * This Source Code Form is subject to the terms of the Mozilla Public
       6             :  * License, v. 2.0. If a copy of the MPL was not distributed with this
       7             :  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
       8             :  *
       9             :  * This file incorporates work covered by the following license notice:
      10             :  *
      11             :  *   Licensed to the Apache Software Foundation (ASF) under one or more
      12             :  *   contributor license agreements. See the NOTICE file distributed
      13             :  *   with this work for additional information regarding copyright
      14             :  *   ownership. The ASF licenses this file to you under the Apache
      15             :  *   License, Version 2.0 (the "License"); you may not use this file
      16             :  *   except in compliance with the License. You may obtain a copy of
      17             :  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
      18             :  */
      19             : 
      20             : #include "dlgsave.hxx"
      21             : #include <vcl/msgbox.hxx>
      22             : #include "dbu_dlg.hrc"
      23             : #include <com/sun/star/sdb/CommandType.hpp>
      24             : #include <com/sun/star/sdbc/XRow.hpp>
      25             : #include "sqlmessage.hxx"
      26             : #include <connectivity/dbtools.hxx>
      27             : #include "UITools.hxx"
      28             : #include "dbaccess_helpid.hrc"
      29             : #include "SqlNameEdit.hxx"
      30             : #include <vcl/button.hxx>
      31             : #include <vcl/fixed.hxx>
      32             : #include <vcl/edit.hxx>
      33             : #include <com/sun/star/container/XNameAccess.hpp>
      34             : #include <com/sun/star/container/XHierarchicalNameAccess.hpp>
      35             : #include <com/sun/star/sdbc/XDatabaseMetaData.hpp>
      36             : #include "moduledbu.hxx"
      37             : #include "objectnamecheck.hxx"
      38             : #include <tools/diagnose_ex.h>
      39             : 
      40             : using namespace dbaui;
      41             : using namespace dbtools;
      42             : using namespace ::com::sun::star::uno;
      43             : using namespace ::com::sun::star::container;
      44             : using namespace ::com::sun::star::sdb;
      45             : using namespace ::com::sun::star::sdbc;
      46             : namespace dbaui
      47             : {
      48           0 : class OSaveAsDlgImpl
      49             : {
      50             : public:
      51             :     FixedText*          m_pDescription;
      52             :     FixedText*          m_pCatalogLbl;
      53             :     OSQLNameComboBox*   m_pCatalog;
      54             :     FixedText*          m_pSchemaLbl;
      55             :     OSQLNameComboBox*   m_pSchema;
      56             :     FixedText*          m_pLabel;
      57             :     OSQLNameEdit*       m_pTitle;
      58             :     OKButton*           m_pPB_OK;
      59             :     OUString            m_aQryLabel;
      60             :     OUString            m_sTblLabel;
      61             :     OUString            m_aName;
      62             :     const IObjectNameCheck&
      63             :                         m_rObjectNameCheck;
      64             :     OUString            m_sParentURL;
      65             :     ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XDatabaseMetaData>            m_xMetaData;
      66             :     sal_Int32           m_nType;
      67             :     sal_Int32           m_nFlags;
      68             : 
      69             :     OSaveAsDlgImpl( OSaveAsDlg* pParent,const sal_Int32& _rType,
      70             :                     const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection>& _xConnection,
      71             :                     const OUString& rDefault,
      72             :                     const IObjectNameCheck& _rObjectNameCheck,
      73             :                     sal_Int32 _nFlags);
      74             :     OSaveAsDlgImpl( OSaveAsDlg* pParent,
      75             :                     const OUString& rDefault,
      76             :                     const IObjectNameCheck& _rObjectNameCheck,
      77             :                     sal_Int32 _nFlags);
      78             : };
      79             : 
      80             : } // dbaui
      81             : 
      82           0 : OSaveAsDlgImpl::OSaveAsDlgImpl(OSaveAsDlg* pParent,
      83             :                         const sal_Int32& _rType,
      84             :                         const Reference< XConnection>& _xConnection,
      85             :                         const OUString& rDefault,
      86             :                         const IObjectNameCheck& _rObjectNameCheck,
      87             :                         sal_Int32 _nFlags)
      88             :     : m_aQryLabel(ModuleRes(STR_QRY_LABEL))
      89             :     , m_sTblLabel(ModuleRes(STR_TBL_LABEL))
      90             :     , m_aName(rDefault)
      91             :     , m_rObjectNameCheck( _rObjectNameCheck )
      92             :     , m_nType(_rType)
      93           0 :     , m_nFlags(_nFlags)
      94             : {
      95           0 :     pParent->get(m_pDescription, "descriptionft");
      96           0 :     pParent->get(m_pCatalogLbl, "catalogft");
      97           0 :     pParent->get(m_pCatalog, "catalog");
      98           0 :     pParent->get(m_pSchemaLbl, "schemaft");
      99           0 :     pParent->get(m_pSchema, "schema");
     100           0 :     pParent->get(m_pLabel, "titleft");
     101           0 :     pParent->get(m_pTitle, "title");
     102           0 :     pParent->get(m_pPB_OK, "ok");
     103             : 
     104           0 :     if ( _xConnection.is() )
     105           0 :         m_xMetaData = _xConnection->getMetaData();
     106             : 
     107           0 :     if ( m_xMetaData.is() )
     108             :     {
     109           0 :         OUString sExtraNameChars( m_xMetaData->getExtraNameCharacters() );
     110           0 :         m_pCatalog->setAllowedChars( sExtraNameChars );
     111           0 :         m_pSchema->setAllowedChars( sExtraNameChars );
     112           0 :         m_pTitle->setAllowedChars( sExtraNameChars );
     113             :     }
     114             : 
     115           0 :     m_pCatalog->SetDropDownLineCount( 10 );
     116           0 :     m_pSchema->SetDropDownLineCount( 10 );
     117           0 : }
     118             : 
     119           0 : OSaveAsDlgImpl::OSaveAsDlgImpl(OSaveAsDlg* pParent,
     120             :                         const OUString& rDefault,
     121             :                         const IObjectNameCheck& _rObjectNameCheck,
     122             :                         sal_Int32 _nFlags)
     123             :     : m_aQryLabel(ModuleRes(STR_QRY_LABEL))
     124             :     , m_sTblLabel(ModuleRes(STR_TBL_LABEL))
     125             :     , m_aName(rDefault)
     126             :     , m_rObjectNameCheck( _rObjectNameCheck )
     127             :     , m_nType(CommandType::COMMAND)
     128           0 :     , m_nFlags(_nFlags)
     129             : {
     130           0 :     pParent->get(m_pDescription, "descriptionft");
     131           0 :     pParent->get(m_pCatalogLbl, "catalogft");
     132           0 :     pParent->get(m_pCatalog, "catalog");
     133           0 :     pParent->get(m_pSchemaLbl, "schemaft");
     134           0 :     pParent->get(m_pSchema, "schema");
     135           0 :     pParent->get(m_pLabel, "titleft");
     136           0 :     pParent->get(m_pTitle, "title");
     137           0 :     pParent->get(m_pPB_OK, "ok");
     138             : 
     139           0 :     m_pCatalog->SetDropDownLineCount( 10 );
     140           0 :     m_pSchema->SetDropDownLineCount( 10 );
     141           0 : }
     142             : 
     143             : using namespace ::com::sun::star::lang;
     144             : 
     145             : namespace
     146             : {
     147             :     typedef Reference< XResultSet > (SAL_CALL XDatabaseMetaData::*FGetMetaStrings)();
     148             : 
     149           0 :     void lcl_fillComboList( ComboBox& _rList, const Reference< XConnection >& _rxConnection,
     150             :         FGetMetaStrings _GetAll, const OUString& _rCurrent )
     151             :     {
     152             :         try
     153             :         {
     154           0 :             Reference< XDatabaseMetaData > xMetaData( _rxConnection->getMetaData(), UNO_QUERY_THROW );
     155             : 
     156           0 :             Reference< XResultSet > xRes = (xMetaData.get()->*_GetAll)();
     157           0 :             Reference< XRow > xRow( xRes, UNO_QUERY_THROW );
     158           0 :             OUString sValue;
     159           0 :             while ( xRes->next() )
     160             :             {
     161           0 :                 sValue = xRow->getString( 1 );
     162           0 :                 if ( !xRow->wasNull() )
     163           0 :                     _rList.InsertEntry( sValue );
     164             :             }
     165             : 
     166           0 :             sal_Int32 nPos = _rList.GetEntryPos( OUString( _rCurrent ) );
     167           0 :             if ( nPos != COMBOBOX_ENTRY_NOTFOUND )
     168           0 :                 _rList.SelectEntryPos( nPos );
     169             :             else
     170           0 :                 _rList.SelectEntryPos( 0 );
     171             :         }
     172           0 :         catch( const Exception& )
     173             :         {
     174             :             DBG_UNHANDLED_EXCEPTION();
     175             :         }
     176           0 :     }
     177             : }
     178             : 
     179           0 : OSaveAsDlg::OSaveAsDlg( vcl::Window * pParent,
     180             :                         const sal_Int32& _rType,
     181             :                         const Reference< XComponentContext >& _rxContext,
     182             :                         const Reference< XConnection>& _xConnection,
     183             :                         const OUString& rDefault,
     184             :                         const IObjectNameCheck& _rObjectNameCheck,
     185             :                         sal_Int32 _nFlags)
     186             :     : ModalDialog(pParent, "SaveDialog", "dbaccess/ui/savedialog.ui")
     187           0 :     , m_xContext( _rxContext )
     188             : {
     189           0 :     m_pImpl = new OSaveAsDlgImpl(this,_rType,_xConnection,rDefault,_rObjectNameCheck,_nFlags);
     190             : 
     191           0 :     switch (_rType)
     192             :     {
     193             :         case CommandType::QUERY:
     194           0 :             implInitOnlyTitle(m_pImpl->m_aQryLabel);
     195           0 :             break;
     196             : 
     197             :         case CommandType::TABLE:
     198             :             OSL_ENSURE( m_pImpl->m_xMetaData.is(), "OSaveAsDlg::OSaveAsDlg: no meta data for entering table names: this will crash!" );
     199             :             {
     200           0 :                 m_pImpl->m_pLabel->SetText(m_pImpl->m_sTblLabel);
     201           0 :                 if(m_pImpl->m_xMetaData.is() && !m_pImpl->m_xMetaData->supportsCatalogsInTableDefinitions())
     202             :                 {
     203           0 :                     m_pImpl->m_pCatalogLbl->Hide();
     204           0 :                     m_pImpl->m_pCatalog->Hide();
     205             :                 }
     206             :                 else
     207             :                 {
     208             :                     // now fill the catalogs
     209             :                     lcl_fillComboList( *m_pImpl->m_pCatalog, _xConnection,
     210           0 :                         &XDatabaseMetaData::getCatalogs, _xConnection->getCatalog() );
     211             :                 }
     212             : 
     213           0 :                 if ( !m_pImpl->m_xMetaData->supportsSchemasInTableDefinitions())
     214             :                 {
     215           0 :                     m_pImpl->m_pSchemaLbl->Hide();
     216           0 :                     m_pImpl->m_pSchema->Hide();
     217             :                 }
     218             :                 else
     219             :                 {
     220             :                     lcl_fillComboList( *m_pImpl->m_pSchema, _xConnection,
     221           0 :                         &XDatabaseMetaData::getSchemas, m_pImpl->m_xMetaData->getUserName() );
     222             :                 }
     223             : 
     224             :                 OSL_ENSURE(m_pImpl->m_xMetaData.is(),"The metadata can not be null!");
     225           0 :                 if(m_pImpl->m_aName.indexOf('.') != -1)
     226             :                 {
     227           0 :                     OUString sCatalog,sSchema,sTable;
     228             :                     ::dbtools::qualifiedNameComponents(m_pImpl->m_xMetaData,
     229             :                                                         m_pImpl->m_aName,
     230             :                                                         sCatalog,
     231             :                                                         sSchema,
     232             :                                                         sTable,
     233           0 :                                                         ::dbtools::eInDataManipulation);
     234             : 
     235           0 :                     sal_Int32 nPos = m_pImpl->m_pCatalog->GetEntryPos(OUString(sCatalog));
     236           0 :                     if ( nPos != COMBOBOX_ENTRY_NOTFOUND )
     237           0 :                         m_pImpl->m_pCatalog->SelectEntryPos(nPos);
     238             : 
     239           0 :                     if ( !sSchema.isEmpty() )
     240             :                     {
     241           0 :                         nPos = m_pImpl->m_pSchema->GetEntryPos(OUString(sSchema));
     242           0 :                         if ( nPos != COMBOBOX_ENTRY_NOTFOUND )
     243           0 :                             m_pImpl->m_pSchema->SelectEntryPos(nPos);
     244             :                     }
     245           0 :                     m_pImpl->m_pTitle->SetText(sTable);
     246             :                 }
     247             :                 else
     248           0 :                     m_pImpl->m_pTitle->SetText(m_pImpl->m_aName);
     249           0 :                 m_pImpl->m_pTitle->SetSelection( Selection( SELECTION_MIN, SELECTION_MAX ) );
     250             : 
     251           0 :                 sal_Int32 nLength =  m_pImpl->m_xMetaData.is() ? m_pImpl->m_xMetaData->getMaxTableNameLength() : 0;
     252           0 :                 nLength = nLength ? nLength : EDIT_NOLIMIT;
     253             : 
     254           0 :                 m_pImpl->m_pTitle->SetMaxTextLen(nLength);
     255           0 :                 m_pImpl->m_pSchema->SetMaxTextLen(nLength);
     256           0 :                 m_pImpl->m_pCatalog->SetMaxTextLen(nLength);
     257             : 
     258           0 :                 bool bCheck = _xConnection.is() && isSQL92CheckEnabled(_xConnection);
     259           0 :                 m_pImpl->m_pTitle->setCheck(bCheck); // enable non valid sql chars as well
     260           0 :                 m_pImpl->m_pSchema->setCheck(bCheck); // enable non valid sql chars as well
     261           0 :                 m_pImpl->m_pCatalog->setCheck(bCheck); // enable non valid sql chars as well
     262             :             }
     263           0 :             break;
     264             : 
     265             :         default:
     266             :             OSL_FAIL( "OSaveAsDlg::OSaveAsDlg: Type not supported yet!" );
     267             :     }
     268             : 
     269           0 :     implInit();
     270           0 : }
     271             : 
     272           0 : OSaveAsDlg::OSaveAsDlg( vcl::Window * pParent,
     273             :                         const Reference< XComponentContext >& _rxContext,
     274             :                         const OUString& rDefault,
     275             :                         const OUString& _sLabel,
     276             :                         const IObjectNameCheck& _rObjectNameCheck,
     277             :                         sal_Int32 _nFlags)
     278             :     : ModalDialog(pParent, "SaveDialog", "dbaccess/ui/savedialog.ui")
     279           0 :     , m_xContext( _rxContext )
     280             : {
     281           0 :     m_pImpl = new OSaveAsDlgImpl(this,rDefault,_rObjectNameCheck,_nFlags);
     282           0 :     implInitOnlyTitle(_sLabel);
     283           0 :     implInit();
     284           0 : }
     285             : 
     286           0 : OSaveAsDlg::~OSaveAsDlg()
     287             : {
     288           0 :     DELETEZ(m_pImpl);
     289           0 : }
     290             : 
     291           0 : IMPL_LINK(OSaveAsDlg, ButtonClickHdl, Button *, pButton)
     292             : {
     293           0 :     if (pButton == m_pImpl->m_pPB_OK)
     294             :     {
     295           0 :         m_pImpl->m_aName = m_pImpl->m_pTitle->GetText();
     296             : 
     297           0 :         OUString sNameToCheck( m_pImpl->m_aName );
     298             : 
     299           0 :         if ( m_pImpl->m_nType == CommandType::TABLE )
     300             :         {
     301           0 :             sNameToCheck = ::dbtools::composeTableName(
     302             :                 m_pImpl->m_xMetaData,
     303             :                 getCatalog(),
     304             :                 getSchema(),
     305             :                 sNameToCheck,
     306             :                 false,  // no quoting
     307             :                 ::dbtools::eInDataManipulation
     308           0 :             );
     309             :         }
     310             : 
     311           0 :         SQLExceptionInfo aNameError;
     312           0 :         if ( m_pImpl->m_rObjectNameCheck.isNameValid( sNameToCheck, aNameError ) )
     313           0 :             EndDialog( RET_OK );
     314             : 
     315           0 :         showError( aNameError, this, m_xContext );
     316           0 :         m_pImpl->m_pTitle->GrabFocus();
     317             :     }
     318           0 :     return 0;
     319             : }
     320             : 
     321           0 : IMPL_LINK(OSaveAsDlg, EditModifyHdl, Edit *, pEdit )
     322             : {
     323           0 :     if (pEdit == m_pImpl->m_pTitle)
     324           0 :         m_pImpl->m_pPB_OK->Enable(!m_pImpl->m_pTitle->GetText().isEmpty());
     325           0 :     return 0;
     326             : }
     327             : 
     328           0 : void OSaveAsDlg::implInitOnlyTitle(const OUString& _rLabel)
     329             : {
     330           0 :     m_pImpl->m_pLabel->SetText(_rLabel);
     331           0 :     m_pImpl->m_pCatalogLbl->Hide();
     332           0 :     m_pImpl->m_pCatalog->Hide();
     333           0 :     m_pImpl->m_pSchemaLbl->Hide();
     334           0 :     m_pImpl->m_pSchema->Hide();
     335             : 
     336           0 :     m_pImpl->m_pTitle->SetText(m_pImpl->m_aName);
     337           0 :     m_pImpl->m_pTitle->setCheck(false); // enable non valid sql chars as well
     338           0 : }
     339             : 
     340           0 : void OSaveAsDlg::implInit()
     341             : {
     342           0 :     if ( 0 == ( m_pImpl->m_nFlags & SAD_ADDITIONAL_DESCRIPTION ) )
     343             :     {
     344             :         // hide the description window
     345           0 :         m_pImpl->m_pDescription->Hide();
     346             :     }
     347             : 
     348           0 :     if ( SAD_TITLE_PASTE_AS == ( m_pImpl->m_nFlags & SAD_TITLE_PASTE_AS ) )
     349           0 :         SetText( ModuleRes( STR_TITLE_PASTE_AS ) );
     350           0 :     else if ( SAD_TITLE_RENAME == ( m_pImpl->m_nFlags & SAD_TITLE_RENAME ) )
     351           0 :         SetText( ModuleRes( STR_TITLE_RENAME ) );
     352             : 
     353           0 :     m_pImpl->m_pPB_OK->SetClickHdl(LINK(this,OSaveAsDlg,ButtonClickHdl));
     354           0 :     m_pImpl->m_pTitle->SetModifyHdl(LINK(this,OSaveAsDlg,EditModifyHdl));
     355           0 :     m_pImpl->m_pTitle->GrabFocus();
     356           0 : }
     357             : 
     358           0 : OUString OSaveAsDlg::getName() const      { return m_pImpl->m_aName; }
     359           0 : OUString OSaveAsDlg::getCatalog() const   { return m_pImpl->m_pCatalog->IsVisible() ? m_pImpl->m_pCatalog->GetText() : OUString(); }
     360          72 : OUString OSaveAsDlg::getSchema() const    { return m_pImpl->m_pSchema->IsVisible() ? m_pImpl->m_pSchema->GetText() : OUString(); }
     361             : 
     362             : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */

Generated by: LCOV version 1.10