1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
|
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*************************************************************************
*
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
*
* Copyright 2000, 2010 Oracle and/or its affiliates.
*
* OpenOffice.org - a multi-platform office productivity suite
*
* This file is part of OpenOffice.org.
*
* OpenOffice.org is free software: you can redistribute it and/or modify
* it under the terms of the GNU Lesser General Public License version 3
* only, as published by the Free Software Foundation.
*
* OpenOffice.org is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Lesser General Public License version 3 for more details
* (a copy is included in the LICENSE file that accompanied this code).
*
* You should have received a copy of the GNU Lesser General Public License
* version 3 along with OpenOffice.org. If not, see
* <http://www.openoffice.org/license.html>
* for a copy of the LGPLv3 License.
*
************************************************************************/
#include "ORealDriver.hxx"
#include "odbc/ODriver.hxx"
#include "odbc/OTools.hxx"
#include "odbc/OFunctions.hxx"
#include "diagnose_ex.h"
namespace connectivity
{
sal_Bool LoadFunctions(oslModule pODBCso);
sal_Bool LoadLibrary_ODBC3(::rtl::OUString &_rPath);
// extern declaration of the function pointer
extern T3SQLAllocHandle pODBC3SQLAllocHandle;
extern T3SQLConnect pODBC3SQLConnect;
extern T3SQLDriverConnect pODBC3SQLDriverConnect;
extern T3SQLBrowseConnect pODBC3SQLBrowseConnect;
extern T3SQLDataSources pODBC3SQLDataSources;
extern T3SQLDrivers pODBC3SQLDrivers;
extern T3SQLGetInfo pODBC3SQLGetInfo;
extern T3SQLGetFunctions pODBC3SQLGetFunctions;
extern T3SQLGetTypeInfo pODBC3SQLGetTypeInfo;
extern T3SQLSetConnectAttr pODBC3SQLSetConnectAttr;
extern T3SQLGetConnectAttr pODBC3SQLGetConnectAttr;
extern T3SQLSetEnvAttr pODBC3SQLSetEnvAttr;
extern T3SQLGetEnvAttr pODBC3SQLGetEnvAttr;
extern T3SQLSetStmtAttr pODBC3SQLSetStmtAttr;
extern T3SQLGetStmtAttr pODBC3SQLGetStmtAttr;
//extern T3SQLSetDescField pODBC3SQLSetDescField;
//extern T3SQLGetDescField pODBC3SQLGetDescField;
//extern T3SQLGetDescRec pODBC3SQLGetDescRec;
//extern T3SQLSetDescRec pODBC3SQLSetDescRec;
extern T3SQLPrepare pODBC3SQLPrepare;
extern T3SQLBindParameter pODBC3SQLBindParameter;
//extern T3SQLGetCursorName pODBC3SQLGetCursorName;
extern T3SQLSetCursorName pODBC3SQLSetCursorName;
extern T3SQLExecute pODBC3SQLExecute;
extern T3SQLExecDirect pODBC3SQLExecDirect;
//extern T3SQLNativeSql pODBC3SQLNativeSql;
extern T3SQLDescribeParam pODBC3SQLDescribeParam;
extern T3SQLNumParams pODBC3SQLNumParams;
extern T3SQLParamData pODBC3SQLParamData;
extern T3SQLPutData pODBC3SQLPutData;
extern T3SQLRowCount pODBC3SQLRowCount;
extern T3SQLNumResultCols pODBC3SQLNumResultCols;
extern T3SQLDescribeCol pODBC3SQLDescribeCol;
extern T3SQLColAttribute pODBC3SQLColAttribute;
extern T3SQLBindCol pODBC3SQLBindCol;
extern T3SQLFetch pODBC3SQLFetch;
extern T3SQLFetchScroll pODBC3SQLFetchScroll;
extern T3SQLGetData pODBC3SQLGetData;
extern T3SQLSetPos pODBC3SQLSetPos;
extern T3SQLBulkOperations pODBC3SQLBulkOperations;
extern T3SQLMoreResults pODBC3SQLMoreResults;
//extern T3SQLGetDiagField pODBC3SQLGetDiagField;
extern T3SQLGetDiagRec pODBC3SQLGetDiagRec;
extern T3SQLColumnPrivileges pODBC3SQLColumnPrivileges;
extern T3SQLColumns pODBC3SQLColumns;
extern T3SQLForeignKeys pODBC3SQLForeignKeys;
extern T3SQLPrimaryKeys pODBC3SQLPrimaryKeys;
extern T3SQLProcedureColumns pODBC3SQLProcedureColumns;
extern T3SQLProcedures pODBC3SQLProcedures;
extern T3SQLSpecialColumns pODBC3SQLSpecialColumns;
extern T3SQLStatistics pODBC3SQLStatistics;
extern T3SQLTablePrivileges pODBC3SQLTablePrivileges;
extern T3SQLTables pODBC3SQLTables;
extern T3SQLFreeStmt pODBC3SQLFreeStmt;
extern T3SQLCloseCursor pODBC3SQLCloseCursor;
extern T3SQLCancel pODBC3SQLCancel;
extern T3SQLEndTran pODBC3SQLEndTran;
extern T3SQLDisconnect pODBC3SQLDisconnect;
extern T3SQLFreeHandle pODBC3SQLFreeHandle;
extern T3SQLGetCursorName pODBC3SQLGetCursorName;
extern T3SQLNativeSql pODBC3SQLNativeSql;
namespace odbc
{
class ORealObdcDriver : public ODBCDriver
{
protected:
virtual oslGenericFunction getOdbcFunction(sal_Int32 _nIndex) const;
virtual SQLHANDLE EnvironmentHandle(::rtl::OUString &_rPath);
public:
ORealObdcDriver(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory >& _rxFactory) : ODBCDriver(_rxFactory) {}
};
//------------------------------------------------------------------
oslGenericFunction ORealObdcDriver::getOdbcFunction(sal_Int32 _nIndex) const
{
oslGenericFunction pFunction = NULL;
switch(_nIndex)
{
case ODBC3SQLAllocHandle:
pFunction = (oslGenericFunction)pODBC3SQLAllocHandle;
break;
case ODBC3SQLConnect:
pFunction = (oslGenericFunction)pODBC3SQLConnect;
break;
case ODBC3SQLDriverConnect:
pFunction = (oslGenericFunction)pODBC3SQLDriverConnect;
break;
case ODBC3SQLBrowseConnect:
pFunction = (oslGenericFunction)pODBC3SQLBrowseConnect;
break;
case ODBC3SQLDataSources:
pFunction = (oslGenericFunction)pODBC3SQLDataSources;
break;
case ODBC3SQLDrivers:
pFunction = (oslGenericFunction)pODBC3SQLDrivers;
break;
case ODBC3SQLGetInfo:
pFunction = (oslGenericFunction)pODBC3SQLGetInfo;
break;
case ODBC3SQLGetFunctions:
pFunction = (oslGenericFunction)pODBC3SQLGetFunctions;
break;
case ODBC3SQLGetTypeInfo:
pFunction = (oslGenericFunction)pODBC3SQLGetTypeInfo;
break;
case ODBC3SQLSetConnectAttr:
pFunction = (oslGenericFunction)pODBC3SQLSetConnectAttr;
break;
case ODBC3SQLGetConnectAttr:
pFunction = (oslGenericFunction)pODBC3SQLGetConnectAttr;
break;
case ODBC3SQLSetEnvAttr:
pFunction = (oslGenericFunction)pODBC3SQLSetEnvAttr;
break;
case ODBC3SQLGetEnvAttr:
pFunction = (oslGenericFunction)pODBC3SQLGetEnvAttr;
break;
case ODBC3SQLSetStmtAttr:
pFunction = (oslGenericFunction)pODBC3SQLSetStmtAttr;
break;
case ODBC3SQLGetStmtAttr:
pFunction = (oslGenericFunction)pODBC3SQLGetStmtAttr;
break;
case ODBC3SQLPrepare:
pFunction = (oslGenericFunction)pODBC3SQLPrepare;
break;
case ODBC3SQLBindParameter:
pFunction = (oslGenericFunction)pODBC3SQLBindParameter;
break;
case ODBC3SQLSetCursorName:
pFunction = (oslGenericFunction)pODBC3SQLSetCursorName;
break;
case ODBC3SQLExecute:
pFunction = (oslGenericFunction)pODBC3SQLExecute;
break;
case ODBC3SQLExecDirect:
pFunction = (oslGenericFunction)pODBC3SQLExecDirect;
break;
case ODBC3SQLDescribeParam:
pFunction = (oslGenericFunction)pODBC3SQLDescribeParam;
break;
case ODBC3SQLNumParams:
pFunction = (oslGenericFunction)pODBC3SQLNumParams;
break;
case ODBC3SQLParamData:
pFunction = (oslGenericFunction)pODBC3SQLParamData;
break;
case ODBC3SQLPutData:
pFunction = (oslGenericFunction)pODBC3SQLPutData;
break;
case ODBC3SQLRowCount:
pFunction = (oslGenericFunction)pODBC3SQLRowCount;
break;
case ODBC3SQLNumResultCols:
pFunction = (oslGenericFunction)pODBC3SQLNumResultCols;
break;
case ODBC3SQLDescribeCol:
pFunction = (oslGenericFunction)pODBC3SQLDescribeCol;
break;
case ODBC3SQLColAttribute:
pFunction = (oslGenericFunction)pODBC3SQLColAttribute;
break;
case ODBC3SQLBindCol:
pFunction = (oslGenericFunction)pODBC3SQLBindCol;
break;
case ODBC3SQLFetch:
pFunction = (oslGenericFunction)pODBC3SQLFetch;
break;
case ODBC3SQLFetchScroll:
pFunction = (oslGenericFunction)pODBC3SQLFetchScroll;
break;
case ODBC3SQLGetData:
pFunction = (oslGenericFunction)pODBC3SQLGetData;
break;
case ODBC3SQLSetPos:
pFunction = (oslGenericFunction)pODBC3SQLSetPos;
break;
case ODBC3SQLBulkOperations:
pFunction = (oslGenericFunction)pODBC3SQLBulkOperations;
break;
case ODBC3SQLMoreResults:
pFunction = (oslGenericFunction)pODBC3SQLMoreResults;
break;
case ODBC3SQLGetDiagRec:
pFunction = (oslGenericFunction)pODBC3SQLGetDiagRec;
break;
case ODBC3SQLColumnPrivileges:
pFunction = (oslGenericFunction)pODBC3SQLColumnPrivileges;
break;
case ODBC3SQLColumns:
pFunction = (oslGenericFunction)pODBC3SQLColumns;
break;
case ODBC3SQLForeignKeys:
pFunction = (oslGenericFunction)pODBC3SQLForeignKeys;
break;
case ODBC3SQLPrimaryKeys:
pFunction = (oslGenericFunction)pODBC3SQLPrimaryKeys;
break;
case ODBC3SQLProcedureColumns:
pFunction = (oslGenericFunction)pODBC3SQLProcedureColumns;
break;
case ODBC3SQLProcedures:
pFunction = (oslGenericFunction)pODBC3SQLProcedures;
break;
case ODBC3SQLSpecialColumns:
pFunction = (oslGenericFunction)pODBC3SQLSpecialColumns;
break;
case ODBC3SQLStatistics:
pFunction = (oslGenericFunction)pODBC3SQLStatistics;
break;
case ODBC3SQLTablePrivileges:
pFunction = (oslGenericFunction)pODBC3SQLTablePrivileges;
break;
case ODBC3SQLTables:
pFunction = (oslGenericFunction)pODBC3SQLTables;
break;
case ODBC3SQLFreeStmt:
pFunction = (oslGenericFunction)pODBC3SQLFreeStmt;
break;
case ODBC3SQLCloseCursor:
pFunction = (oslGenericFunction)pODBC3SQLCloseCursor;
break;
case ODBC3SQLCancel:
pFunction = (oslGenericFunction)pODBC3SQLCancel;
break;
case ODBC3SQLEndTran:
pFunction = (oslGenericFunction)pODBC3SQLEndTran;
break;
case ODBC3SQLDisconnect:
pFunction = (oslGenericFunction)pODBC3SQLDisconnect;
break;
case ODBC3SQLFreeHandle:
pFunction = (oslGenericFunction)pODBC3SQLFreeHandle;
break;
case ODBC3SQLGetCursorName:
pFunction = (oslGenericFunction)pODBC3SQLGetCursorName;
break;
case ODBC3SQLNativeSql:
pFunction = (oslGenericFunction)pODBC3SQLNativeSql;
break;
default:
OSL_FAIL("Function unknown!");
}
return pFunction;
}
//------------------------------------------------------------------
::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface > SAL_CALL ODBCDriver_CreateInstance(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory >& _rxFactory) throw( ::com::sun::star::uno::Exception )
{
return *(new ORealObdcDriver(_rxFactory));
}
// -----------------------------------------------------------------------------
// ODBC Environment (common for all Connections):
SQLHANDLE ORealObdcDriver::EnvironmentHandle(::rtl::OUString &_rPath)
{
// Is (for this instance) already a Enviroment made?
if (!m_pDriverHandle)
{
SQLHANDLE h = SQL_NULL_HANDLE;
// allocate Environment
// load ODBC-DLL now:
if (!LoadLibrary_ODBC3(_rPath) || N3SQLAllocHandle(SQL_HANDLE_ENV,SQL_NULL_HANDLE,&h) != SQL_SUCCESS)
return SQL_NULL_HANDLE;
// Save in global Structure
m_pDriverHandle = h;
SQLRETURN nError = N3SQLSetEnvAttr(h, SQL_ATTR_ODBC_VERSION,(SQLPOINTER) SQL_OV_ODBC3, SQL_IS_UINTEGER);
OSL_UNUSED( nError );
//N3SQLSetEnvAttr(h, SQL_ATTR_CONNECTION_POOLING,(SQLPOINTER) SQL_CP_ONE_PER_HENV, SQL_IS_INTEGER);
}
return m_pDriverHandle;
}
// -----------------------------------------------------------------------------
}
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
