INTEGRATION: CWS insight01 (1.1.2); FILE ADDED

2004/04/29 08:25:40 oj 1.1.2.5: check if user admin is possible
2004/04/26 10:24:58 oj 1.1.2.4: show error message when user admin does not exist
2004/03/31 06:49:11 oj 1.1.2.3: check if ds is readonly
2004/03/17 12:18:21 oj 1.1.2.2: #111075# new method to set title
2004/03/15 12:28:08 oj 1.1.2.1: #111075# ongoing work

1 files changed, 265 insertions, 0 deletions

diff --git a/dbaccess/source/ui/dlg/UserAdminDlg.cxx b/dbaccess/source/ui/dlg/UserAdminDlg.cxx
new file mode 100644
index 000000000000..61d94c40a093
--- /dev/null
+++ b/dbaccess/source/ui/dlg/UserAdminDlg.cxx
@@ -0,0 +1,265 @@
+/*************************************************************************
+ *
+ *  $RCSfile: UserAdminDlg.cxx,v $
+ *
+ *  $Revision: 1.2 $
+ *
+ *  last change: $Author: hr $ $Date: 2004-08-02 15:42:22 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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 for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (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.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc..
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): Ocke Janssen
+ *
+ *
+ ************************************************************************/
+
+#ifndef DBAUI_USERADMINDLG_HXX
+#include "UserAdminDlg.hxx"
+#endif
+#ifndef DBAUI_USERADMINDLG_HRC
+#include "UserAdminDlg.hrc"
+#endif
+#ifndef _DBU_DLG_HRC_
+#include "dbu_dlg.hrc"
+#endif
+#ifndef _DBAUI_MODULE_DBU_HXX_
+#include "moduledbu.hxx"
+#endif
+#ifndef _DBAUI_DATASOURCEITEMS_HXX_
+#include "dsitems.hxx"
+#endif
+#ifndef _SFXSTRITEM_HXX
+#include <svtools/stritem.hxx>
+#endif
+#ifndef _SFXENUMITEM_HXX
+#include <svtools/eitem.hxx>
+#endif
+#ifndef _SFXINTITEM_HXX
+#include <svtools/intitem.hxx>
+#endif
+#ifndef _VCL_STDTEXT_HXX
+#include <vcl/stdtext.hxx>
+#endif
+#ifndef _SV_MSGBOX_HXX
+#include <vcl/msgbox.hxx>
+#endif
+#ifndef _DBAUI_DATASOURCEITEMS_HXX_
+#include "dsitems.hxx"
+#endif
+#ifndef DBAUI_DRIVERSETTINGS_HXX
+#include "DriverSettings.hxx"
+#endif
+#ifndef _DBAUI_DBADMINIMPL_HXX_
+#include "DbAdminImpl.hxx"
+#endif
+#ifndef _DBAUI_PROPERTYSETITEM_HXX_
+#include "propertysetitem.hxx"
+#endif
+#ifndef _DBAUI_ADMINPAGES_HXX_
+#include "adminpages.hxx"
+#endif
+#ifndef DBAUI_USERADMIN_HXX
+#include "UserAdmin.hxx"
+#endif
+#ifndef DBAUI_TOOLS_HXX
+#include "UITools.hxx"
+#endif
+#ifndef _COM_SUN_STAR_SDBCX_XDATADEFINITIONSUPPLIER_HPP_
+#include <com/sun/star/sdbcx/XDataDefinitionSupplier.hpp>
+#endif
+#ifndef _COM_SUN_STAR_SDBCX_XUSERSSUPPLIER_HPP_
+#include <com/sun/star/sdbcx/XUsersSupplier.hpp>
+#endif
+//.........................................................................
+namespace dbaui
+{
+//.........................................................................
+    using namespace ::com::sun::star::uno;
+    using namespace ::com::sun::star::beans;
+    using namespace ::com::sun::star::lang;
+    using namespace ::com::sun::star::sdbc;
+    using namespace ::com::sun::star::sdbcx;
+
+    //========================================================================
+    //= OUserAdminDlg
+    //========================================================================
+    OUserAdminDlg::OUserAdminDlg(Window* _pParent
+                                            , SfxItemSet* _pItems
+                                            ,const Reference< XMultiServiceFactory >& _rxORB
+                                            ,const ::com::sun::star::uno::Any& _aDataSourceName)
+        :SfxTabDialog(_pParent, ModuleRes(DLG_DATABASE_USERADMIN), _pItems)
+        ,m_pItemSet(_pItems)
+    {
+        m_pImpl = ::std::auto_ptr<ODbDataSourceAdministrationHelper>(new ODbDataSourceAdministrationHelper(_rxORB,_pParent,this));
+        m_pImpl->setCurrentDataSourceName(_aDataSourceName);
+        Reference< XPropertySet > xDatasource = m_pImpl->getCurrentDataSource();
+        m_pImpl->translateProperties(xDatasource, *_pItems);
+        SetInputSet(_pItems);
+        // propagate this set as our new input set and reset the example set
+        delete pExampleSet;
+        pExampleSet = new SfxItemSet(*GetInputSetImpl());
+
+        AddTabPage(TAB_PAGE_USERADMIN, String(ResId(STR_PAGETITLE_USERADMIN)), OUserAdmin::Create,0, sal_False, 1);
+
+        // remove the reset button - it's meaning is much too ambiguous in this dialog
+        RemoveResetButton();
+        FreeResource();
+    }
+
+    // -----------------------------------------------------------------------
+    OUserAdminDlg::~OUserAdminDlg()
+    {
+        try
+        {
+            ::comphelper::disposeComponent(m_xConnection);
+        }
+        catch(Exception){}
+
+        SetInputSet(NULL);
+        DELETEZ(pExampleSet);
+    }
+    // -----------------------------------------------------------------------
+    short OUserAdminDlg::Execute()
+    {
+        try
+        {
+            Reference< XDataDefinitionSupplier > xDriver(getDriver(),UNO_QUERY);
+            sal_Bool bError = !xDriver.is();
+            if ( !bError )
+            {
+                m_xConnection = createConnection();
+                if ( m_xConnection.is() )
+                {
+                    // now set the tables supplier at the table control
+                    Reference< XTablesSupplier > xTablesSup = xDriver->getDataDefinitionByConnection(m_xConnection);
+
+                    Reference<XUsersSupplier> xUsersSup(xTablesSup,UNO_QUERY);
+                    bError = !xUsersSup.is();
+                }
+            }
+            if ( bError )
+            {
+                String sError(ModuleRes(STR_USERADMIN_NOT_AVAILABLE));
+                throw SQLException(sError,NULL,::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("S1000")) ,0,Any());
+            }
+        }
+        catch(SQLException& e)
+        {
+            ::dbaui::showError(::dbtools::SQLExceptionInfo(e),GetParent(),getORB());
+            return RET_CANCEL;
+        }
+        short nRet = SfxTabDialog::Execute();
+        if ( nRet == RET_OK )
+            m_pImpl->saveChanges(*GetOutputItemSet());
+        return nRet;
+    }
+    //-------------------------------------------------------------------------
+    void OUserAdminDlg::PageCreated(USHORT _nId, SfxTabPage& _rPage)
+    {
+        // register ourself as modified listener
+        static_cast<OGenericAdministrationPage&>(_rPage).SetServiceFactory(m_pImpl->getORB());
+        static_cast<OGenericAdministrationPage&>(_rPage).SetAdminDialog(this,this);
+
+        AdjustLayout();
+        Window *pWin = GetViewWindow();
+        if(pWin)
+            pWin->Invalidate();
+
+        SfxTabDialog::PageCreated(_nId, _rPage);
+    }
+    // -----------------------------------------------------------------------------
+    const SfxItemSet* OUserAdminDlg::getOutputSet() const
+    {
+        return m_pItemSet;
+    }
+    // -----------------------------------------------------------------------------
+    SfxItemSet* OUserAdminDlg::getWriteOutputSet()
+    {
+        return m_pItemSet;
+    }
+    // -----------------------------------------------------------------------------
+    Reference< XConnection > OUserAdminDlg::createConnection()
+    {
+        if ( !m_xConnection.is() )
+            m_xConnection = m_pImpl->createConnection();
+        return m_xConnection;
+    }
+    // -----------------------------------------------------------------------------
+    Reference< XMultiServiceFactory > OUserAdminDlg::getORB()
+    {
+        return m_pImpl->getORB();
+    }
+    // -----------------------------------------------------------------------------
+    Reference< XDriver > OUserAdminDlg::getDriver()
+    {
+        return m_pImpl->getDriver();
+    }
+    // -----------------------------------------------------------------------------
+    DATASOURCE_TYPE OUserAdminDlg::getDatasourceType(const SfxItemSet& _rSet) const
+    {
+        return m_pImpl->getDatasourceType(_rSet);
+    }
+    // -----------------------------------------------------------------------------
+    void OUserAdminDlg::clearPassword()
+    {
+        m_pImpl->clearPassword();
+    }
+    // -----------------------------------------------------------------------------
+    void OUserAdminDlg::setTitle(const ::rtl::OUString& _sTitle)
+    {
+        SetText(_sTitle);
+    }
+    //-------------------------------------------------------------------------
+    sal_Bool OUserAdminDlg::saveDatasource()
+    {
+        return PrepareLeaveCurrentPage();
+    }
+//.........................................................................
+}   // namespace dbaui
+//.........................................................................