|
|
| version 1.15, 2001/05/17 12:51:05 | version 1.32, 2001/09/05 09:22:45 |
|---|---|
| Line 4 | Line 4 |
| Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com) | Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com) |
| Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf) | Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf) |
| $Id$ | |
| */ | */ |
| static const char *RCSId="$Id$"; | |
| #include "pa_sql_driver_manager.h" | #include "pa_sql_driver_manager.h" |
| #include "ltdl.h" | #include "ltdl.h" |
| Line 17 | Line 16 |
| #include "pa_sapi.h" | #include "pa_sapi.h" |
| // helper macros | |
| #define STRINGIZE(name) #name | |
| // globals | // globals |
| SQL_Driver_manager *SQL_driver_manager; | SQL_Driver_manager *SQL_driver_manager; |
| // consts | // consts |
| const int MAX_PROTOCOL=20; | const int EXPIRE_UNUSED_CONNECTION_SECONDS=60; |
| const char *LIBRARY_CREATE_FUNC_NAME="create"; | const int CHECK_EXPIRED_CONNECTIONS_SECONDS=EXPIRE_UNUSED_CONNECTION_SECONDS*2; |
| /// SQL_Driver_services Pooled implementation | /// SQL_Driver_services Pooled implementation |
| Line 60 SQL_Connection& SQL_Driver_manager::get_ | Line 63 SQL_Connection& SQL_Driver_manager::get_ |
| if(!protocol2driver_and_client) | if(!protocol2driver_and_client) |
| PTHROW(0, 0, | PTHROW(0, 0, |
| &request_url, | &request_url, |
| "$SQL:drivers 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_Connection *result=get_connection_from_cache(request_url); | SQL_Connection *result=get_connection_from_cache(request_url); |
| Line 69 SQL_Connection& SQL_Driver_manager::get_ | Line 72 SQL_Connection& SQL_Driver_manager::get_ |
| result=0; | result=0; |
| } | } |
| if(!result) { // no cached connection or it were unpingabe: connect/reconnect | char *request_url_cstr; |
| if(result) | |
| request_url_cstr=0; // calm, compiler | |
| else { // no cached connection or it were unpingabe: connect/reconnect | |
| int pos=request_url.pos("://", 3); | int pos=request_url.pos("://", 3); |
| if(pos<0) | if(pos<0) |
| PTHROW(0, 0, | PTHROW(0, 0, |
| Line 77 SQL_Connection& SQL_Driver_manager::get_ | Line 83 SQL_Connection& SQL_Driver_manager::get_ |
| "no protocol specified"); // NOTE: not THROW, but PTHROW | "no protocol specified"); // NOTE: not THROW, but PTHROW |
| // make global_url C-string on global pool | // make global_url C-string on global pool |
| char *request_url_cstr=request_url.cstr(String::UL_AS_IS); | request_url_cstr=request_url.cstr(String::UL_AS_IS); |
| char *global_url_cstr=(char *)malloc(strlen(request_url_cstr)+1); | char *global_url_cstr=(char *)malloc(strlen(request_url_cstr)+1); |
| strcpy(global_url_cstr, request_url_cstr); | strcpy(global_url_cstr, request_url_cstr); |
| // make global_url string on global pool | // make global_url string on global pool |
| Line 106 SQL_Connection& SQL_Driver_manager::get_ | Line 112 SQL_Connection& SQL_Driver_manager::get_ |
| protocol2driver_and_client->origin_string(), | protocol2driver_and_client->origin_string(), |
| "driver library column for protocol '%s' is empty", | "driver library column for protocol '%s' is empty", |
| request_protocol_cstr); | request_protocol_cstr); |
| if(!(dlopen_file_spec=protocol2driver_and_client->item(2)) || dlopen_file_spec->size()==0) | dlopen_file_spec=protocol2driver_and_client->item(2); |
| PTHROW(0, 0, | |
| protocol2driver_and_client->origin_string(), | |
| "client library column for protocol '%s' is empty", | |
| request_protocol_cstr); | |
| } else | } else |
| PTHROW(0, 0, | PTHROW(0, 0, |
| &request_url, | &request_url, |
| "undefined protocol '%s'", | "undefined protocol '%s'", |
| request_protocol_cstr); | request_protocol_cstr); |
| if(lt_dlinit()) | |
| PTHROW(0, 0, | |
| library, | |
| "prepare to dynamic loading failed, %s", lt_dlerror()); | |
| const char *filename=library->cstr(String::UL_FILE_NAME); | const char *filename=library->cstr(String::UL_FILE_NAME); |
| lt_dlhandle handle=lt_dlopen(filename); | lt_dlhandle handle=lt_dlopen(filename); |
| if (!handle) | if (!handle) |
| Line 125 SQL_Connection& SQL_Driver_manager::get_ | Line 132 SQL_Connection& SQL_Driver_manager::get_ |
| "can not open the module, %s", lt_dlerror()); | "can not open the module, %s", lt_dlerror()); |
| SQL_Driver_create_func create=(SQL_Driver_create_func)lt_dlsym(handle, | SQL_Driver_create_func create=(SQL_Driver_create_func)lt_dlsym(handle, |
| LIBRARY_CREATE_FUNC_NAME); | STRINGIZE(SQL_DRIVER_CREATE)); |
| if(!create) | if(!create) |
| PTHROW(0, 0, | PTHROW(0, 0, |
| library, | library, |
| "function '%s' was not found", LIBRARY_CREATE_FUNC_NAME); | "function '%s' was not found", STRINGIZE(SQL_DRIVER_CREATE)); |
| // create library-driver! | // create library-driver! |
| driver=(*create)(); | driver=(*create)(); |
| Line 143 SQL_Connection& SQL_Driver_manager::get_ | Line 150 SQL_Connection& SQL_Driver_manager::get_ |
| 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=dlopen_file_spec->cstr(String::UL_FILE_NAME); | bool specified_dlopen_file_spec=dlopen_file_spec && dlopen_file_spec->size(); |
| const char *dlopen_file_spec_cstr= | |
| specified_dlopen_file_spec? | |
| dlopen_file_spec->cstr(String::UL_FILE_NAME):0; | |
| if(const char *error=driver->initialize( | if(const char *error=driver->initialize( |
| dlopen_file_spec_cstr)) | dlopen_file_spec_cstr)) |
| PTHROW(0, 0, | PTHROW(0, 0, |
| library, | library, |
| "driver failed to initialize client library '%s', %s", | "driver failed to initialize client library '%s', %s", |
| dlopen_file_spec_cstr, error); | specified_dlopen_file_spec?dlopen_file_spec_cstr:"unspecifed", |
| error); | |
| // cache it | // cache it |
| put_driver_to_cache(global_protocol, *driver); | put_driver_to_cache(global_protocol, *driver); |
| } | } |
| // allocate in global pool | // allocate in global pool |
| // associate with services[request], deassociates at close | // associate with services[request] |
| result=new(this->pool()) SQL_Connection(this->pool(), | // NOTE: never freed up! |
| global_url, *driver, request_url_cstr); | result=new(this->pool()) SQL_Connection(this->pool(), global_url, *driver); |
| } | } |
| // associate with services[request] | // associate with services[request] (deassociates at close) |
| result->set_services(new(pool) SQL_Driver_services_impl(pool, request_url)); | result->set_services(new(pool) SQL_Driver_services_impl(pool, request_url)); |
| SAPI::log(pool, "get_connection: %p", result); | // if not connected yet, do that now, when result has services |
| if(!result->connected()) | |
| result->connect(request_url_cstr); | |
| // return it | |
| return *result; | return *result; |
| } | } |
| void SQL_Driver_manager::close_connection(const String& url, | void SQL_Driver_manager::close_connection(const String& url, |
| SQL_Connection& connection, | SQL_Connection& connection) { |
| Pool& pool) { | |
| SAPI::log(pool, "close_connection: %p", &connection); | |
| // deassociate from services[request] | // deassociate from services[request] |
| connection.set_services(0); | connection.set_services(0); |
| put_connection_to_cache(url, connection); | put_connection_to_cache(url, connection); |
| Line 193 void SQL_Driver_manager::put_driver_to_c | Line 205 void SQL_Driver_manager::put_driver_to_c |
| } | } |
| // connection cache | // connection cache |
| /// @todo get rid of memory spending Stack [zeros deep inside got accumulated] | |
| SQL_Connection *SQL_Driver_manager::get_connection_from_cache(const String& url) { | SQL_Connection *SQL_Driver_manager::get_connection_from_cache(const String& url) { |
| SYNCHRONIZED; | SYNCHRONIZED; |
| maybe_expire_connection_cache(); | |
| if(Stack *connections=static_cast<Stack *>(connection_cache.get(url))) | if(Stack *connections=static_cast<Stack *>(connection_cache.get(url))) |
| if(connections->top_index()>=0) // there are cached connections to that 'url' | while(connections->top_index()>=0) { // there are cached connections to that 'url' |
| return static_cast<SQL_Connection *>(connections->pop()); | SQL_Connection *result=static_cast<SQL_Connection *>(connections->pop()); |
| if(result->connected()) // not expired? | |
| return result; | |
| } | |
| return 0; | return 0; |
| } | } |
| /// @todo cache expiration[use SQL_Driver::disconnect] | |
| void SQL_Driver_manager::put_connection_to_cache(const String& url, | void SQL_Driver_manager::put_connection_to_cache(const String& url, |
| SQL_Connection& connection) { | SQL_Connection& connection) { |
| SYNCHRONIZED; | SYNCHRONIZED; |
| Line 216 void SQL_Driver_manager::put_connection_ | Line 232 void SQL_Driver_manager::put_connection_ |
| } | } |
| connections->push(&connection); | connections->push(&connection); |
| } | } |
| static void expire_connection(Array::Item *value, void *info) { | |
| SQL_Connection& connection=*static_cast<SQL_Connection *>(value); | |
| time_t older_dies=reinterpret_cast<time_t>(info); | |
| if(connection.connected() && connection.expired(older_dies)) | |
| connection.disconnect(); | |
| } | |
| static void expire_connections(const Hash::Key& key, Hash::Val *value, void *info) { | |
| Stack& stack=*static_cast<Stack *>(value); | |
| for(int i=0; i<=stack.top_index(); i++) | |
| expire_connection(stack.get(i), info); | |
| } | |
| void SQL_Driver_manager::maybe_expire_connection_cache() { | |
| time_t now=time(0); | |
| if(prev_expiration_pass_time<now-CHECK_EXPIRED_CONNECTIONS_SECONDS) { | |
| connection_cache.for_each(expire_connections, | |
| reinterpret_cast<void *>(now-EXPIRE_UNUSED_CONNECTION_SECONDS)); | |
| prev_expiration_pass_time=now; | |
| } | |
| } |