1*b1cdbd2cSJim Jagielski /**************************************************************
2*b1cdbd2cSJim Jagielski *
3*b1cdbd2cSJim Jagielski * Licensed to the Apache Software Foundation (ASF) under one
4*b1cdbd2cSJim Jagielski * or more contributor license agreements. See the NOTICE file
5*b1cdbd2cSJim Jagielski * distributed with this work for additional information
6*b1cdbd2cSJim Jagielski * regarding copyright ownership. The ASF licenses this file
7*b1cdbd2cSJim Jagielski * to you under the Apache License, Version 2.0 (the
8*b1cdbd2cSJim Jagielski * "License"); you may not use this file except in compliance
9*b1cdbd2cSJim Jagielski * with the License. You may obtain a copy of the License at
10*b1cdbd2cSJim Jagielski *
11*b1cdbd2cSJim Jagielski * http://www.apache.org/licenses/LICENSE-2.0
12*b1cdbd2cSJim Jagielski *
13*b1cdbd2cSJim Jagielski * Unless required by applicable law or agreed to in writing,
14*b1cdbd2cSJim Jagielski * software distributed under the License is distributed on an
15*b1cdbd2cSJim Jagielski * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*b1cdbd2cSJim Jagielski * KIND, either express or implied. See the License for the
17*b1cdbd2cSJim Jagielski * specific language governing permissions and limitations
18*b1cdbd2cSJim Jagielski * under the License.
19*b1cdbd2cSJim Jagielski *
20*b1cdbd2cSJim Jagielski *************************************************************/
21*b1cdbd2cSJim Jagielski
22*b1cdbd2cSJim Jagielski
23*b1cdbd2cSJim Jagielski
24*b1cdbd2cSJim Jagielski // MARKER(update_precomp.py): autogen include statement, do not remove
25*b1cdbd2cSJim Jagielski #include "precompiled_connectivity.hxx"
26*b1cdbd2cSJim Jagielski #include "adabas/BUsers.hxx"
27*b1cdbd2cSJim Jagielski #include "adabas/BUser.hxx"
28*b1cdbd2cSJim Jagielski #include "adabas/BTable.hxx"
29*b1cdbd2cSJim Jagielski #include <com/sun/star/sdbc/XRow.hpp>
30*b1cdbd2cSJim Jagielski #include <com/sun/star/sdbc/XResultSet.hpp>
31*b1cdbd2cSJim Jagielski #include "connectivity/sdbcx/IRefreshable.hxx"
32*b1cdbd2cSJim Jagielski #include <comphelper/types.hxx>
33*b1cdbd2cSJim Jagielski #include "connectivity/dbexception.hxx"
34*b1cdbd2cSJim Jagielski #include "connectivity/dbtools.hxx"
35*b1cdbd2cSJim Jagielski #include "resource/adabas_res.hrc"
36*b1cdbd2cSJim Jagielski
37*b1cdbd2cSJim Jagielski using namespace ::comphelper;
38*b1cdbd2cSJim Jagielski using namespace connectivity;
39*b1cdbd2cSJim Jagielski using namespace connectivity::adabas;
40*b1cdbd2cSJim Jagielski using namespace ::com::sun::star::uno;
41*b1cdbd2cSJim Jagielski using namespace ::com::sun::star::beans;
42*b1cdbd2cSJim Jagielski // using namespace ::com::sun::star::sdbcx;
43*b1cdbd2cSJim Jagielski using namespace ::com::sun::star::sdbc;
44*b1cdbd2cSJim Jagielski using namespace ::com::sun::star::container;
45*b1cdbd2cSJim Jagielski using namespace ::com::sun::star::lang;
46*b1cdbd2cSJim Jagielski typedef connectivity::sdbcx::OCollection OCollection_TYPE;
47*b1cdbd2cSJim Jagielski
createObject(const::rtl::OUString & _rName)48*b1cdbd2cSJim Jagielski sdbcx::ObjectType OUsers::createObject(const ::rtl::OUString& _rName)
49*b1cdbd2cSJim Jagielski {
50*b1cdbd2cSJim Jagielski return new OAdabasUser(m_pConnection,_rName);
51*b1cdbd2cSJim Jagielski }
52*b1cdbd2cSJim Jagielski // -------------------------------------------------------------------------
impl_refresh()53*b1cdbd2cSJim Jagielski void OUsers::impl_refresh() throw(RuntimeException)
54*b1cdbd2cSJim Jagielski {
55*b1cdbd2cSJim Jagielski m_pParent->refreshUsers();
56*b1cdbd2cSJim Jagielski }
57*b1cdbd2cSJim Jagielski // -------------------------------------------------------------------------
createDescriptor()58*b1cdbd2cSJim Jagielski Reference< XPropertySet > OUsers::createDescriptor()
59*b1cdbd2cSJim Jagielski {
60*b1cdbd2cSJim Jagielski OUserExtend* pNew = new OUserExtend(m_pConnection);
61*b1cdbd2cSJim Jagielski return pNew;
62*b1cdbd2cSJim Jagielski }
63*b1cdbd2cSJim Jagielski // -------------------------------------------------------------------------
64*b1cdbd2cSJim Jagielski // XAppend
appendObject(const::rtl::OUString & _rForName,const Reference<XPropertySet> & descriptor)65*b1cdbd2cSJim Jagielski sdbcx::ObjectType OUsers::appendObject( const ::rtl::OUString& _rForName, const Reference< XPropertySet >& descriptor )
66*b1cdbd2cSJim Jagielski {
67*b1cdbd2cSJim Jagielski ::rtl::OUString aSql = ::rtl::OUString::createFromAscii("CREATE USER ");
68*b1cdbd2cSJim Jagielski ::rtl::OUString aQuote = m_pConnection->getMetaData()->getIdentifierQuoteString( );
69*b1cdbd2cSJim Jagielski
70*b1cdbd2cSJim Jagielski ::rtl::OUString sUserName( _rForName );
71*b1cdbd2cSJim Jagielski sUserName = sUserName.toAsciiUpperCase();
72*b1cdbd2cSJim Jagielski descriptor->setPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_NAME),makeAny(sUserName));
73*b1cdbd2cSJim Jagielski aSql += ::dbtools::quoteName(aQuote,sUserName)
74*b1cdbd2cSJim Jagielski + ::rtl::OUString::createFromAscii(" PASSWORD ")
75*b1cdbd2cSJim Jagielski + getString(descriptor->getPropertyValue(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_PASSWORD)));
76*b1cdbd2cSJim Jagielski aSql += ::rtl::OUString::createFromAscii(" RESOURCE NOT EXCLUSIVE");
77*b1cdbd2cSJim Jagielski
78*b1cdbd2cSJim Jagielski Reference< XStatement > xStmt = m_pConnection->createStatement( );
79*b1cdbd2cSJim Jagielski if(xStmt.is())
80*b1cdbd2cSJim Jagielski xStmt->execute(aSql);
81*b1cdbd2cSJim Jagielski ::comphelper::disposeComponent(xStmt);
82*b1cdbd2cSJim Jagielski
83*b1cdbd2cSJim Jagielski return createObject( _rForName );
84*b1cdbd2cSJim Jagielski }
85*b1cdbd2cSJim Jagielski // -------------------------------------------------------------------------
86*b1cdbd2cSJim Jagielski // XDrop
dropObject(sal_Int32,const::rtl::OUString _sElementName)87*b1cdbd2cSJim Jagielski void OUsers::dropObject(sal_Int32 /*_nPos*/,const ::rtl::OUString _sElementName)
88*b1cdbd2cSJim Jagielski {
89*b1cdbd2cSJim Jagielski {
90*b1cdbd2cSJim Jagielski // first we have to check if this user is live relevaant for the database
91*b1cdbd2cSJim Jagielski // which means with out these users the database will miss more than one important system table
92*b1cdbd2cSJim Jagielski ::rtl::OUString sUsers = ::rtl::OUString::createFromAscii("SELECT USERMODE,USERNAME FROM DOMAIN.USERS WHERE USERNAME = '");
93*b1cdbd2cSJim Jagielski sUsers += _sElementName + ::rtl::OUString::createFromAscii("'");
94*b1cdbd2cSJim Jagielski Reference< XStatement > xStmt = m_pConnection->createStatement();
95*b1cdbd2cSJim Jagielski if(xStmt.is())
96*b1cdbd2cSJim Jagielski {
97*b1cdbd2cSJim Jagielski Reference<XResultSet> xRes = xStmt->executeQuery(sUsers);
98*b1cdbd2cSJim Jagielski Reference<XRow> xRow(xRes,UNO_QUERY);
99*b1cdbd2cSJim Jagielski if(xRes.is() && xRow.is() && xRes->next()) // there can only be one user with this name
100*b1cdbd2cSJim Jagielski {
101*b1cdbd2cSJim Jagielski static const ::rtl::OUString sDbaUser = ::rtl::OUString::createFromAscii("DBA");
102*b1cdbd2cSJim Jagielski if(xRow->getString(1) == sDbaUser)
103*b1cdbd2cSJim Jagielski {
104*b1cdbd2cSJim Jagielski ::comphelper::disposeComponent(xStmt);
105*b1cdbd2cSJim Jagielski m_pConnection->throwGenericSQLException(STR_USER_NO_DELETE,static_cast< XDrop* >( this ));
106*b1cdbd2cSJim Jagielski }
107*b1cdbd2cSJim Jagielski }
108*b1cdbd2cSJim Jagielski ::comphelper::disposeComponent(xStmt);
109*b1cdbd2cSJim Jagielski }
110*b1cdbd2cSJim Jagielski }
111*b1cdbd2cSJim Jagielski
112*b1cdbd2cSJim Jagielski {
113*b1cdbd2cSJim Jagielski ::rtl::OUString aSql = ::rtl::OUString::createFromAscii("DROP USER ");
114*b1cdbd2cSJim Jagielski ::rtl::OUString aQuote = m_pConnection->getMetaData()->getIdentifierQuoteString( );
115*b1cdbd2cSJim Jagielski aSql += ::dbtools::quoteName(aQuote,_sElementName);
116*b1cdbd2cSJim Jagielski
117*b1cdbd2cSJim Jagielski Reference< XStatement > xStmt = m_pConnection->createStatement( );
118*b1cdbd2cSJim Jagielski if(xStmt.is())
119*b1cdbd2cSJim Jagielski xStmt->execute(aSql);
120*b1cdbd2cSJim Jagielski ::comphelper::disposeComponent(xStmt);
121*b1cdbd2cSJim Jagielski }
122*b1cdbd2cSJim Jagielski }
123*b1cdbd2cSJim Jagielski
124*b1cdbd2cSJim Jagielski // -------------------------------------------------------------------------
125