|
|
| version 1.69.2.17.2.2, 2003/03/20 08:11:15 | version 1.86, 2006/04/09 13:38:47 |
|---|---|
| Line 1 | Line 1 |
| /** @file | /** @file |
| Parser: sql driver manager implementation. | Parser: sql driver manager implementation. |
| Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com) | Copyright (c) 2001-2005 ArtLebedev Group (http://www.artlebedev.com) |
| Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) | Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) |
| */ | */ |
| static const char* IDENT_SQL_DRIVER_MANAGER_C="$Date$"; | static const char * const IDENT_SQL_DRIVER_MANAGER_C="$Date$"; |
| #include "pa_sql_driver_manager.h" | #include "pa_sql_driver_manager.h" |
| #include "ltdl.h" | #include "ltdl.h" |
| Line 15 static const char* IDENT_SQL_DRIVER_MANA | Line 15 static const char* IDENT_SQL_DRIVER_MANA |
| #include "pa_common.h" | #include "pa_common.h" |
| #include "pa_vhash.h" | #include "pa_vhash.h" |
| #include "pa_vtable.h" | #include "pa_vtable.h" |
| #include "pa_charsets.h" | |
| // globals | // globals |
| SQL_Driver_manager SQL_driver_manager; | SQL_Driver_manager* SQL_driver_manager=0; |
| // consts | // consts |
| Line 28 const time_t CHECK_EXPIRED_CONNECTIONS_S | Line 29 const time_t CHECK_EXPIRED_CONNECTIONS_S |
| // helpers | // helpers |
| const String& SQL_Driver_services_impl::url_without_login() const { | const String& SQL_Driver_services_impl::url_without_login() const { |
| const String& result(new String); | String& result=*new String; |
| *result << furl->mid(0, furl->pos(":")) << "://****"; | result << furl->mid(0, furl->pos(':')) << "://****"; |
| int at_pos=furl->pos("@"); | size_t at_pos=0; |
| if(at_pos>0) | size_t new_at_pos; |
| *result << furl->mid(at_pos, furl->size()); | while( (new_at_pos=furl->pos('@', at_pos+1))!=STRING_NOT_FOUND) |
| at_pos=new_at_pos; | |
| if(at_pos) | |
| result << furl->mid(at_pos, furl->length()); | |
| return result; | return result; |
| } | } |
| void SQL_Driver_services_impl::transcode(const char* src, size_t src_length, | |
| const char*& dst, size_t& dst_length, | |
| const char* charset_from_name, | |
| const char* charset_to_name | |
| ) | |
| { | |
| try { | |
| // to speed up sql transcode [lots of charsets::get-s -- twice for each cell] | |
| // without complicating sql driver API | |
| // we need to cache couple of name->charset pairs | |
| // assuming pointers to names are are NOT to local vars | |
| struct cache_record { | |
| const char* name; | |
| Charset* object; | |
| } cache[2]={{0,0}, {0,0}}; | |
| Charset* charset_from_object; | |
| Charset* charset_to_object; | |
| if(charset_from_name==cache[0].name) { | |
| charset_from_object=cache[0].object; | |
| } else { | |
| cache[0].name=charset_from_name; | |
| cache[0].object=charset_from_object=&charsets.get(charset_from_name); | |
| } | |
| if(charset_to_name==cache[1].name) { | |
| charset_to_object=cache[1].object; | |
| } else { | |
| cache[1].name=charset_to_name; | |
| cache[1].object=charset_to_object=&charsets.get(charset_to_name); | |
| } | |
| String::C result=Charset::transcode(String::C(src, src_length), | |
| *charset_from_object, | |
| *charset_to_object); | |
| dst=result.str; | |
| dst_length=result.length; | |
| } catch(const Exception& e) { | |
| _throw(SQL_Error(e.type(), e.comment())); | |
| } catch(...) { | |
| _throw(SQL_Error(0, "unknown error while transcoding in sql driver")); | |
| } | |
| } | |
| // helpers | // helpers |
| static void expire_connection(SQL_Connection& connection, time_t older_dies) { | static void expire_connection(SQL_Connection& connection, time_t older_dies) { |
| if(connection.connected() && connection.expired(older_dies)) | if(connection.connected() && connection.expired(older_dies)) |
| connection.disconnect(); | connection.disconnect(); |
| } | } |
| static void expire_connections( | static void expire_connections(SQL_Driver_manager::connection_cache_type::key_type /*key*/, |
| SQL_Driver_manager::connection_cache_type::key_type /*key*/, | SQL_Driver_manager::connection_cache_type::value_type stack, |
| SQL_Driver_manager::connection_cache_type::value_type stack, | time_t older_dies) { |
| time_t older_dies) { | for(size_t i=0; i<stack->top_index(); i++) |
| for(int i=0; i<=stack->top_index(); i++) | |
| expire_connection(*stack->get(i), older_dies); | expire_connection(*stack->get(i), older_dies); |
| } | } |
| // SQL_Driver_manager | // SQL_Driver_manager |
| SQL_Driver_manager::SQL_Driver_manager(): | SQL_Driver_manager::SQL_Driver_manager(): |
| prev_expiration_pass_time(0), is_dlinited(false) { | is_dlinited(false), prev_expiration_pass_time(0) { |
| cache_managers.put(String* (new String("sql")), this); | |
| } | } |
| SQL_Driver_manager::~SQL_Driver_manager() { | SQL_Driver_manager::~SQL_Driver_manager() { |
| connection_cache.for_each(expire_connections, time(0)+(time_t)1/*=in future=expire all*/); | connection_cache.for_each<time_t>(expire_connections, time(0)+(time_t)10/*=in future=expire all*/); |
| if(is_dlinited) | if(is_dlinited) |
| lt_dlexit(); | lt_dlexit(); |
| } | } |
| /// @param aurl protocol://[driver-dependent] | /// @param aurl protocol://[driver-dependent] |
| SQL_ConnectionPtr SQL_Driver_manager::get_connection(const String& arequest_url, | SQL_Connection* SQL_Driver_manager::get_connection(const String& aurl, |
| const String& aorigin, | Table *protocol2driver_and_client, |
| Table *protocol2driver_and_client) { | const char* arequest_charset) { |
| // we have table for locating protocol's library | // we have table for locating protocol's library |
| if(!protocol2driver_and_client) | if(!protocol2driver_and_client) |
| throw Exception("parser.runtime", | throw Exception("parser.runtime", |
| arequest_url, | &aurl, |
| "$"MAIN_SQL_NAME":"MAIN_SQL_DRIVERS_NAME" table must be defined"); | "$"MAIN_SQL_NAME":"MAIN_SQL_DRIVERS_NAME" table must be defined"); |
| // first trying to get cached connection | // first trying to get cached connection |
| SQL_ConnectionPtr connection=get_connection_from_cache(arequest_url); | SQL_Connection* connection=get_connection_from_cache(aurl); |
| if(connection) { | if(connection) { |
| connection->set_pool(&apool); | connection->set_url(); |
| if(!connection->ping()) { // we have some cached connection, is it pingable? | if(!connection->ping()) { // we have some cached connection, is it pingable? |
| connection->disconnect(); // kill unpingabe=dead connection | connection->disconnect(); // kill unpingabe=dead connection |
| connection=SQL_ConnectionPtr(0); | connection=0; |
| } | } |
| } | } |
| const char* request_url_cstr_ptr; | char *url_cstr; |
| char *request_url_cstr; | |
| if(connection) | if(connection) |
| request_url_cstr=0; // calm, compiler | url_cstr=0; // calm, compiler |
| else { // no cached connection or it were unpingabe: connect/reconnect | else { // no cached connection or it were unpingabe: connect/reconnect |
| if(arequest_url->pos("://")<0) | url_cstr=aurl.cstrm(); |
| if(!strstr(url_cstr, "://")) | |
| throw Exception("parser.runtime", | throw Exception("parser.runtime", |
| arequest_url->size()?arequest_url:aorigin, | aurl.length()?&aurl:0, |
| "connection string must start with protocol://"); | "connection string must start with protocol://"); |
| // make global_url C-string on driver_cache_pool pool | |
| const String& global_url(new String(arequest_url->cstr(driver_cache_pool))); | char *protocol_cstr=lsplit(&url_cstr, ':'); |
| request_url_cstr=request_url_cstr_ptr=arequest_url->cstr(); | |
| char *request_protocol_cstr=lsplit(&request_url_cstr, ':'); | |
| // skip "//" after ':' | // skip "//" after ':' |
| while(*request_url_cstr=='/') | while(*url_cstr=='/') |
| request_url_cstr++; | url_cstr++; |
| // make global_protocol C-string on driver_cache_pool pool | const String& protocol=*new String(protocol_cstr); |
| const String& global_protocol(new String(driver_cache_pool.copy(request_protocol_cstr))); | |
| SQL_Driver *driver; | SQL_Driver *driver; |
| // first trying to get cached driver | // first trying to get cached driver |
| if(!(driver=get_driver_from_cache(global_protocol))) { | if(!(driver=get_driver_from_cache(protocol))) { |
| // no cached | // no cached |
| const String& library(0); | const String* library=0; |
| const String& dlopen_file_spec(0); | const String* dlopen_file_spec=0; |
| if(protocol2driver_and_client->locate(0, global_protocol)) { | Table::Action_options options; |
| if(!(library=protocol2driver_and_client->item(1)) || library->size()==0) | if(protocol2driver_and_client->locate(0, protocol, options)) { |
| if(!(library=protocol2driver_and_client->item(1)) || library->length()==0) | |
| throw Exception("parser.runtime", | throw Exception("parser.runtime", |
| protocol2driver_and_client->origin_string(), | 0, |
| "driver library column for protocol '%s' is empty", | "driver library column for protocol '%s' is empty", |
| request_protocol_cstr); | protocol_cstr); |
| dlopen_file_spec=protocol2driver_and_client->item(2); | dlopen_file_spec=protocol2driver_and_client->item(2); |
| } else | } else |
| throw Exception("parser.runtime", | throw Exception("parser.runtime", |
| arequest_url, | &aurl, |
| "undefined protocol '%s'", | "undefined protocol '%s'", |
| request_protocol_cstr); | protocol_cstr); |
| if(!is_dlinited) { | if(!is_dlinited) { |
| if(lt_dlinit()) | if(lt_dlinit()) |
| Line 136 SQL_ConnectionPtr SQL_Driver_manager::ge | Line 178 SQL_ConnectionPtr SQL_Driver_manager::ge |
| is_dlinited=true; | is_dlinited=true; |
| } | } |
| const char* filename=library->cstr(String::UL_FILE_SPEC); | const char* filename=library->cstr(String::L_FILE_SPEC); |
| lt_dlhandle handle=lt_dlopen(filename); | lt_dlhandle handle=lt_dlopen(filename); |
| if (!handle) | if (!handle) { |
| const char* error=lt_dlerror(); | |
| throw Exception(0, | throw Exception(0, |
| library, | library, |
| "can not open the module, %s", lt_dlerror()); | error?error:"can not open the module"); |
| } | |
| SQL_Driver_create_func create=(SQL_Driver_create_func)lt_dlsym(handle, | SQL_Driver_create_func create=(SQL_Driver_create_func)(lt_dlsym(handle, |
| SQL_DRIVER_CREATE_NAME); | SQL_DRIVER_CREATE_NAME)); |
| if(!create) | if(!create) |
| throw Exception(0, | throw Exception(0, |
| library, | library, |
| Line 162 SQL_ConnectionPtr SQL_Driver_manager::ge | Line 206 SQL_ConnectionPtr SQL_Driver_manager::ge |
| driver_api_version, SQL_DRIVER_API_VERSION); | driver_api_version, SQL_DRIVER_API_VERSION); |
| // initialise by connecting to sql client dynamic link library | // initialise by connecting to sql client dynamic link library |
| const char* dlopen_file_spec_cstr= | char* dlopen_file_spec_cstr= |
| dlopen_file_spec && dlopen_file_spec->size()? | dlopen_file_spec && dlopen_file_spec->length()? |
| dlopen_file_spec->cstr(String::UL_AS_IS):CharPtr(0); | dlopen_file_spec->cstrm(String::L_AS_IS):0; |
| if(const char* error=driver->initialize( | if(const char* error=driver->initialize(dlopen_file_spec_cstr)) |
| dlopen_file_spec_cstr)) | |
| throw Exception(0, | throw Exception(0, |
| library, | library, |
| "driver failed to initialize client library '%s', %s", | "driver failed to initialize client library '%s', %s", |
| dlopen_file_spec_cstr?dlopen_file_spec_cstr.get():"unspecifed", | dlopen_file_spec_cstr?dlopen_file_spec_cstr:"unspecifed", |
| error); | error); |
| // cache it | // cache it |
| put_driver_to_cache(global_protocol, driver); | put_driver_to_cache(protocol, driver); |
| } | } |
| connection=SQL_ConnectionPtr(new SQL_Connection(global_url, *driver)); | connection=new SQL_Connection(aurl, *driver, arequest_charset); |
| // associate with pool[request] (deassociates at close) | // associate with pool[request] (deassociates at close) |
| connection->set_pool(&apool); | connection->set_url(); |
| } | } |
| // if not connected yet, do that now, when connection has services | // if not connected yet, do that now, when connection has services |
| if(!connection->connected()) | if(!connection->connected()) |
| connection->connect(request_url_cstr); | connection->connect(url_cstr); |
| // return autoclosing object for it | // return autoclosing object for it |
| return SQL_ConnectionPtr(connection); | return connection; |
| } | } |
| void SQL_Driver_manager::close_connection(connection_cache_type::key_type url, | void SQL_Driver_manager::close_connection(connection_cache_type::key_type url, |
| SQL_ConnectionPtr connection) { | SQL_Connection* connection) { |
| // deassociate from pool[request] | |
| connection->set_pool(0); | |
| put_connection_to_cache(url, connection); | put_connection_to_cache(url, connection); |
| } | } |
| Line 215 void SQL_Driver_manager::put_driver_to_c | Line 256 void SQL_Driver_manager::put_driver_to_c |
| // connection cache | // connection cache |
| /// @todo get rid of memory spending Stack [zeros deep inside got accumulated] | /// @todo get rid of memory spending Stack [zeros deep inside got accumulated] |
| SQL_ConnectionPtr SQL_Driver_manager::get_connection_from_cache( | SQL_Connection* SQL_Driver_manager::get_connection_from_cache(connection_cache_type::key_type url) { |
| connection_cache_type::key_type url) { | |
| SYNCHRONIZED; | SYNCHRONIZED; |
| if(connection_cache_type::value_type connections=connection_cache.get(url)) | if(connection_cache_type::value_type connections=connection_cache.get(url)) |
| while(connections->top_index()>=0) { // there are cached connections to that 'url' | while(!connections->is_empty()) { // there are cached connections to that 'url' |
| SQL_ConnectionPtr result=connections->pop(); | SQL_Connection* result=connections->pop(); |
| if(result->connected()) // not expired? | if(result->connected()) // not expired? |
| return result; | return result; |
| } | } |
| return SQL_ConnectionPtr(0); | return 0; |
| } | } |
| void SQL_Driver_manager::put_connection_to_cache( | void SQL_Driver_manager::put_connection_to_cache( |
| connection_cache_type::key_type url, | connection_cache_type::key_type url, |
| SQL_ConnectionPtr connection) { | SQL_Connection* connection) { |
| SYNCHRONIZED; | SYNCHRONIZED; |
| connection_cache_type::value_type connections=connection_cache.get(url); | connection_cache_type::value_type connections=connection_cache.get(url); |
| if(!connections) { // there are no cached connections to that 'url' yet? | if(!connections) { // there are no cached connections to that 'url' yet? |
| connections=connection_cache_type::value_type(new connection_cache_type::value_type::element_type); | connections=new connection_cache_element_base_type; |
| connection_cache.put(url, connections); | connection_cache.put(url, connections); |
| } | } |
| connections->push(connection); | connections->push(connection); |
| Line 246 void SQL_Driver_manager::maybe_expire_ca | Line 286 void SQL_Driver_manager::maybe_expire_ca |
| time_t now=time(0); | time_t now=time(0); |
| if(prev_expiration_pass_time<now-CHECK_EXPIRED_CONNECTIONS_SECONDS) { | if(prev_expiration_pass_time<now-CHECK_EXPIRED_CONNECTIONS_SECONDS) { |
| connection_cache.for_each(expire_connections, time_t(now-EXPIRE_UNUSED_CONNECTION_SECONDS)); | connection_cache.for_each<time_t>(expire_connections, time_t(now-EXPIRE_UNUSED_CONNECTION_SECONDS)); |
| prev_expiration_pass_time=now; | prev_expiration_pass_time=now; |
| } | } |
| } | } |
| /* | |
| static void add_connection_to_status_cache_table(Array::Item *value, void *info) { | |
| SQL_Connection& connection=*static_cast<SQL_Connection *>(value); | |
| Table& table=*static_cast<Table *>(info); | |
| static void add_connection_to_status_cache_table(SQL_Connection& connection, Table* table) { | |
| if(connection.connected()) { | if(connection.connected()) { |
| =table.pool(); | ArrayString& row=*new ArrayString; |
| Array& row=*new Array(); | |
| // url | // url |
| row+=&url_without_login(connection.get_url()); | row+=&connection.services().url_without_login(); |
| // time | // time |
| time_t time_used=connection.get_time_used(); | time_t time_used=connection.get_time_used(); |
| const char* unsafe_time_cstr=ctime(&time_used); | row+=new String(pa_strdup(ctime(&time_used))); |
| int time_buf_size=strlen(unsafe_time_cstr); | |
| char *safe_time_buf=pool.copy(unsafe_time_cstr, time_buf_size); | |
| row+=new String(safe_time_buf, time_buf_size); | |
| table+=&row; | *table+=&row; |
| } | } |
| } | } |
| static void add_connections_to_status_cache_table(const Hash::Key& key, Hash::Val *value, void *info) { | static void add_connections_to_status_cache_table( |
| Stack& stack=*static_cast<Stack *>(value); | SQL_Driver_manager::connection_cache_type::key_type /*key*/, |
| Array_iter iter(stack); | SQL_Driver_manager::connection_cache_type::value_type stack, Table* table) |
| for(int countdown=stack.top_index(); countdown-->=0; ) | { |
| add_connection_to_status_cache_table(iter.next(), info); | for(Array_iterator<SQL_Connection*> i(*stack); i.has_next(); ) |
| }*/ | add_connection_to_status_cache_table(*i.next(), table); |
| /// @todo convert to object_ptr | } |
| ValuePtr SQL_Driver_manager::get_statusconst String* source) { | |
| ValuePtr result(new VHash); | Value* SQL_Driver_manager::get_status() { |
| /* | Value* result=new VHash; |
| // cache | // cache |
| { | { |
| Array& columns=*new Array(); | ArrayString& columns=*new ArrayString; |
| columns+=new String("url"); | columns+=new String("url"); |
| columns+=new String("time"); | columns+=new String("time"); |
| Table& table=*new Table(0, &columns, connection_cache.size()); | Table& table=*new Table(&columns, connection_cache.count()); |
| connection_cache.for_each(add_connections_to_status_cache_table, &table); | connection_cache.for_each<Table*>(add_connections_to_status_cache_table, &table); |
| result.hash(source).put(*new String("cache"), new VTable(&table)); | result->get_hash()->put(*new String("cache"), new VTable(&table)); |
| }*/ | } |
| return result; | return result; |
| } | } |