51
55
#include <stdlib.h>
52
56
#include <string.h>
54
#include <sql_common.h>
55
#include <drizzled/version.h>
57
/* Borrowed from libicu header */
59
#define U8_IS_SINGLE(c) (((c)&0x80)==0)
60
#define U8_LENGTH(c) \
61
((uint32_t)(c)<=0x7f ? 1 : \
62
((uint32_t)(c)<=0x7ff ? 2 : \
63
((uint32_t)(c)<=0xd7ff ? 3 : \
64
((uint32_t)(c)<=0xdfff || (uint32_t)(c)>0x10ffff ? 0 : \
65
((uint32_t)(c)<=0xffff ? 3 : 4)\
72
#undef net_buffer_length
73
#undef max_allowed_packet
75
uint32_t net_buffer_length= 8192;
76
uint32_t max_allowed_packet= 1024L*1024L*1024L;
57
#include <mystrings/utf8.h>
59
uint32_t net_buffer_length= 8192;
60
uint32_t max_allowed_packet= 1024L*1024L*1024L;
78
62
unsigned int drizzle_port=0;
81
#define SOCKET_ERROR -1
84
If allowed through some configuration, then this needs to
87
#define MAX_LONG_DATA_LENGTH 8192
88
#define unsigned_field(A) ((A)->flags & UNSIGNED_FLAG)
91
67
static DRIZZLE_PARAMETERS drizzle_internal_parameters=
92
68
{&max_allowed_packet, &net_buffer_length, 0};
94
const DRIZZLE_PARAMETERS * drizzle_get_parameters(void)
70
const DRIZZLE_PARAMETERS * drizzleclient_get_parameters(void)
96
72
return &drizzle_internal_parameters;
99
unsigned int drizzle_get_default_port(void)
75
unsigned int drizzleclient_get_default_port(void)
101
77
return drizzle_port;
104
void drizzle_set_default_port(unsigned int port)
80
void drizzleclient_set_default_port(unsigned int port)
106
82
drizzle_port= port;
135
/**************************************************************************
136
Change user and database
137
**************************************************************************/
139
int cli_read_change_user_result(DRIZZLE *drizzle)
143
pkt_length= cli_safe_read(drizzle);
145
if (pkt_length == packet_error)
151
bool drizzle_change_user(DRIZZLE *drizzle, const char *user,
152
const char *passwd, const char *db)
154
char buff[USERNAME_LENGTH+SCRAMBLED_PASSWORD_CHAR_LENGTH+NAME_LEN+2];
158
/* Use an empty string instead of NULL. */
165
/* Store user into the buffer */
166
end= strncpy(end, user, USERNAME_LENGTH) + USERNAME_LENGTH + 1;
168
/* write scrambled password according to server capabilities */
172
*end++= SCRAMBLE_LENGTH;
173
end+= SCRAMBLE_LENGTH;
177
*end++= '\0'; /* empty password */
178
/* Add database if needed */
179
end= strncpy(end, db ? db : "", NAME_LEN) + NAME_LEN + 1;
181
/* Add character set number. */
182
if (drizzle->server_capabilities & CLIENT_SECURE_CONNECTION)
184
int2store(end, (uint16_t) 45); // utf8mb4 number from mystrings/ctype-utf8.c
188
/* Write authentication package */
189
(void)simple_command(drizzle,COM_CHANGE_USER, (unsigned char*) buff, (uint32_t) (end-buff), 1);
191
rc= (*drizzle->methods->read_change_user_result)(drizzle);
195
/* Free old connect information */
199
free(drizzle->passwd);
203
/* alloc new connect information */
204
drizzle->user= strdup(user);
205
drizzle->passwd= strdup(passwd);
206
drizzle->db= db ? strdup(db) : 0;
212
111
#if defined(HAVE_GETPWUID) && defined(NO_GETPWUID_DECL)
213
112
struct passwd *getpwuid(uid_t);
214
113
char* getlogin(void);
285
184
*****************************************************************************/
288
drizzle_list_tables(DRIZZLE *drizzle, const char *wild)
187
drizzleclient_list_tables(DRIZZLE *drizzle, const char *wild)
291
190
char *ptr= strcpy(buff, "show tables");
292
191
ptr+= 11; /* strlen("show tables"); */
294
193
append_wild(ptr,buff+sizeof(buff),wild);
295
if (drizzle_query(drizzle,buff))
194
if (drizzleclient_query(drizzle,buff))
297
return (drizzle_store_result(drizzle));
196
return (drizzleclient_store_result(drizzle));
301
DRIZZLE_FIELD *cli_list_fields(DRIZZLE *drizzle)
200
DRIZZLE_FIELD *drizzleclient_cli_list_fields(DRIZZLE *drizzle)
303
202
DRIZZLE_DATA *query;
304
if (!(query= cli_read_rows(drizzle,(DRIZZLE_FIELD*) 0, 8)))
203
if (!(query= drizzleclient_cli_read_rows(drizzle,(DRIZZLE_FIELD*) 0, 8)))
307
206
drizzle->field_count= (uint32_t) query->rows;
308
return unpack_fields(query, drizzle->field_count, 1);
312
/**************************************************************************
313
List all fields in a table
314
If wild is given then only the fields matching wild is returned
315
Instead of this use query:
316
show fields in 'table' like "wild"
317
**************************************************************************/
320
drizzle_list_fields(DRIZZLE *drizzle, const char *table, const char *wild)
323
DRIZZLE_FIELD *fields;
324
char buff[257], *end;
326
end= strncpy(buff, table, 128) + 128;
327
end= strncpy(end+1, wild ? wild : "", 128) + 128;
329
free_old_query(drizzle);
330
if (simple_command(drizzle, COM_FIELD_LIST, (unsigned char*) buff,
331
(uint32_t) (end-buff), 1) ||
332
!(fields= (*drizzle->methods->list_fields)(drizzle)))
335
if (!(result = (DRIZZLE_RES *) malloc(sizeof(DRIZZLE_RES))))
338
memset(result, 0, sizeof(DRIZZLE_RES));
340
result->methods= drizzle->methods;
342
result->field_count = drizzle->field_count;
343
result->fields= fields;
348
/* List all running processes (threads) in server */
351
drizzle_list_processes(DRIZZLE *drizzle)
353
DRIZZLE_DATA *fields;
354
uint32_t field_count;
357
if (simple_command(drizzle,COM_PROCESS_INFO,0,0,0))
359
free_old_query(drizzle);
360
pos=(unsigned char*) drizzle->net.read_pos;
361
field_count=(uint32_t) net_field_length(&pos);
362
if (!(fields = (*drizzle->methods->read_rows)(drizzle,(DRIZZLE_FIELD*) 0, 7)))
364
if (!(drizzle->fields=unpack_fields(fields, field_count, 0)))
366
drizzle->status=DRIZZLE_STATUS_GET_RESULT;
367
drizzle->field_count=field_count;
368
return(drizzle_store_result(drizzle));
207
return drizzleclient_unpack_fields(query, drizzle->field_count, 1);
373
drizzle_shutdown(DRIZZLE *drizzle)
211
drizzleclient_shutdown(DRIZZLE *drizzle)
375
213
return(simple_command(drizzle, COM_SHUTDOWN, 0, 0, 0));
380
drizzle_refresh(DRIZZLE *drizzle, uint32_t options)
382
unsigned char bits[1];
383
bits[0]= (unsigned char) options;
384
return(simple_command(drizzle, COM_REFRESH, bits, 1, 0));
389
drizzle_kill(DRIZZLE *drizzle, uint32_t pid)
391
unsigned char buff[4];
393
return(simple_command(drizzle,COM_PROCESS_KILL,buff,sizeof(buff),0));
398
drizzle_set_server_option(DRIZZLE *drizzle, enum enum_drizzle_set_option option)
400
unsigned char buff[2];
401
int2store(buff, (uint32_t) option);
402
return(simple_command(drizzle, COM_SET_OPTION, buff, sizeof(buff), 0));
406
const char *cli_read_statistics(DRIZZLE *drizzle)
217
const char *drizzleclient_cli_read_statistics(DRIZZLE *drizzle)
408
219
drizzle->net.read_pos[drizzle->packet_length]=0; /* End of stat string */
409
220
if (!drizzle->net.read_pos[0])
411
drizzle_set_error(drizzle, CR_WRONG_HOST_INFO, sqlstate_get_unknown());
222
drizzleclient_set_error(drizzle, CR_WRONG_HOST_INFO, drizzleclient_sqlstate_get_unknown());
412
223
return drizzle->net.last_error;
414
225
return (char*) drizzle->net.read_pos;
430
drizzle_get_server_info(const DRIZZLE *drizzle)
241
drizzleclient_get_server_info(const DRIZZLE *drizzle)
432
243
return((char*) drizzle->server_version);
437
drizzle_get_host_info(const DRIZZLE *drizzle)
248
drizzleclient_get_host_info(const DRIZZLE *drizzle)
439
250
return(drizzle->host_info);
444
drizzle_get_proto_info(const DRIZZLE *drizzle)
255
drizzleclient_get_proto_info(const DRIZZLE *drizzle)
446
257
return (drizzle->protocol_version);
450
drizzle_get_client_info(void)
261
drizzleclient_get_client_info(void)
452
return (char*) DRIZZLE_SERVER_VERSION;
263
return (char*) VERSION;
455
uint32_t drizzle_get_client_version(void)
266
uint32_t drizzleclient_get_client_version(void)
457
268
return DRIZZLE_VERSION_ID;
460
bool drizzle_eof(const DRIZZLE_RES *res)
271
bool drizzleclient_eof(const DRIZZLE_RES *res)
465
const DRIZZLE_FIELD * drizzle_fetch_field_direct(const DRIZZLE_RES *res, unsigned int fieldnr)
276
const DRIZZLE_FIELD * drizzleclient_fetch_field_direct(const DRIZZLE_RES *res, unsigned int fieldnr)
467
278
return &(res)->fields[fieldnr];
470
const DRIZZLE_FIELD * drizzle_fetch_fields(const DRIZZLE_RES *res)
281
const DRIZZLE_FIELD * drizzleclient_fetch_fields(const DRIZZLE_RES *res)
472
283
return res->fields;
475
DRIZZLE_ROW_OFFSET drizzle_row_tell(const DRIZZLE_RES *res)
286
DRIZZLE_ROW_OFFSET drizzleclient_row_tell(const DRIZZLE_RES *res)
477
288
return res->data_cursor;
480
DRIZZLE_FIELD_OFFSET drizzle_field_tell(const DRIZZLE_RES *res)
291
DRIZZLE_FIELD_OFFSET drizzleclient_field_tell(const DRIZZLE_RES *res)
482
293
return res->current_field;
487
unsigned int drizzle_field_count(const DRIZZLE *drizzle)
298
unsigned int drizzleclient_field_count(const DRIZZLE *drizzle)
489
300
return drizzle->field_count;
492
uint64_t drizzle_affected_rows(const DRIZZLE *drizzle)
303
uint64_t drizzleclient_affected_rows(const DRIZZLE *drizzle)
494
305
return drizzle->affected_rows;
497
uint64_t drizzle_insert_id(const DRIZZLE *drizzle)
308
uint64_t drizzleclient_insert_id(const DRIZZLE *drizzle)
499
310
return drizzle->insert_id;
502
const char * drizzle_sqlstate(const DRIZZLE *drizzle)
313
const char * drizzleclient_sqlstate(const DRIZZLE *drizzle)
504
return drizzle ? drizzle->net.sqlstate : sqlstate_get_cant_connect();
315
return drizzle ? drizzle->net.sqlstate : drizzleclient_sqlstate_get_cant_connect();
507
uint32_t drizzle_warning_count(const DRIZZLE *drizzle)
318
uint32_t drizzleclient_warning_count(const DRIZZLE *drizzle)
509
320
return drizzle->warning_count;
512
const char * drizzle_info(const DRIZZLE *drizzle)
323
const char * drizzleclient_info(const DRIZZLE *drizzle)
514
325
return drizzle->info;
517
uint32_t drizzle_thread_id(const DRIZZLE *drizzle)
328
uint32_t drizzleclient_thread_id(const DRIZZLE *drizzle)
519
330
return drizzle->thread_id;
524
335
****************************************************************************/
527
Functions called my my_net_init() to set some application specific variables
530
void my_net_local_init(NET *net)
532
net->max_packet= (uint32_t) net_buffer_length;
533
my_net_set_read_timeout(net, CLIENT_NET_READ_TIMEOUT);
534
my_net_set_write_timeout(net, CLIENT_NET_WRITE_TIMEOUT);
536
net->max_packet_size= (net_buffer_length > max_allowed_packet) ?
537
net_buffer_length : max_allowed_packet;
541
This function is used to create HEX string that you
542
can use in a SQL statement in of the either ways:
543
INSERT INTO blob_column VALUES (0xAABBCC); (any DRIZZLE version)
544
INSERT INTO blob_column VALUES (X'AABBCC');
546
The string in "from" is encoded to a HEX string.
547
The result is placed in "to" and a terminating null byte is appended.
549
The string pointed to by "from" must be "length" bytes long.
550
You must allocate the "to" buffer to be at least length*2+1 bytes long.
551
Each character needs two bytes, and you need room for the terminating
552
null byte. When drizzle_hex_string() returns, the contents of "to" will
553
be a null-terminated string. The return value is the length of the
554
encoded string, not including the terminating null character. The return value does not contain any leading 0x or a leading X' and
555
trailing '. The caller must supply whichever of those is desired.
559
drizzle_hex_string(char *to, const char *from, uint32_t length)
564
for (end= from + length; from < end; from++)
566
*to++= _dig_vec_upper[((unsigned char) *from) >> 4];
567
*to++= _dig_vec_upper[((unsigned char) *from) & 0x0F];
570
return (uint32_t) (to-to0);
574
338
Add escape characters to a string (blob?) to make it suitable for a insert
575
339
to should at least have place for length*2+1 chars
576
340
Returns the length of the to string
580
drizzle_escape_string(char *to,const char *from, uint32_t length)
344
drizzleclient_escape_string(char *to,const char *from, uint32_t length)
582
346
const char *to_start= to;
583
347
const char *end, *to_end=to_start + 2*length;