forked from mariadb-corporation/mariadb-connector-odbc
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathma_catalog.h
234 lines (208 loc) · 13.3 KB
/
ma_catalog.h
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
/************************************************************************************
Copyright (C) 2021 MariaDB Corporation AB
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
This library 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
Library General Public License for more details.
You should have received a copy of the GNU Library General Public
License along with this library; if not see <http://www.gnu.org/licenses>
or write to the Free Software Foundation, Inc.,
51 Franklin St., Fifth Floor, Boston, MA 02110, USA
*************************************************************************************/
#ifndef _ma_catalog_h_
#define _ma_catalog_h_
#include <ma_odbc.h>
SQLRETURN MADB_StmtColumnPrivileges(MADB_Stmt *Stmt, char *CatalogName, SQLSMALLINT NameLength1,
char *SchemaName, SQLSMALLINT NameLength2, char *TableName,
SQLSMALLINT NameLength3, char *ColumnName, SQLSMALLINT NameLength4);
SQLRETURN MADB_StmtTablePrivileges(MADB_Stmt *Stmt, char *CatalogName, SQLSMALLINT NameLength1,
char *SchemaName, SQLSMALLINT NameLength2,
char *TableName, SQLSMALLINT NameLength3);
SQLRETURN MADB_StmtTables(MADB_Stmt *Stmt, char *CatalogName, SQLSMALLINT CatalogNameLength,
char *SchemaName, SQLSMALLINT SchemaNameLength, char *TableName,
SQLSMALLINT TableNameLength, char *TableType, SQLSMALLINT TableTypeLength);
SQLRETURN MADB_StmtStatistics(MADB_Stmt *Stmt, char *CatalogName, SQLSMALLINT NameLength1,
char *SchemaName, SQLSMALLINT NameLength2,
char *TableName, SQLSMALLINT NameLength3,
SQLUSMALLINT Unique, SQLUSMALLINT Reserved);
SQLRETURN MADB_StmtColumns(MADB_Stmt *Stmt,
char *CatalogName, SQLSMALLINT NameLength1,
char *SchemaName, SQLSMALLINT NameLength2,
char *TableName, SQLSMALLINT NameLength3,
char *ColumnName, SQLSMALLINT NameLength4);
SQLRETURN MADB_StmtProcedureColumns(MADB_Stmt *Stmt, char *CatalogName, SQLSMALLINT NameLength1,
char *SchemaName, SQLSMALLINT NameLength2, char *ProcName,
SQLSMALLINT NameLength3, char *ColumnName, SQLSMALLINT NameLength4);
SQLRETURN MADB_StmtPrimaryKeys(MADB_Stmt *Stmt, char *CatalogName, SQLSMALLINT NameLength1,
char *SchemaName, SQLSMALLINT NameLength2, char *TableName,
SQLSMALLINT NameLength3);
SQLRETURN MADB_StmtSpecialColumns(MADB_Stmt *Stmt, SQLUSMALLINT IdentifierType,
char *CatalogName, SQLSMALLINT NameLength1,
char *SchemaName, SQLSMALLINT NameLength2,
char *TableName, SQLSMALLINT NameLength3,
SQLUSMALLINT Scope, SQLUSMALLINT Nullable);
SQLRETURN MADB_StmtProcedures(MADB_Stmt *Stmt, char *CatalogName, SQLSMALLINT NameLength1,
char *SchemaName, SQLSMALLINT NameLength2, char *ProcName,
SQLSMALLINT NameLength3);
SQLRETURN MADB_StmtForeignKeys(MADB_Stmt *Stmt, char *PKCatalogName, SQLSMALLINT NameLength1,
char *PKSchemaName, SQLSMALLINT NameLength2, char *PKTableName,
SQLSMALLINT NameLength3, char *FKCatalogName, SQLSMALLINT NameLength4,
char *FKSchemaName, SQLSMALLINT NameLength5, char *FKTableName,
SQLSMALLINT NameLength6);
#define MADB_TRANSFER_OCTET_LENGTH(TYPE_DEF_COL_NAME)\
"@tol:=CAST(CASE @dt"\
" WHEN " XSTR(SQL_BIT) " THEN 1 "\
" WHEN " XSTR(SQL_TINYINT) " THEN 1 "\
" WHEN " XSTR(SQL_SMALLINT) " THEN 2 "\
" WHEN " XSTR(SQL_INTEGER) " THEN IF(DATA_TYPE='mediumint',3,4) "\
" WHEN " XSTR(SQL_BIGINT) " THEN 20 "\
" WHEN " XSTR(SQL_REAL) " THEN 4 "\
" WHEN " XSTR(SQL_FLOAT) " THEN 8 "\
" WHEN " XSTR(SQL_DOUBLE) " THEN 8 "\
" WHEN " XSTR(SQL_DATE) " THEN 6 "\
" WHEN " XSTR(SQL_TYPE_DATE) " THEN 6 "\
" WHEN " XSTR(SQL_TIME) " THEN 6 "\
" WHEN " XSTR(SQL_TYPE_TIME) " THEN 6 "\
" WHEN " XSTR(SQL_TIMESTAMP) " THEN 16 "\
" WHEN " XSTR(SQL_TYPE_TIMESTAMP) " THEN 16 "\
" WHEN " XSTR(SQL_GUID) " THEN 16 "\
" WHEN " XSTR(SQL_DECIMAL) " THEN @ColSize + IF(" #TYPE_DEF_COL_NAME " LIKE '%%unsigned',1,2) "\
" WHEN " XSTR(SQL_BINARY) " THEN IF(DATA_TYPE='bit', CAST(((NUMERIC_PRECISION + 7) / 8) AS SIGNED), CHARACTER_OCTET_LENGTH) "\
" WHEN " XSTR(SQL_VARBINARY) " THEN CHARACTER_OCTET_LENGTH "\
" WHEN " XSTR(SQL_LONGVARBINARY) " THEN CHARACTER_OCTET_LENGTH "\
" ELSE CHARACTER_MAXIMUM_LENGTH*%u "\
"END AS SIGNED)"
/* CASE for DATA_TYPE glued in 2 parts for ODBC v2 or v3 */
#define MADB_SQL_DATATYPEp1\
"CASE DATA_TYPE"\
" WHEN 'bit' THEN @dt:= IF(NUMERIC_PRECISION=1," XSTR(SQL_BIT) ", " XSTR(SQL_BINARY) ")"\
" WHEN 'tinyint' THEN @dt:=" XSTR(SQL_TINYINT)\
" WHEN 'smallint' THEN @dt:=" XSTR(SQL_SMALLINT)\
" WHEN 'year' THEN @dt:= " XSTR(SQL_SMALLINT)\
" WHEN 'mediumint' THEN @dt:=" XSTR(SQL_INTEGER)\
" WHEN 'int' THEN @dt:=" XSTR(SQL_INTEGER)\
" WHEN 'bigint' THEN @dt:=" XSTR(SQL_BIGINT)\
" WHEN 'blob' THEN @dt:=" XSTR(SQL_LONGVARBINARY)\
" WHEN 'tinyblob' THEN @dt:=" XSTR(SQL_LONGVARBINARY)\
" WHEN 'mediumblob' THEN @dt:=" XSTR(SQL_LONGVARBINARY)\
" WHEN 'longblob' THEN @dt:=" XSTR(SQL_LONGVARBINARY)\
" WHEN 'decimal' THEN @dt:=" XSTR(SQL_DECIMAL)\
" WHEN 'float' THEN @dt:=IF(NUMERIC_SCALE IS NULL," XSTR(SQL_REAL) ", " XSTR(SQL_DECIMAL) ")"\
" WHEN 'double' THEN @dt:=IF(NUMERIC_SCALE IS NULL," XSTR(SQL_DOUBLE) ", " XSTR(SQL_DECIMAL) ")"\
" WHEN 'binary' THEN @dt:=" XSTR(SQL_BINARY)\
" WHEN 'varbinary' THEN @dt:=" XSTR(SQL_VARBINARY)
#define MADB_SQL_DATATYPEp1U\
" WHEN 'text' THEN @dt:=" XSTR(SQL_WLONGVARCHAR)\
" WHEN 'tinytext' THEN @dt:=" XSTR(SQL_WLONGVARCHAR)\
" WHEN 'mediumtext' THEN @dt:=" XSTR(SQL_WLONGVARCHAR)\
" WHEN 'longtext' THEN @dt:=" XSTR(SQL_WLONGVARCHAR)\
" WHEN 'char' THEN @dt:=" XSTR(SQL_WCHAR)\
" WHEN 'enum' THEN @dt:=" XSTR(SQL_WCHAR)\
" WHEN 'set' THEN @dt:=" XSTR(SQL_WCHAR)\
" WHEN 'varchar' THEN @dt:=" XSTR(SQL_WVARCHAR)
#define MADB_SQL_DATATYPEp1A\
" WHEN 'text' THEN @dt:=" XSTR(SQL_LONGVARCHAR)\
" WHEN 'tinytext' THEN @dt:=" XSTR(SQL_LONGVARCHAR)\
" WHEN 'mediumtext' THEN @dt:=" XSTR(SQL_LONGVARCHAR)\
" WHEN 'longtext' THEN @dt:=" XSTR(SQL_LONGVARCHAR)\
" WHEN 'char' THEN @dt:=" XSTR(SQL_CHAR)\
" WHEN 'enum' THEN @dt:=" XSTR(SQL_CHAR)\
" WHEN 'set' THEN @dt:=" XSTR(SQL_CHAR)\
" WHEN 'varchar' THEN @dt:=" XSTR(SQL_VARCHAR)
#define MADB_SQL_DATATYPEp2_ODBC3\
" WHEN 'date' THEN @dt:=" XSTR(SQL_TYPE_DATE)\
" WHEN 'time' THEN @dt:=" XSTR(SQL_TYPE_TIME)\
" WHEN 'datetime' THEN @dt:=" XSTR(SQL_TYPE_TIMESTAMP)\
" WHEN 'timestamp' THEN @dt:=" XSTR(SQL_TYPE_TIMESTAMP)\
" ELSE @dt:=" XSTR(SQL_LONGVARBINARY)\
"END AS DATA_TYPE"
#define MADB_SQL_DATATYPEp2_ODBC2\
" WHEN 'date' THEN @dt:=" XSTR(SQL_DATE)\
" WHEN 'time' THEN @dt:=" XSTR(SQL_TIME)\
" WHEN 'datetime' THEN @dt:=" XSTR(SQL_TIMESTAMP)\
" WHEN 'timestamp' THEN @dt:=" XSTR(SQL_TIMESTAMP)\
" ELSE @dt:=" XSTR(SQL_LONGVARBINARY)\
"END AS DATA_TYPE"
#define MADB_SQL_DATATYPE_ODBC3U MADB_SQL_DATATYPEp1 MADB_SQL_DATATYPEp1U MADB_SQL_DATATYPEp2_ODBC3
#define MADB_SQL_DATATYPE_ODBC3A MADB_SQL_DATATYPEp1 MADB_SQL_DATATYPEp1A MADB_SQL_DATATYPEp2_ODBC3
#define MADB_SQL_DATATYPE_ODBC2U MADB_SQL_DATATYPEp1 MADB_SQL_DATATYPEp1U MADB_SQL_DATATYPEp2_ODBC2
#define MADB_SQL_DATATYPE_ODBC2A MADB_SQL_DATATYPEp1 MADB_SQL_DATATYPEp1A MADB_SQL_DATATYPEp2_ODBC2
#define MADB_SQL_DATATYPE(StmtHndl) (StmtHndl->Connection->Environment->OdbcVersion >= SQL_OV_ODBC3 ?\
(StmtHndl->Connection->IsAnsi ? MADB_SQL_DATATYPE_ODBC3A : MADB_SQL_DATATYPE_ODBC3U) :\
(StmtHndl->Connection->IsAnsi ? MADB_SQL_DATATYPE_ODBC2A : MADB_SQL_DATATYPE_ODBC2U))
/************** End of DATA_TYPE *************/
/************** SQLColumns *************/
#define MADB_COLUMN_SIZE\
"CAST(CASE" \
" WHEN DATA_TYPE = 'bit' THEN @ColSize:=((NUMERIC_PRECISION + 7) / 8) "\
" WHEN DATA_TYPE in ('tinyint', 'smallint', 'mediumint', 'int',"\
"'bigint', 'decimal') THEN @ColSize:=NUMERIC_PRECISION "\
" WHEN DATA_TYPE = 'float' THEN if(NUMERIC_SCALE IS NULL, @ColSize:=7, @ColSize:=NUMERIC_PRECISION)"\
" WHEN DATA_TYPE = 'double' THEN if(NUMERIC_SCALE IS NULL, @ColSize:=15, @ColSize:=NUMERIC_PRECISION)"\
" WHEN DATA_TYPE = 'date' THEN @ColSize:=10"\
" WHEN DATA_TYPE = 'time' THEN @ColSize:=8"\
" WHEN DATA_TYPE = 'year' THEN @ColSize:=4"\
" WHEN DATA_TYPE in ('timestamp', 'datetime') THEN @ColSize:=19 "\
" ELSE @ColSize:=CHARACTER_MAXIMUM_LENGTH "\
"END AS UNSIGNED)"
#define MADB_CATALOG_COLUMNSp1 "SELECT TABLE_SCHEMA AS TABLE_CAT, NULL AS TABLE_SCHEM, TABLE_NAME, COLUMN_NAME, "
#define MADB_CATALOG_COLUMNSp3 ", UCASE(IF(COLUMN_TYPE LIKE '%%(%%)%%', CONCAT(SUBSTRING(COLUMN_TYPE,1, LOCATE('(',COLUMN_TYPE) - 1 ), SUBSTRING(COLUMN_TYPE,1+locate(')',COLUMN_TYPE))), COLUMN_TYPE )) AS TYPE_NAME, "\
MADB_COLUMN_SIZE " AS COLUMN_SIZE,"\
MADB_TRANSFER_OCTET_LENGTH(COLUMN_TYPE) " AS BUFFER_LENGTH, "\
"NUMERIC_SCALE DECIMAL_DIGITS, IF(CHARACTER_OCTET_LENGTH IS NOT NULL, NULL, 10) AS NUM_PREC_RADIX,"\
"IF(DATA_TYPE='timestamp', 1, IF(IS_NULLABLE='YES',1,IF(EXTRA='auto_increment', 1, 0))) AS NULLABLE, "\
"COLUMN_COMMENT AS REMARKS,"
#define MADB_DEFAULT_COLUMN_OLD "IF(COLLATION_NAME IS NOT NULL AND COLUMN_DEFAULT IS NOT NULL, CONCAT(CHAR(39), COLUMN_DEFAULT, CHAR(39)), COLUMN_DEFAULT)"
#define MADB_DEFAULT_COLUMN_NEW "COLUMN_DEFAULT"
#define MADB_DEFAULT_COLUMN(DbcHndl) (MADB_ServerSupports(DbcHndl,MADB_ENCLOSES_COLUMN_DEF_WITH_QUOTES) ? MADB_DEFAULT_COLUMN_NEW : MADB_DEFAULT_COLUMN_OLD)
#define MADB_CATALOG_TYPE_SUB "CAST(CASE"\
" WHEN DATA_TYPE = 'date' THEN " XSTR(SQL_DATETIME)\
" WHEN DATA_TYPE = 'time' THEN " XSTR(SQL_DATETIME)\
" WHEN DATA_TYPE = 'datetime' THEN " XSTR(SQL_DATETIME)\
" WHEN DATA_TYPE = 'timestamp' THEN " XSTR(SQL_DATETIME)\
" ELSE @dt "\
"END AS SIGNED) SQL_DATA_TYPE,"\
"CAST(CASE"\
" WHEN DATA_TYPE = 'date' THEN " XSTR(SQL_CODE_DATE)\
" WHEN DATA_TYPE = 'time' THEN " XSTR(SQL_CODE_TIME)\
" WHEN DATA_TYPE = 'datetime' THEN " XSTR(SQL_CODE_TIMESTAMP)\
" WHEN DATA_TYPE = 'timestamp' THEN " XSTR(SQL_CODE_TIMESTAMP)\
" ELSE NULL "\
"END AS SIGNED) SQL_DATETIME_SUB,"
#define MADB_CATALOG_COLUMNSp4 " AS COLUMN_DEF," MADB_CATALOG_TYPE_SUB\
"IF(CHARACTER_OCTET_LENGTH IS NOT NULL, @tol, IF(DATA_TYPE='bit' AND NUMERIC_PRECISION =1, NULL, CAST((NUMERIC_PRECISION + 7)/8 AS SIGNED))) AS CHAR_OCTET_LENGTH, "\
"ORDINAL_POSITION,"\
"IF(DATA_TYPE='timestamp', 'YES', IF(IS_NULLABLE='YES','YES',IF(EXTRA='auto_increment', 'YES', 'NO'))) AS IS_NULLABLE FROM INFORMATION_SCHEMA.COLUMNS WHERE "
/************** End of SQLColumns ************/
/************** SQLProcedureColumns **********/
#define MADB_PROCEDURE_COLUMNSp1 \
"SELECT SPECIFIC_SCHEMA AS PROCEDURE_CAT, NULL AS PROCEDURE_SCHEM, "\
"SPECIFIC_NAME PROCEDURE_NAME, IF(PARAMETER_NAME IS NULL, '', PARAMETER_NAME) COLUMN_NAME, "\
"CASE PARAMETER_MODE "\
" WHEN 'IN' THEN " XSTR(SQL_PARAM_INPUT)\
" WHEN 'OUT' THEN " XSTR(SQL_PARAM_OUTPUT)\
" WHEN 'INOUT' THEN " XSTR(SQL_PARAM_INPUT_OUTPUT)\
" ELSE IF(PARAMETER_MODE IS NULL, " XSTR(SQL_RETURN_VALUE) ", " XSTR(SQL_PARAM_TYPE_UNKNOWN) ")"\
"END COLUMN_TYPE, "
#define MADB_PROCEDURE_COLUMNSp3\
", DATA_TYPE TYPE_NAME, "\
MADB_COLUMN_SIZE " AS COLUMN_SIZE, "\
MADB_TRANSFER_OCTET_LENGTH(DTD_IDENTIFIER) " AS BUFFER_LENGTH, "\
"NUMERIC_SCALE DECIMAL_DIGITS, IF(NUMERIC_PRECISION IS NULL, NULL, 10) AS NUM_PREC_RADIX,"\
XSTR(SQL_NULLABLE_UNKNOWN) " NULLABLE,"\
"NULL REMARKS, NULL COLUMN_DEF," MADB_CATALOG_TYPE_SUB \
"IF(CHARACTER_MAXIMUM_LENGTH IS NULL, NULL, @tol) CHAR_OCTET_LENGTH, "\
"ORDINAL_POSITION, 'YES' IS_NULLABLE FROM INFORMATION_SCHEMA.PARAMETERS "
#define MADB_PROCEDURE_COLUMNS_ODBC3U MADB_PROCEDURE_COLUMNSp1 MADB_SQL_DATATYPE_ODBC3U MADB_PROCEDURE_COLUMNSp3
#define MADB_PROCEDURE_COLUMNS_ODBC2U MADB_PROCEDURE_COLUMNSp1 MADB_SQL_DATATYPE_ODBC2U MADB_PROCEDURE_COLUMNSp3
#define MADB_PROCEDURE_COLUMNS_ODBC3A MADB_PROCEDURE_COLUMNSp1 MADB_SQL_DATATYPE_ODBC3A MADB_PROCEDURE_COLUMNSp3
#define MADB_PROCEDURE_COLUMNS_ODBC2A MADB_PROCEDURE_COLUMNSp1 MADB_SQL_DATATYPE_ODBC2A MADB_PROCEDURE_COLUMNSp3
#define MADB_PROCEDURE_COLUMNS(StmtHndl) (StmtHndl->Connection->Environment->OdbcVersion >= SQL_OV_ODBC3 ?\
(StmtHndl->Connection->IsAnsi ? MADB_PROCEDURE_COLUMNS_ODBC3A : MADB_PROCEDURE_COLUMNS_ODBC3U) : \
(StmtHndl->Connection->IsAnsi ? MADB_PROCEDURE_COLUMNS_ODBC2A : MADB_PROCEDURE_COLUMNS_ODBC2U))
/************** SQLProcedureColumns **********/
#endif