connectivity/source/drivers/hsqldb/HUser.cxx

   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 "hsqldb/HUser.hxx"
  21 #include <com/sun/star/sdbc/XRow.hpp>
  22 #include <com/sun/star/sdbc/XResultSet.hpp>
  23 #include "connectivity/dbtools.hxx"
  24 #include "connectivity/dbexception.hxx"
  25 #include <com/sun/star/sdbcx/Privilege.hpp>
  26 #include <com/sun/star/sdbcx/PrivilegeObject.hpp>
  27 #include "TConnection.hxx"
  28 #include "resource/hsqldb_res.hrc"
  29
  30 using namespace connectivity;
  31 using namespace connectivity::hsqldb;
  32 using namespace ::com::sun::star::uno;
  33 using namespace ::com::sun::star::beans;
  34 using namespace ::com::sun::star::sdbcx;
  35 using namespace ::com::sun::star::sdbc;
  36 using namespace ::com::sun::star::container;
  37 using namespace ::com::sun::star::lang;
  38 // -------------------------------------------------------------------------
  39 OHSQLUser::OHSQLUser(   const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection >& _xConnection) : connectivity::sdbcx::OUser(sal_True)
  40                 ,m_xConnection(_xConnection)
  41 {
  42     construct();
  43 }
  44 // -------------------------------------------------------------------------
  45 OHSQLUser::OHSQLUser(   const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection >& _xConnection,
  46                 const OUString& _Name
  47             ) : connectivity::sdbcx::OUser(_Name,sal_True)
  48                 ,m_xConnection(_xConnection)
  49 {
  50     construct();
  51 }
  52 // -------------------------------------------------------------------------
  53 void OHSQLUser::refreshGroups()
  54 {
  55 }
  56 // -------------------------------------------------------------------------
  57 OUserExtend::OUserExtend(   const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection >& _xConnection) : OHSQLUser(_xConnection)
  58 {
  59     construct();
  60 }
  61 // -------------------------------------------------------------------------
  62 void OUserExtend::construct()
  63 {
  64     registerProperty(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_PASSWORD),    PROPERTY_ID_PASSWORD,0,&m_Password,::getCppuType(static_cast< OUString*>(0)));
  65 }
  66 // -----------------------------------------------------------------------------
  67 cppu::IPropertyArrayHelper* OUserExtend::createArrayHelper() const
  68 {
  69     Sequence< Property > aProps;
  70     describeProperties(aProps);
  71     return new cppu::OPropertyArrayHelper(aProps);
  72 }
  73 // -------------------------------------------------------------------------
  74 cppu::IPropertyArrayHelper & OUserExtend::getInfoHelper()
  75 {
  76     return *OUserExtend_PROP::getArrayHelper();
  77 }
  78 typedef connectivity::sdbcx::OUser_BASE OUser_BASE_RBHELPER;
  79 // -----------------------------------------------------------------------------
  80 sal_Int32 SAL_CALL OHSQLUser::getPrivileges( const OUString& objName, sal_Int32 objType ) throw(SQLException, RuntimeException)
  81 {
  82     ::osl::MutexGuard aGuard(m_aMutex);
  83     checkDisposed(OUser_BASE_RBHELPER::rBHelper.bDisposed);
  84
  85     sal_Int32 nRights,nRightsWithGrant;
  86     findPrivilegesAndGrantPrivileges(objName,objType,nRights,nRightsWithGrant);
  87     return nRights;
  88 }
  89 // -----------------------------------------------------------------------------
  90 void OHSQLUser::findPrivilegesAndGrantPrivileges(const OUString& objName, sal_Int32 objType,sal_Int32& nRights,sal_Int32& nRightsWithGrant) throw(SQLException, RuntimeException)
  91 {
  92     nRightsWithGrant = nRights = 0;
  93     // first we need to create the sql stmt to select the privs
  94     Reference<XDatabaseMetaData> xMeta = m_xConnection->getMetaData();
  95     OUString sCatalog,sSchema,sTable;
  96     ::dbtools::qualifiedNameComponents(xMeta,objName,sCatalog,sSchema,sTable,::dbtools::eInDataManipulation);
  97     Reference<XResultSet> xRes;
  98     switch(objType)
  99     {
 100         case PrivilegeObject::TABLE:
 101         case PrivilegeObject::VIEW:
 102             {
 103                 Any aCatalog;
 104                 if ( !sCatalog.isEmpty() )
 105                     aCatalog <<= sCatalog;
 106                 xRes = xMeta->getTablePrivileges(aCatalog,sSchema,sTable);
 107             }
 108             break;
 109
 110         case PrivilegeObject::COLUMN:
 111             {
 112                 Any aCatalog;
 113                 if ( !sCatalog.isEmpty() )
 114                     aCatalog <<= sCatalog;
 115                 xRes = xMeta->getColumnPrivileges(aCatalog,sSchema,sTable,OUString("%"));
 116             }
 117             break;
 118     }
 119
 120     if ( xRes.is() )
 121     {
 122         static const OUString sSELECT(  "SELECT" );
 123         static const OUString sINSERT(  "INSERT" );
 124         static const OUString sUPDATE(  "UPDATE" );
 125         static const OUString sDELETE(  "DELETE" );
 126         static const OUString sREAD(  "READ" );
 127         static const OUString sCREATE(  "CREATE" );
 128         static const OUString sALTER(  "ALTER" );
 129         static const OUString sREFERENCE(  "REFERENCE" );
 130         static const OUString sDROP(  "DROP" );
 131         static const OUString sYes(  "YES" );
 132
 133         nRightsWithGrant = nRights = 0;
 134
 135         Reference<XRow> xCurrentRow(xRes,UNO_QUERY);
 136         while( xCurrentRow.is() && xRes->next() )
 137         {
 138             OUString sGrantee    = xCurrentRow->getString(5);
 139             OUString sPrivilege  = xCurrentRow->getString(6);
 140             OUString sGrantable  = xCurrentRow->getString(7);
 141
 142             if (!m_Name.equalsIgnoreAsciiCase(sGrantee))
 143                 continue;
 144
 145             if (sPrivilege.equalsIgnoreAsciiCase(sSELECT))
 146             {
 147                 nRights |= Privilege::SELECT;
 148                 if ( sGrantable.equalsIgnoreAsciiCase(sYes) )
 149                     nRightsWithGrant |= Privilege::SELECT;
 150             }
 151             else if (sPrivilege.equalsIgnoreAsciiCase(sINSERT))
 152             {
 153                 nRights |= Privilege::INSERT;
 154                 if ( sGrantable.equalsIgnoreAsciiCase(sYes) )
 155                     nRightsWithGrant |= Privilege::INSERT;
 156             }
 157             else if (sPrivilege.equalsIgnoreAsciiCase(sUPDATE))
 158             {
 159                 nRights |= Privilege::UPDATE;
 160                 if ( sGrantable.equalsIgnoreAsciiCase(sYes) )
 161                     nRightsWithGrant |= Privilege::UPDATE;
 162             }
 163             else if (sPrivilege.equalsIgnoreAsciiCase(sDELETE))
 164             {
 165                 nRights |= Privilege::DELETE;
 166                 if ( sGrantable.equalsIgnoreAsciiCase(sYes) )
 167                     nRightsWithGrant |= Privilege::DELETE;
 168             }
 169             else if (sPrivilege.equalsIgnoreAsciiCase(sREAD))
 170             {
 171                 nRights |= Privilege::READ;
 172                 if ( sGrantable.equalsIgnoreAsciiCase(sYes) )
 173                     nRightsWithGrant |= Privilege::READ;
 174             }
 175             else if (sPrivilege.equalsIgnoreAsciiCase(sCREATE))
 176             {
 177                 nRights |= Privilege::CREATE;
 178                 if ( sGrantable.equalsIgnoreAsciiCase(sYes) )
 179                     nRightsWithGrant |= Privilege::CREATE;
 180             }
 181             else if (sPrivilege.equalsIgnoreAsciiCase(sALTER))
 182             {
 183                 nRights |= Privilege::ALTER;
 184                 if ( sGrantable.equalsIgnoreAsciiCase(sYes) )
 185                     nRightsWithGrant |= Privilege::ALTER;
 186             }
 187             else if (sPrivilege.equalsIgnoreAsciiCase(sREFERENCE))
 188             {
 189                 nRights |= Privilege::REFERENCE;
 190                 if ( sGrantable.equalsIgnoreAsciiCase(sYes) )
 191                     nRightsWithGrant |= Privilege::REFERENCE;
 192             }
 193             else if (sPrivilege.equalsIgnoreAsciiCase(sDROP))
 194             {
 195                 nRights |= Privilege::DROP;
 196                 if ( sGrantable.equalsIgnoreAsciiCase(sYes) )
 197                     nRightsWithGrant |= Privilege::DROP;
 198             }
 199         }
 200         ::comphelper::disposeComponent(xRes);
 201     }
 202 }
 203 // -------------------------------------------------------------------------
 204 sal_Int32 SAL_CALL OHSQLUser::getGrantablePrivileges( const OUString& objName, sal_Int32 objType ) throw(SQLException, RuntimeException)
 205 {
 206     ::osl::MutexGuard aGuard(m_aMutex);
 207     checkDisposed(OUser_BASE_RBHELPER::rBHelper.bDisposed);
 208
 209     sal_Int32 nRights,nRightsWithGrant;
 210     findPrivilegesAndGrantPrivileges(objName,objType,nRights,nRightsWithGrant);
 211     return nRightsWithGrant;
 212 }
 213 // -------------------------------------------------------------------------
 214 void SAL_CALL OHSQLUser::grantPrivileges( const OUString& objName, sal_Int32 objType, sal_Int32 objPrivileges ) throw(SQLException, RuntimeException)
 215 {
 216     if ( objType != PrivilegeObject::TABLE )
 217     {
 218         ::connectivity::SharedResources aResources;
 219         const OUString sError( aResources.getResourceString(STR_PRIVILEGE_NOT_GRANTED));
 220         ::dbtools::throwGenericSQLException(sError,*this);
 221     } // if ( objType != PrivilegeObject::TABLE )
 222
 223
 224     ::osl::MutexGuard aGuard(m_aMutex);
 225
 226     OUString sPrivs = getPrivilegeString(objPrivileges);
 227     if(!sPrivs.isEmpty())
 228     {
 229         OUString sGrant;
 230         sGrant += OUString("GRANT ");
 231         sGrant += sPrivs;
 232         sGrant += OUString(" ON ");
 233         Reference<XDatabaseMetaData> xMeta = m_xConnection->getMetaData();
 234         sGrant += ::dbtools::quoteTableName(xMeta,objName,::dbtools::eInDataManipulation);
 235         sGrant += OUString(" TO ");
 236         sGrant += m_Name;
 237
 238         Reference<XStatement> xStmt = m_xConnection->createStatement();
 239         if(xStmt.is())
 240             xStmt->execute(sGrant);
 241         ::comphelper::disposeComponent(xStmt);
 242     }
 243 }
 244 // -------------------------------------------------------------------------
 245 void SAL_CALL OHSQLUser::revokePrivileges( const OUString& objName, sal_Int32 objType, sal_Int32 objPrivileges ) throw(SQLException, RuntimeException)
 246 {
 247     if ( objType != PrivilegeObject::TABLE )
 248     {
 249         ::connectivity::SharedResources aResources;
 250         const OUString sError( aResources.getResourceString(STR_PRIVILEGE_NOT_REVOKED));
 251         ::dbtools::throwGenericSQLException(sError,*this);
 252     } // if ( objType != PrivilegeObject::TABLE )
 253
 254     ::osl::MutexGuard aGuard(m_aMutex);
 255     checkDisposed(OUser_BASE_RBHELPER::rBHelper.bDisposed);
 256     OUString sPrivs = getPrivilegeString(objPrivileges);
 257     if(!sPrivs.isEmpty())
 258     {
 259         OUString sGrant;
 260         sGrant += OUString("REVOKE ");
 261         sGrant += sPrivs;
 262         sGrant += OUString(" ON ");
 263         Reference<XDatabaseMetaData> xMeta = m_xConnection->getMetaData();
 264         sGrant += ::dbtools::quoteTableName(xMeta,objName,::dbtools::eInDataManipulation);
 265         sGrant += OUString(" FROM ");
 266         sGrant += m_Name;
 267
 268         Reference<XStatement> xStmt = m_xConnection->createStatement();
 269         if(xStmt.is())
 270             xStmt->execute(sGrant);
 271         ::comphelper::disposeComponent(xStmt);
 272     }
 273 }
 274 // -----------------------------------------------------------------------------
 275 // XUser
 276 void SAL_CALL OHSQLUser::changePassword( const OUString& /*oldPassword*/, const OUString& newPassword ) throw(SQLException, RuntimeException)
 277 {
 278     ::osl::MutexGuard aGuard(m_aMutex);
 279     checkDisposed(OUser_BASE_RBHELPER::rBHelper.bDisposed);
 280     OUString sAlterPwd;
 281     sAlterPwd = OUString("SET PASSWORD FOR ");
 282     sAlterPwd += m_Name;
 283     sAlterPwd += OUString("@\"%\" = PASSWORD('") ;
 284     sAlterPwd += newPassword;
 285     sAlterPwd += OUString("')") ;
 286
 287
 288     Reference<XStatement> xStmt = m_xConnection->createStatement();
 289     if ( xStmt.is() )
 290     {
 291         xStmt->execute(sAlterPwd);
 292         ::comphelper::disposeComponent(xStmt);
 293     }
 294 }
 295 // -----------------------------------------------------------------------------
 296 OUString OHSQLUser::getPrivilegeString(sal_Int32 nRights) const
 297 {
 298     OUString sPrivs;
 299     if((nRights & Privilege::INSERT) == Privilege::INSERT)
 300         sPrivs += OUString("INSERT");
 301
 302     if((nRights & Privilege::DELETE) == Privilege::DELETE)
 303     {
 304         if(!sPrivs.isEmpty())
 305             sPrivs += OUString(",");
 306         sPrivs += OUString("DELETE");
 307     }
 308
 309     if((nRights & Privilege::UPDATE) == Privilege::UPDATE)
 310     {
 311         if(!sPrivs.isEmpty())
 312             sPrivs += OUString(",");
 313         sPrivs += OUString("UPDATE");
 314     }
 315
 316     if((nRights & Privilege::ALTER) == Privilege::ALTER)
 317     {
 318         if(!sPrivs.isEmpty())
 319             sPrivs += OUString(",");
 320         sPrivs += OUString("ALTER");
 321     }
 322
 323     if((nRights & Privilege::SELECT) == Privilege::SELECT)
 324     {
 325         if(!sPrivs.isEmpty())
 326             sPrivs += OUString(",");
 327         sPrivs += OUString("SELECT");
 328     }
 329
 330     if((nRights & Privilege::REFERENCE) == Privilege::REFERENCE)
 331     {
 332         if(!sPrivs.isEmpty())
 333             sPrivs += OUString(",");
 334         sPrivs += OUString("REFERENCES");
 335     }
 336
 337     return sPrivs;
 338 }
 339 // -----------------------------------------------------------------------------
 340
 341 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */