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