--- parser3/src/main/pa_sql_driver_manager.C 2001/09/14 15:49:06 1.35 +++ parser3/src/main/pa_sql_driver_manager.C 2001/10/31 14:58:10 1.48 @@ -2,10 +2,10 @@ Parser: sql driver manager implementation. Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com) - Author: Alexander Petrosyan (http://design.ru/paf) + + $Id: pa_sql_driver_manager.C,v 1.48 2001/10/31 14:58:10 paf Exp $ */ -static const char *RCSId="$Id: pa_sql_driver_manager.C,v 1.35 2001/09/14 15:49:06 parser Exp $"; #include "pa_sql_driver_manager.h" #include "ltdl.h" @@ -13,6 +13,7 @@ static const char *RCSId="$Id: pa_sql_dr #include "pa_exception.h" #include "pa_common.h" #include "pa_threads.h" +#include "pa_stack.h" // globals @@ -31,39 +32,85 @@ public: furl(aurl) { } - /// allocates some bytes on pool - void *malloc(size_t size) { return Pooled::malloc(size); } - /// allocates some bytes clearing them with zeros - void *calloc(size_t size) { return Pooled::calloc(size); } - /// throw exception - void _throw(const char *comment) { - THROW(0, 0, - &furl, + virtual void *malloc(size_t size) { return Pooled::malloc(size, 8); } + virtual void *calloc(size_t size) { return Pooled::calloc(size); } + + /** + the idea is to #1 jump to C++ some function to main body, where + every function stack frame has exception unwind information + and from there... #2 propagate_exception() + */ + virtual void _throw(const char *comment) { + String& protocol=*NEW String(pool()); + /// hiding passwords and addresses from accidental show [imagine user forgot @exception] + protocol << furl.mid(0, furl.pos(":")) << "://****"; + e=Exception(0, 0, + &protocol, comment); + + longjmp(mark, 1); + } + virtual void propagate_exception() { + throw e; } private: const String& furl; + Exception e; }; +// helpers + +static void expire_connection(Array::Item *value, void *info) { + SQL_Connection& connection=*static_cast(value); + time_t older_dies=reinterpret_cast(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(value); + for(int i=0; i<=stack.top_index(); i++) + expire_connection(stack.get(i), info); +} + // SQL_Driver_manager +SQL_Driver_manager::SQL_Driver_manager(Pool& pool) : Pooled(pool), + driver_cache(pool), + connection_cache(pool), + prev_expiration_pass_time(0) { + +} + +SQL_Driver_manager::~SQL_Driver_manager() { + connection_cache.for_each(expire_connections, + reinterpret_cast((time_t)0/*=in past=expire all*/)); +} + /// @param request_url protocol://[driver-dependent] -SQL_Connection& SQL_Driver_manager::get_connection(const String& request_url, +SQL_Connection& SQL_Driver_manager::get_connection(const String& request_url, + const String& request_origin, Table *protocol2driver_and_client) { - Pool& pool=request_url.pool(); // request pool + Pool& pool=request_origin.pool(); // request pool // we have table for locating protocol's library if(!protocol2driver_and_client) - PTHROW(0, 0, + throw Exception(0, 0, &request_url, "$"MAIN_SQL_NAME":"MAIN_SQL_DRIVERS_NAME" table must be defined"); + // construct services[request] (deassociates at close) + SQL_Driver_services *services=new(pool) SQL_Driver_services_impl(pool, request_url); + // first trying to get cached connection SQL_Connection *result=get_connection_from_cache(request_url); - if(result && !result->ping()) { // we have some cached connection, is it pingable? - result->disconnect(); // kill unpingabe=dead connection - result=0; + if(result) { + result->set_services(services); + if(!result->ping()) { // we have some cached connection, is it pingable? + result->disconnect(); // kill unpingabe=dead connection + result=0; + } } char *request_url_cstr; @@ -72,12 +119,12 @@ SQL_Connection& SQL_Driver_manager::get_ else { // no cached connection or it were unpingabe: connect/reconnect int pos=request_url.pos("://", 3); if(pos<0) - PTHROW(0, 0, - &request_url, - "no protocol specified"); // NOTE: not THROW, but PTHROW + throw Exception(0, 0, + request_url.size()?&request_url:&request_origin, + "connection string must start with protocol://"); // NOTE: not THROW, but PTHROW // make global_url C-string on global pool - request_url_cstr=request_url.cstr(String::UL_AS_IS); + request_url_cstr=request_url.cstr(); char *global_url_cstr=(char *)malloc(strlen(request_url_cstr)+1); strcpy(global_url_cstr, request_url_cstr); // make global_url string on global pool @@ -102,33 +149,33 @@ SQL_Connection& SQL_Driver_manager::get_ const String *library=0; if(protocol2driver_and_client->locate(0, global_protocol)) { if(!(library=protocol2driver_and_client->item(1)) || library->size()==0) - PTHROW(0, 0, + throw Exception(0, 0, protocol2driver_and_client->origin_string(), "driver library column for protocol '%s' is empty", request_protocol_cstr); dlopen_file_spec=protocol2driver_and_client->item(2); } else - PTHROW(0, 0, + throw Exception(0, 0, &request_url, "undefined protocol '%s'", request_protocol_cstr); if(lt_dlinit()) - PTHROW(0, 0, + throw Exception(0, 0, library, "prepare to dynamic loading failed, %s", lt_dlerror()); const char *filename=library->cstr(String::UL_FILE_SPEC); lt_dlhandle handle=lt_dlopen(filename); if (!handle) - PTHROW(0, 0, + throw Exception(0, 0, library, "can not open the module, %s", lt_dlerror()); SQL_Driver_create_func create=(SQL_Driver_create_func)lt_dlsym(handle, SQL_DRIVER_CREATE_NAME); if(!create) - PTHROW(0, 0, + throw Exception(0, 0, library, "function '"SQL_DRIVER_CREATE_NAME"' was not found"); @@ -138,7 +185,7 @@ SQL_Connection& SQL_Driver_manager::get_ // validate driver api version int driver_api_version=driver->api_version(); if(driver_api_version!=SQL_DRIVER_API_VERSION) - PTHROW(0, 0, + throw Exception(0, 0, library, "driver implements API version 0x%04X not equal to 0x%04X", driver_api_version, SQL_DRIVER_API_VERSION); @@ -150,7 +197,7 @@ SQL_Connection& SQL_Driver_manager::get_ dlopen_file_spec->cstr(String::UL_FILE_SPEC):0; if(const char *error=driver->initialize( dlopen_file_spec_cstr)) - PTHROW(0, 0, + throw Exception(0, 0, library, "driver failed to initialize client library '%s', %s", specified_dlopen_file_spec?dlopen_file_spec_cstr:"unspecifed", @@ -164,10 +211,10 @@ SQL_Connection& SQL_Driver_manager::get_ // associate with services[request] // NOTE: never freed up! result=new(this->pool()) SQL_Connection(this->pool(), global_url, *driver); + // associate with services[request] (deassociates at close) + result->set_services(services); } - // associate with services[request] (deassociates at close) - result->set_services(new(pool) SQL_Driver_services_impl(pool, request_url)); // if not connected yet, do that now, when result has services if(!result->connected()) result->connect(request_url_cstr); @@ -227,18 +274,6 @@ void SQL_Driver_manager::put_connection_ connections->push(&connection); } -static void expire_connection(Array::Item *value, void *info) { - SQL_Connection& connection=*static_cast(value); - time_t older_dies=reinterpret_cast(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(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);