xref: /AOO41X/main/connectivity/source/drivers/ado/AColumn.cxx (revision 9b5730f6ddef7eb82608ca4d31dc0d7678e652cf)
1 /**************************************************************
2  *
3  * Licensed to the Apache Software Foundation (ASF) under one
4  * or more contributor license agreements.  See the NOTICE file
5  * distributed with this work for additional information
6  * regarding copyright ownership.  The ASF licenses this file
7  * to you under the Apache License, Version 2.0 (the
8  * "License"); you may not use this file except in compliance
9  * with the License.  You may obtain a copy of the License at
10  *
11  *   http://www.apache.org/licenses/LICENSE-2.0
12  *
13  * Unless required by applicable law or agreed to in writing,
14  * software distributed under the License is distributed on an
15  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16  * KIND, either express or implied.  See the License for the
17  * specific language governing permissions and limitations
18  * under the License.
19  *
20  *************************************************************/
21 
22 
23 
24 // MARKER(update_precomp.py): autogen include statement, do not remove
25 #include "precompiled_connectivity.hxx"
26 #include "ado/AColumn.hxx"
27 #include "ado/AConnection.hxx"
28 #include "ado/Awrapado.hxx"
29 #include <cppuhelper/typeprovider.hxx>
30 #include <comphelper/sequence.hxx>
31 #include <com/sun/star/sdbc/ColumnValue.hpp>
32 #include <comphelper/extract.hxx>
33 #include <comphelper/types.hxx>
34 #include "ado/ACatalog.hxx"
35 
36 using namespace ::comphelper;
37 
38 using namespace connectivity::ado;
39 using namespace com::sun::star::uno;
40 using namespace com::sun::star::lang;
41 using namespace com::sun::star::beans;
42 using namespace com::sun::star::sdbc;
43 
Create()44 void WpADOColumn::Create()
45 {
46     HRESULT         hr = -1;
47 
48     _ADOColumn* pColumn = NULL;
49     hr = CoCreateInstance(ADOS::CLSID_ADOCOLUMN_25,
50                           NULL,
51                           CLSCTX_INPROC_SERVER,
52                           ADOS::IID_ADOCOLUMN_25,
53                           (void**)&pColumn );
54 
55 
56     if( !FAILED( hr ) )
57     {
58         operator=( pColumn );
59         pColumn->Release( );
60     }
61 }
62 // -------------------------------------------------------------------------
OAdoColumn(sal_Bool _bCase,OConnection * _pConnection,_ADOColumn * _pColumn)63 OAdoColumn::OAdoColumn(sal_Bool _bCase,OConnection* _pConnection,_ADOColumn* _pColumn)
64     : connectivity::sdbcx::OColumn(::rtl::OUString(),::rtl::OUString(),::rtl::OUString(),::rtl::OUString(),0,0,0,0,sal_False,sal_False,sal_False,_bCase)
65     ,m_pConnection(_pConnection)
66 {
67     construct();
68     OSL_ENSURE(_pColumn,"Column can not be null!");
69     m_aColumn = WpADOColumn(_pColumn);
70     //  m_aColumn.put_ParentCatalog(_pConnection->getAdoCatalog()->getCatalog());
71     fillPropertyValues();
72 }
73 // -------------------------------------------------------------------------
OAdoColumn(sal_Bool _bCase,OConnection * _pConnection)74 OAdoColumn::OAdoColumn(sal_Bool _bCase,OConnection* _pConnection)
75     : connectivity::sdbcx::OColumn(_bCase)
76     ,m_pConnection(_pConnection)
77 {
78     m_aColumn.Create();
79     m_aColumn.put_ParentCatalog(_pConnection->getAdoCatalog()->getCatalog());
80     construct();
81     fillPropertyValues();
82     m_Type = DataType::OTHER;
83 }
84 
85 //--------------------------------------------------------------------------
getUnoTunnelImplementationId()86 Sequence< sal_Int8 > OAdoColumn::getUnoTunnelImplementationId()
87 {
88     static ::cppu::OImplementationId * pId = 0;
89     if (! pId)
90     {
91         ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
92         if (! pId)
93         {
94             static ::cppu::OImplementationId aId;
95             pId = &aId;
96         }
97     }
98     return pId->getImplementationId();
99 }
100 
101 // com::sun::star::lang::XUnoTunnel
102 //------------------------------------------------------------------
getSomething(const Sequence<sal_Int8> & rId)103 sal_Int64 OAdoColumn::getSomething( const Sequence< sal_Int8 > & rId ) throw (RuntimeException)
104 {
105     return (rId.getLength() == 16 && 0 == rtl_compareMemory(getUnoTunnelImplementationId().getConstArray(),  rId.getConstArray(), 16 ) )
106                 ? reinterpret_cast< sal_Int64 >( this )
107                 : OColumn_ADO::getSomething(rId);
108 }
109 // -------------------------------------------------------------------------
construct()110 void OAdoColumn::construct()
111 {
112     sal_Int32 nAttrib = isNew() ? 0 : PropertyAttribute::READONLY;
113 
114     registerProperty(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_ISASCENDING),     PROPERTY_ID_ISASCENDING,    nAttrib,&m_IsAscending, ::getBooleanCppuType());
115     registerProperty(OMetaConnection::getPropMap().getNameByIndex(PROPERTY_ID_RELATEDCOLUMN),   PROPERTY_ID_RELATEDCOLUMN,  nAttrib,&m_ReferencedColumn,    ::getCppuType(reinterpret_cast< ::rtl::OUString*>(NULL)));
116 }
117 // -----------------------------------------------------------------------------
setFastPropertyValue_NoBroadcast(sal_Int32 nHandle,const Any & rValue)118 void OAdoColumn::setFastPropertyValue_NoBroadcast(sal_Int32 nHandle,const Any& rValue)throw (Exception)
119 {
120     if(m_aColumn.IsValid())
121     {
122         const sal_Char* pAdoPropertyName = NULL;
123 
124         switch(nHandle)
125         {
126             case PROPERTY_ID_ISASCENDING:
127                 m_aColumn.put_SortOrder(::cppu::any2bool(rValue) ? adSortAscending : adSortDescending);
128                 break;
129             case PROPERTY_ID_RELATEDCOLUMN:
130                 {
131                     ::rtl::OUString aVal;
132                     rValue >>= aVal;
133                     m_aColumn.put_RelatedColumn(aVal);
134                 }
135                 break;
136             case PROPERTY_ID_NAME:
137                 {
138                     ::rtl::OUString aVal;
139                     rValue >>= aVal;
140                     m_aColumn.put_Name(aVal);
141                 }
142                 break;
143             case PROPERTY_ID_TYPE:
144                 {
145                     sal_Int32 nVal=0;
146                     rValue >>= nVal;
147                     m_aColumn.put_Type(ADOS::MapJdbc2ADOType(nVal,m_pConnection->getEngineType()));
148                 }
149                 break;
150             case PROPERTY_ID_TYPENAME:
151                 //  rValue <<= m_pTable->getCatalog()->getConnection()->getTypeInfo()->find();
152                 break;
153             case PROPERTY_ID_PRECISION:
154                 {
155                     sal_Int32 nVal=0;
156                     rValue >>= nVal;
157                     m_aColumn.put_Precision(nVal);
158                 }
159                 break;
160             case PROPERTY_ID_SCALE:
161                 {
162                     sal_Int32 nVal=0;
163                     rValue >>= nVal;
164                     if ( !m_IsCurrency )
165                         m_aColumn.put_NumericScale((sal_Int8)nVal);
166                 }
167                 break;
168             case PROPERTY_ID_ISNULLABLE:
169                 {
170                     sal_Int32 nVal=0;
171                     rValue >>= nVal;
172                     if ( nVal == ColumnValue::NULLABLE )
173                         m_aColumn.put_Attributes( adColNullable );
174                 }
175                 break;
176             case PROPERTY_ID_ISROWVERSION:
177                 break;
178 
179             case PROPERTY_ID_ISAUTOINCREMENT:
180                 OTools::putValue( m_aColumn.get_Properties(), ::rtl::OUString::createFromAscii( "Autoincrement" ), getBOOL( rValue ) );
181                 break;
182 
183             case PROPERTY_ID_IM001:
184             case PROPERTY_ID_DESCRIPTION:
185                 pAdoPropertyName = "Description";
186                 break;
187 
188             case PROPERTY_ID_DEFAULTVALUE:
189                 pAdoPropertyName = "Default";
190                 break;
191         }
192 
193         if ( pAdoPropertyName )
194             OTools::putValue( m_aColumn.get_Properties(), ::rtl::OUString::createFromAscii( pAdoPropertyName ), getString( rValue ) );
195     }
196     OColumn_ADO::setFastPropertyValue_NoBroadcast(nHandle,rValue);
197 }
198 // -----------------------------------------------------------------------------
fillPropertyValues()199 void OAdoColumn::fillPropertyValues()
200 {
201     if(m_aColumn.IsValid())
202     {
203         m_IsAscending       = m_aColumn.get_SortOrder() == adSortAscending;
204         m_ReferencedColumn  = m_aColumn.get_RelatedColumn();
205         m_Name              = m_aColumn.get_Name();
206         m_Precision         = m_aColumn.get_Precision();
207         m_Scale             = m_aColumn.get_NumericScale();
208         m_IsNullable        = ((m_aColumn.get_Attributes() & adColNullable) == adColNullable) ? ColumnValue::NULLABLE : ColumnValue::NO_NULLS;
209 
210         DataTypeEnum eType  = m_aColumn.get_Type();
211         m_IsCurrency        = (eType == adCurrency);
212         if ( m_IsCurrency && !m_Scale)
213             m_Scale = 4;
214         m_Type              = ADOS::MapADOType2Jdbc(eType);
215 
216         sal_Bool bForceTo = sal_True;
217         const OTypeInfoMap* pTypeInfoMap = m_pConnection->getTypeInfo();
218         const OExtendedTypeInfo* pTypeInfo = OConnection::getTypeInfoFromType(*m_pConnection->getTypeInfo(),eType,::rtl::OUString(),m_Precision,m_Scale,bForceTo);
219         if ( pTypeInfo )
220             m_TypeName = pTypeInfo->aSimpleType.aTypeName;
221         else if ( eType == adVarBinary && ADOS::isJetEngine(m_pConnection->getEngineType()) )
222         {
223             ::comphelper::TStringMixEqualFunctor aCase(sal_False);
224             OTypeInfoMap::const_iterator aFind = ::std::find_if(pTypeInfoMap->begin(),
225                                                             pTypeInfoMap->end(),
226                                                             ::std::compose1(
227                                                             ::std::bind2nd(aCase, ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("VarBinary"))),
228                                                                 ::std::compose1(
229                                                                     ::std::mem_fun(&OExtendedTypeInfo::getDBName),
230                                                                     ::std::select2nd<OTypeInfoMap::value_type>())
231                                                                 )
232 
233                                                     );
234 
235             if ( aFind != pTypeInfoMap->end() ) // change column type if necessary
236             {
237                 eType = aFind->first;
238                 pTypeInfo = aFind->second;
239             }
240 
241             if ( !pTypeInfo )
242             {
243                 pTypeInfo = OConnection::getTypeInfoFromType(*m_pConnection->getTypeInfo(),adBinary,::rtl::OUString(),m_Precision,m_Scale,bForceTo);
244                 eType = adBinary;
245             }
246 
247             if ( pTypeInfo )
248             {
249                 m_TypeName = pTypeInfo->aSimpleType.aTypeName;
250                 m_Type  = ADOS::MapADOType2Jdbc(eType);
251             }
252         }
253 
254 
255         // fill some specific props
256         {
257             WpADOProperties aProps( m_aColumn.get_Properties() );
258 
259             if ( aProps.IsValid() )
260             {
261                 m_IsAutoIncrement = OTools::getValue( aProps, ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Autoincrement")) );
262 
263                 m_Description = OTools::getValue( aProps, ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Description")) );
264 
265                 m_DefaultValue = OTools::getValue( aProps, ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Default")) );
266 
267 #if OSL_DEBUG_LEVEL > 0
268                 sal_Int32 nCount = aProps.GetItemCount();
269                 for (sal_Int32 i = 0; i<nCount; ++i)
270                 {
271                     WpADOProperty aProp = aProps.GetItem(i);
272                     ::rtl::OUString sName = aProp.GetName();
273                     ::rtl::OUString sVal = aProp.GetValue();
274                 }
275 #endif
276             }
277         }
278     }
279 }
280 // -----------------------------------------------------------------------------
getColumnImpl() const281 WpADOColumn OAdoColumn::getColumnImpl() const
282 {
283     return m_aColumn;
284 }
285 // -----------------------------------------------------------------------------
286 // -----------------------------------------------------------------------------
acquire()287 void SAL_CALL OAdoColumn::acquire() throw()
288 {
289     OColumn_ADO::acquire();
290 }
291 // -----------------------------------------------------------------------------
release()292 void SAL_CALL OAdoColumn::release() throw()
293 {
294     OColumn_ADO::release();
295 }
296 // -----------------------------------------------------------------------------
297 
298 
299 
300