--- sql/pgsql/parser3pgsql.C 2008/06/24 17:43:48 1.29 +++ sql/pgsql/parser3pgsql.C 2011/03/11 07:57:42 1.36 @@ -7,7 +7,7 @@ 2007.10.25 using PgSQL 8.1.5 */ -static const char *RCSId="$Id: parser3pgsql.C,v 1.29 2008/06/24 17:43:48 misha Exp $"; +static const char *RCSId="$Id: parser3pgsql.C,v 1.36 2011/03/11 07:57:42 misha Exp $"; #include "config_includes.h" @@ -16,17 +16,30 @@ static const char *RCSId="$Id: parser3pg #include #include -// OIDOID from catalog/pg_type.h +// from catalog/pg_type.h +#define BOOLOID 16 +#define INT8OID 20 +#define INT2OID 21 +#define INT4OID 23 #define OIDOID 26 +#define FLOAT4OID 700 +#define FLOAT8OID 701 +#define DATEOID 1082 +#define TIMEOID 1083 +#define TIMESTAMPOID 1114 +#define TIMESTAMPTZOID 1184 +#define TIMETZOID 1266 +#define NUMERICOID 1700 + // LO_BUFSIZE from interfaces\libpq\fe-lobj.c = 8192 (0x2000) // actually writing chunks of that size failed, reduced it twice #define LO_BUFSIZE 0x1000 -// from postgres_ext.h -//#define InvalidOid ((Oid) 0) #include "ltdl.h" +#define MAX_COLS 500 + #define MAX_STRING 0x400 #define MAX_NUMBER 20 @@ -36,14 +49,13 @@ static const char *RCSId="$Id: parser3pg #endif #ifndef max -inline int max(int a,int b) { return a>b?a:b; } +inline int max(int a,int b){ return a>b?a:b; } inline int min(int a,int b){ return a(aconnection); - PQfinish(connection.conn); connection.conn=0; } - void commit(void *aconnection) { - execute_transaction_cmd(aconnection, "COMMIT"); + void commit(void *aconnection){ + Connection& connection=*static_cast(aconnection); + _transaction_commit(connection); + _transaction_begin(connection); } - void rollback(void *aconnection) { - execute_transaction_cmd(aconnection, "ROLLBACK"); + void rollback(void *aconnection){ + Connection& connection=*static_cast(aconnection); + _transaction_rollback(connection); + _transaction_begin(connection); } bool ping(void *aconnection) { Connection& connection=*static_cast(aconnection); - return PQstatus(connection.conn)==CONNECTION_OK; } - const char* quote( - void *aconnection, - const char *from, unsigned int length) { + // charset here is services.request_charset(), not connection.client_charset + // thus we can't use the sql server quoting support + const char* quote(void *aconnection, const char *str, unsigned int length) + { + const char* from; + const char* from_end=str+length; + + size_t quoted=0; + + for(from=str; from(aconnection); + char *result=(char*)connection.services->malloc_atomic(length + quoted + 1); + char *to = result; - char *result=(char*)connection.services->malloc_atomic(length*2+1); - int err=0; - PQescapeStringConn (connection.conn, - result, from, length, - &err); + for(from=str; from "''" + *to++='\''; + break; + case '\\': // "\" -> "\\" + *to++='\\'; + break; + } + *to++=*from; + } + + *to=0; return result; } - + void query(void *aconnection, - const char *astatement, - size_t placeholders_count, Placeholder* placeholders, - unsigned long offset, unsigned long limit, - SQL_Driver_query_event_handlers& handlers) { -// _asm int 3; + const char *astatement, + size_t placeholders_count, Placeholder* placeholders, + unsigned long offset, unsigned long limit, + SQL_Driver_query_event_handlers& handlers + ){ Connection& connection=*static_cast(aconnection); - const char* cstrClientCharset=connection.cstrClientCharset; SQL_Driver_services& services=*connection.services; PGconn *conn=connection.conn; + const char* client_charset=connection.client_charset; + const char* request_charset=services.request_charset(); + bool transcode_needed=client_charset && strcmp(client_charset, request_charset)!=0; + const char** paramValues; if(placeholders_count>0){ - //services._throw("bind variables not supported (yet)"); - int binds_size=sizeof(char) * placeholders_count; + int binds_size=sizeof(char)*placeholders_count; paramValues = static_cast(services.malloc_atomic(binds_size)); - bind_parameters(placeholders_count, placeholders, paramValues, connection); + _bind_parameters(placeholders_count, placeholders, paramValues, connection, transcode_needed); } - // transcode from $request:charset to ?ClientCharset - if(cstrClientCharset) { - size_t transcoded_statement_size; - services.transcode(astatement, strlen(astatement), - astatement, transcoded_statement_size, - services.request_charset(), - cstrClientCharset); + size_t statement_size=0; + if(transcode_needed){ + // transcode query from $request:charset to ?ClientCharset + statement_size=strlen(astatement); + services.transcode(astatement, statement_size, + astatement, statement_size, + request_charset, + client_charset); } - const char *statement=preprocess_statement(connection, - astatement, offset, limit); + const char *statement=_preprocess_statement(connection, astatement, statement_size, offset, limit); + // error after prepare? PGresult *res; if(placeholders_count>0){ @@ -263,46 +322,53 @@ public: if(!res) throwPQerror; + bool failed=false; + SQL_Error sql_error; + switch(PQresultStatus(res)) { - case PGRES_EMPTY_QUERY: - PQclear_throw("no query"); - break; - case PGRES_COMMAND_OK: - // empty result: insert|delete|update|... - PQclear(res); - return; - case PGRES_TUPLES_OK: - break; - default: - PQclear_throwPQerror; - break; + case PGRES_EMPTY_QUERY: + PQclear_throw("no query"); + break; + case PGRES_COMMAND_OK: // empty result: insert|delete|update|... + PQclear(res); + if(connection.autocommit) + commit(aconnection); + return; + case PGRES_TUPLES_OK: + break; + default: + PQclear_throwPQerror; + break; } - int column_count=PQnfields(res); - if(!column_count) - PQclear_throw("result contains no columns"); - - bool failed=false; - SQL_Error sql_error; #define CHECK(afailed) \ if(afailed) { \ failed=true; \ goto cleanup; \ } - for(int i=0; iMAX_COLS) + column_count=MAX_COLS; + + unsigned int column_types[MAX_COLS]; + + for(size_t i=0; i=0) { - // seek to end - if(lo_lseek(conn, fd, 0, SEEK_END)<0) - PQclear_throwPQerror; - // get length - int size_tell=lo_tell(conn, fd); - if(size_tell<0) - PQclear_throwPQerror; - // seek to begin - if(lo_lseek(conn, fd, 0, SEEK_SET)<0) - PQclear_throwPQerror; - length=(size_t)size_tell; - if(length) { - // read - char* strm=(char*)services.malloc(length+1); - if(!lo_read_ex(conn, fd, strm, size_tell)) - PQclear_throw("lo_read can not read all bytes of object"); - strm[length]=0; - str=strm; - } else - str=0; - if(lo_close(conn, fd)<0) - PQclear_throwPQerror; - } else - PQclear_throwPQerror; - } else { - // normal column, read it normally - length=(size_t)PQgetlength(res, r, i); - if(length) { - char* strm=(char*)services.malloc(length+1); - memcpy(strm, cell, length+1); - str=strm; - } else - str=0; - } + size_t length=0; + const char* str; - if(str && length) { - // transcode from ?ClientCharset to $request:charset - if(cstrClientCharset) - services.transcode(str, length, - str, length, - cstrClientCharset, - services.request_charset()); + switch(column_types[i]){ + case BOOLOID: + case INT8OID: + case INT2OID: + case INT4OID: + case FLOAT4OID: + case FLOAT8OID: + case DATEOID: + case TIMEOID: + case TIMESTAMPOID: + case TIMESTAMPTZOID: + case TIMETZOID: + case NUMERICOID: + length=(size_t)PQgetlength(res, r, i); + str=length ? strdup(services, cell, length) : 0; + // transcode is never required for these types + break; + case OIDOID: + { + Oid oid=cell?atoi(cell):0; + int fd=lo_open(conn, oid, INV_READ); + if(fd>=0){ + // seek to end + if(lo_lseek(conn, fd, 0, SEEK_END)<0) + PQclear_throwPQerror; + // get length + int size_tell=lo_tell(conn, fd); + if(size_tell<0) + PQclear_throwPQerror; + // seek to begin + if(lo_lseek(conn, fd, 0, SEEK_SET)<0) + PQclear_throwPQerror; + length=(size_t)size_tell; + if(length){ + // read + char* strm=(char*)services.malloc(length+1); + if(!lo_read_ex(conn, fd, strm, size_tell)) + PQclear_throw("lo_read can not read all bytes of object"); + strm[length]=0; + str=strm; + if(transcode_needed) { + // transcode cell value from ?ClientCharset to $request:charset + services.transcode(str, length, + str, length, + client_charset, + request_charset); + } + } else + str=0; + if(lo_close(conn, fd)<0) + PQclear_throwPQerror; + } else + PQclear_throwPQerror; + break; + } + default: + // normal column, read it normally + length=(size_t)PQgetlength(res, r, i); + str=length ? strdup(services, cell, length) : 0; + if(transcode_needed) { + // transcode cell value from ?ClientCharset to $request:charset + services.transcode(str, length, + str, length, + client_charset, + request_charset); + } + break; } - CHECK(handlers.add_row_cell(sql_error, str, length)); } } @@ -374,84 +459,92 @@ cleanup: PQclear(res); if(failed) services._throw(sql_error); - } -private: // private funcs + if(connection.autocommit) + commit(aconnection); + } - void bind_parameters( - size_t placeholders_count, - Placeholder* placeholders, - const char** paramValues, - Connection& connection - ) { - for(size_t i=0; itranscode(ph.name, strlen(ph.name), ph.name, name_length, connection.services->request_charset(), - connection.cstrClientCharset); + connection.client_charset); if(ph.value) { + size_t value_length; connection.services->transcode(ph.value, strlen(ph.value), ph.value, value_length, connection.services->request_charset(), - connection.cstrClientCharset); + connection.client_charset); } } - if( atoi(ph.name) <= 0 || atoi(ph.name) > placeholders_count) { + int name_number=atoi(ph.name); + if(name_number <= 0 || (size_t)name_number > placeholders_count) connection.services->_throw("bad bind parameter key"); - } - paramValues[atoi(ph.name)-1] = ph.value; + + paramValues[name_number-1]=ph.value; } } - void execute_transaction_cmd(void *aconnection, const char *query) { - Connection& connection=*static_cast(aconnection); + void _transaction_begin(Connection& connection){ + _execute_transactions_cmd(connection, "BEGIN"); + } - if(connection.autocommit){ - Connection& connection=*static_cast(aconnection); - execute_resultless(connection, query); - } + void _transaction_commit(Connection& connection){ + _execute_transactions_cmd(connection, "COMMIT"); + } - begin_transaction(connection); + void _transaction_rollback(Connection& connection){ + _execute_transactions_cmd(connection, "ROLLBACK"); } - - /** - Executes a query and throws the result. - */ - void execute_resultless(const Connection& connection, const char *query) { + + void _execute_transactions_cmd(const Connection& connection, const char *query){ + if(!connection.without_default_transactions) // with option ?WithoutDefaultTransaction=1 user must execute BEGIN/COMMIT/ROLLBACK by himself + _execute_cmd(connection, query); + } + + // executes a query and throw away the result. + void _execute_cmd(const Connection& connection, const char *query){ if(PGresult *res=PQexec(connection.conn, query)) - PQclear(res); // throw out the result [don't need but must call] + PQclear(res); // throw away the result [don't need but must call] else throwPQerror; } - void begin_transaction(Connection& connection) { - if(connection.autocommit){ - execute_resultless(connection, "BEGIN"); - } - } - - const char *preprocess_statement(Connection& connection, - const char *astatement, unsigned long offset, unsigned long limit) { + const char *_preprocess_statement( + Connection& connection, + const char *astatement, + size_t statement_size, + unsigned long offset, + unsigned long limit + ){ PGconn *conn=connection.conn; - size_t statement_size=strlen(astatement); + if(!statement_size) + statement_size=strlen(astatement); char *result=(char *)connection.services->malloc(statement_size - +MAX_NUMBER*2+15 // limit # offset # + +MAX_NUMBER*2+15 // " limit # offset #" +MAX_STRING // in case of short 'strings' +1); // offset & limit -> suffixes const char *o; - if(offset || limit) { + if(offset || limit!=SQL_NO_LIMIT){ char *cur=result; memcpy(cur, astatement, statement_size); cur+=statement_size; - if(limit) + if(limit!=SQL_NO_LIMIT) cur+=snprintf(cur, 7+MAX_NUMBER, " limit %u", limit); if(offset) cur+=snprintf(cur, 8+MAX_NUMBER, " offset %u", offset); @@ -464,7 +557,7 @@ private: // private funcs while(*o) { if( o[0]=='/' && - o[1]=='*' && + o[1]=='*' && o[2]=='*') { // name start const char* saved_o=o; o+=3; @@ -569,7 +662,7 @@ private: // conn client library funcs typedef char* (*t_PQgetvalue)(const PGresult *res, int tup_num, int field_num); t_PQgetvalue PQgetvalue; - typedef int (*t_PQntuples)(const PGresult *res); t_PQntuples PQntuples; + typedef int (*t_PQntuples)(const PGresult *res); t_PQntuples PQntuples; typedef char *(*t_PQfname)(const PGresult *res, int field_index); t_PQfname PQfname; typedef int (*t_PQnfields)(const PGresult *res); t_PQnfields PQnfields;