1*cdf0e10cSrcweir /************************************************************************* 2*cdf0e10cSrcweir * 3*cdf0e10cSrcweir * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4*cdf0e10cSrcweir * 5*cdf0e10cSrcweir * Copyright 2000, 2010 Oracle and/or its affiliates. 6*cdf0e10cSrcweir * 7*cdf0e10cSrcweir * OpenOffice.org - a multi-platform office productivity suite 8*cdf0e10cSrcweir * 9*cdf0e10cSrcweir * This file is part of OpenOffice.org. 10*cdf0e10cSrcweir * 11*cdf0e10cSrcweir * OpenOffice.org is free software: you can redistribute it and/or modify 12*cdf0e10cSrcweir * it under the terms of the GNU Lesser General Public License version 3 13*cdf0e10cSrcweir * only, as published by the Free Software Foundation. 14*cdf0e10cSrcweir * 15*cdf0e10cSrcweir * OpenOffice.org is distributed in the hope that it will be useful, 16*cdf0e10cSrcweir * but WITHOUT ANY WARRANTY; without even the implied warranty of 17*cdf0e10cSrcweir * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18*cdf0e10cSrcweir * GNU Lesser General Public License version 3 for more details 19*cdf0e10cSrcweir * (a copy is included in the LICENSE file that accompanied this code). 20*cdf0e10cSrcweir * 21*cdf0e10cSrcweir * You should have received a copy of the GNU Lesser General Public License 22*cdf0e10cSrcweir * version 3 along with OpenOffice.org. If not, see 23*cdf0e10cSrcweir * <http://www.openoffice.org/license.html> 24*cdf0e10cSrcweir * for a copy of the LGPLv3 License. 25*cdf0e10cSrcweir * 26*cdf0e10cSrcweir ************************************************************************/ 27*cdf0e10cSrcweir 28*cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove 29*cdf0e10cSrcweir #include "precompiled_connectivity.hxx" 30*cdf0e10cSrcweir #include "adabas/BCatalog.hxx" 31*cdf0e10cSrcweir #include "adabas/BConnection.hxx" 32*cdf0e10cSrcweir #include "adabas/BGroups.hxx" 33*cdf0e10cSrcweir #include "adabas/BUsers.hxx" 34*cdf0e10cSrcweir #include "adabas/BTables.hxx" 35*cdf0e10cSrcweir #include "adabas/BViews.hxx" 36*cdf0e10cSrcweir #include <com/sun/star/sdbc/XRow.hpp> 37*cdf0e10cSrcweir #include <com/sun/star/sdbc/XResultSet.hpp> 38*cdf0e10cSrcweir #include <comphelper/types.hxx> 39*cdf0e10cSrcweir 40*cdf0e10cSrcweir 41*cdf0e10cSrcweir // ------------------------------------------------------------------------- 42*cdf0e10cSrcweir using namespace connectivity; 43*cdf0e10cSrcweir using namespace connectivity::adabas; 44*cdf0e10cSrcweir using namespace ::com::sun::star::uno; 45*cdf0e10cSrcweir using namespace ::com::sun::star::beans; 46*cdf0e10cSrcweir using namespace ::com::sun::star::sdbcx; 47*cdf0e10cSrcweir using namespace ::com::sun::star::sdbc; 48*cdf0e10cSrcweir using namespace ::com::sun::star::container; 49*cdf0e10cSrcweir using namespace ::com::sun::star::lang; 50*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 51*cdf0e10cSrcweir OAdabasCatalog::OAdabasCatalog(SQLHANDLE _aConnectionHdl, OAdabasConnection* _pCon) : connectivity::sdbcx::OCatalog(_pCon) 52*cdf0e10cSrcweir ,m_pConnection(_pCon) 53*cdf0e10cSrcweir ,m_aConnectionHdl(_aConnectionHdl) 54*cdf0e10cSrcweir { 55*cdf0e10cSrcweir } 56*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 57*cdf0e10cSrcweir ::rtl::OUString OAdabasCatalog::buildName(const Reference< XRow >& _xRow) 58*cdf0e10cSrcweir { 59*cdf0e10cSrcweir ::rtl::OUString sName; 60*cdf0e10cSrcweir sName = _xRow->getString(2); 61*cdf0e10cSrcweir if ( sName.getLength() ) 62*cdf0e10cSrcweir sName += OAdabasCatalog::getDot(); 63*cdf0e10cSrcweir sName += _xRow->getString(3); 64*cdf0e10cSrcweir 65*cdf0e10cSrcweir 66*cdf0e10cSrcweir return sName; 67*cdf0e10cSrcweir } 68*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 69*cdf0e10cSrcweir void OAdabasCatalog::fillVector(const ::rtl::OUString& _sQuery,TStringVector& _rVector) 70*cdf0e10cSrcweir { 71*cdf0e10cSrcweir Reference< XStatement > xStmt = m_pConnection->createStatement( ); 72*cdf0e10cSrcweir OSL_ENSURE(xStmt.is(),"OAdabasCatalog::fillVector: Could not create a statement!"); 73*cdf0e10cSrcweir Reference< XResultSet > xResult = xStmt->executeQuery(_sQuery); 74*cdf0e10cSrcweir 75*cdf0e10cSrcweir fillNames(xResult,_rVector); 76*cdf0e10cSrcweir ::comphelper::disposeComponent(xStmt); 77*cdf0e10cSrcweir 78*cdf0e10cSrcweir } 79*cdf0e10cSrcweir // ------------------------------------------------------------------------- 80*cdf0e10cSrcweir void OAdabasCatalog::refreshTables() 81*cdf0e10cSrcweir { 82*cdf0e10cSrcweir TStringVector aVector; 83*cdf0e10cSrcweir { 84*cdf0e10cSrcweir Sequence< ::rtl::OUString > aTypes(1); 85*cdf0e10cSrcweir aTypes[0] = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("%")); 86*cdf0e10cSrcweir Reference< XResultSet > xResult = m_xMetaData->getTables(Any(), 87*cdf0e10cSrcweir ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("%")), 88*cdf0e10cSrcweir ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("%")), 89*cdf0e10cSrcweir aTypes); 90*cdf0e10cSrcweir fillNames(xResult,aVector); 91*cdf0e10cSrcweir } 92*cdf0e10cSrcweir 93*cdf0e10cSrcweir if(m_pTables) 94*cdf0e10cSrcweir m_pTables->reFill(aVector); 95*cdf0e10cSrcweir else 96*cdf0e10cSrcweir m_pTables = new OTables(m_xMetaData,*this,m_aMutex,aVector); 97*cdf0e10cSrcweir } 98*cdf0e10cSrcweir // ------------------------------------------------------------------------- 99*cdf0e10cSrcweir void OAdabasCatalog::refreshViews() 100*cdf0e10cSrcweir { 101*cdf0e10cSrcweir TStringVector aVector; 102*cdf0e10cSrcweir static const ::rtl::OUString s_sView(RTL_CONSTASCII_USTRINGPARAM("SELECT DISTINCT NULL,DOMAIN.VIEWDEFS.OWNER, DOMAIN.VIEWDEFS.VIEWNAME FROM DOMAIN.VIEWDEFS")); 103*cdf0e10cSrcweir fillVector(s_sView,aVector); 104*cdf0e10cSrcweir 105*cdf0e10cSrcweir if(m_pViews) 106*cdf0e10cSrcweir m_pViews->reFill(aVector); 107*cdf0e10cSrcweir else 108*cdf0e10cSrcweir m_pViews = new OViews(m_xMetaData,*this,m_aMutex,aVector); 109*cdf0e10cSrcweir } 110*cdf0e10cSrcweir // ------------------------------------------------------------------------- 111*cdf0e10cSrcweir void OAdabasCatalog::refreshGroups() 112*cdf0e10cSrcweir { 113*cdf0e10cSrcweir TStringVector aVector; 114*cdf0e10cSrcweir static const ::rtl::OUString s_sGroup(RTL_CONSTASCII_USTRINGPARAM("SELECT DISTINCT NULL,NULL,GROUPNAME FROM DOMAIN.USERS WHERE GROUPNAME IS NOT NULL AND GROUPNAME <> ' '")); 115*cdf0e10cSrcweir fillVector(s_sGroup,aVector); 116*cdf0e10cSrcweir if(m_pGroups) 117*cdf0e10cSrcweir m_pGroups->reFill(aVector); 118*cdf0e10cSrcweir else 119*cdf0e10cSrcweir m_pGroups = new OGroups(*this,m_aMutex,aVector,m_pConnection,this); 120*cdf0e10cSrcweir } 121*cdf0e10cSrcweir // ------------------------------------------------------------------------- 122*cdf0e10cSrcweir void OAdabasCatalog::refreshUsers() 123*cdf0e10cSrcweir { 124*cdf0e10cSrcweir TStringVector aVector; 125*cdf0e10cSrcweir static const ::rtl::OUString s_sUsers(RTL_CONSTASCII_USTRINGPARAM("SELECT DISTINCT NULL,NULL,USERNAME FROM DOMAIN.USERS WHERE USERNAME IS NOT NULL AND USERNAME <> ' ' AND USERNAME <> 'CONTROL'")); 126*cdf0e10cSrcweir fillVector(s_sUsers,aVector); 127*cdf0e10cSrcweir 128*cdf0e10cSrcweir if(m_pUsers) 129*cdf0e10cSrcweir m_pUsers->reFill(aVector); 130*cdf0e10cSrcweir else 131*cdf0e10cSrcweir m_pUsers = new OUsers(*this,m_aMutex,aVector,m_pConnection,this); 132*cdf0e10cSrcweir } 133*cdf0e10cSrcweir // ------------------------------------------------------------------------- 134*cdf0e10cSrcweir const ::rtl::OUString& OAdabasCatalog::getDot() 135*cdf0e10cSrcweir { 136*cdf0e10cSrcweir static const ::rtl::OUString sDot(RTL_CONSTASCII_USTRINGPARAM(".")); 137*cdf0e10cSrcweir return sDot; 138*cdf0e10cSrcweir } 139*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 140*cdf0e10cSrcweir void OAdabasCatalog::correctColumnProperties(sal_Int32 /*_nPrec*/, sal_Int32& _rnType,::rtl::OUString& _rsTypeName) 141*cdf0e10cSrcweir { 142*cdf0e10cSrcweir switch(_rnType) 143*cdf0e10cSrcweir { 144*cdf0e10cSrcweir case DataType::DECIMAL: 145*cdf0e10cSrcweir { 146*cdf0e10cSrcweir static const ::rtl::OUString sDecimal(RTL_CONSTASCII_USTRINGPARAM("DECIMAL")); 147*cdf0e10cSrcweir if(_rnType == DataType::DECIMAL && _rsTypeName == sDecimal) 148*cdf0e10cSrcweir _rnType = DataType::NUMERIC; 149*cdf0e10cSrcweir } 150*cdf0e10cSrcweir break; 151*cdf0e10cSrcweir case DataType::FLOAT: 152*cdf0e10cSrcweir // if(_nPrec >= 16) 153*cdf0e10cSrcweir { 154*cdf0e10cSrcweir static const ::rtl::OUString sDouble(RTL_CONSTASCII_USTRINGPARAM("DOUBLE PRECISION")); 155*cdf0e10cSrcweir _rsTypeName = sDouble; 156*cdf0e10cSrcweir _rnType = DataType::DOUBLE; 157*cdf0e10cSrcweir } 158*cdf0e10cSrcweir // else if(_nPrec > 15) 159*cdf0e10cSrcweir // { 160*cdf0e10cSrcweir // static const ::rtl::OUString sReal = ::rtl::OUString::createFromAscii("REAL"); 161*cdf0e10cSrcweir // _rsTypeName = sReal; 162*cdf0e10cSrcweir // _rnType = DataType::REAL; 163*cdf0e10cSrcweir // } 164*cdf0e10cSrcweir break; 165*cdf0e10cSrcweir } 166*cdf0e10cSrcweir } 167*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 168*cdf0e10cSrcweir 169