On Mon, 2002-09-23 at 21:24, Tim Bunce wrote:
> It should work fine - especially if using dynamic loading.
>
> Please create a small test program (three lines: 'use DBI;' and the
> two connects) then run it with the DBI_TRACE env var set to 9.
> See the DBI README file about how to get s stack trace from the core
> dump file. Post the script, the tracem and the stack trace.
-----------------------------
use DBI;
$oDBase1 = DBI->connect( 'its-admin1::csadminp', '', '', 'Ingres' );
$oDBase2 = DBI->connect(
'dbi:Pg:dbname=netdbase;host=its-dev2.massey.ac.nz', 'netdbase', '');
-----------------------------
dbx /usr/local/bin/perl core
dbx version 3.11.10
Type 'help' for help.
Core file created by program "perl"
signal Segmentation fault at >*[__kill, 0x3ff800e9c28] beq r19,
0x3ff800e9c40
(dbx) q
-----------------------------
DBI 1.30-nothread dispatch trace level set to 9
Note: perl is running without the recommended perl -w option
install_method DBI::db::begin_work usage: min 1, max 2, '[
\%attr ]', tl 0
, flags 0x401
install_method DBI::db::event usage: min 2, max 0, '$type, @args',
tl 0
, flags 0x5
install_method DBI::db::FIRSTKEY , flags 0x4
install_method DBI::db::trace_msg usage: min 2, max 3,
'$message_text [, $min_level ]', tl 8
, flags 0x5
install_method DBI::db::quote_identifier usage: min 2, max 5,
'$name [, ...]', tl 0
, flags 0x431
install_method DBI::db::rows , flags 0x4
install_method DBI::db::type_info usage: min 1, max 2,
'$data_type', tl 0
, flags 0x201
install_method DBI::db::type_info_all usage: min 1, max 1, '', tl
0
, flags 0x201
install_method DBI::db::primary_key usage: min 4, max 5,
'$catalog, $schema, $table [, \%attr ]', tl 0
, flags 0x201
install_method DBI::db::rollback usage: min 1, max 1, '', tl
0
, flags 0x481
install_method DBI::db::quote usage: min 2, max 3, '$string [,
$data_type ]', tl 0
, flags 0x431
install_method DBI::db::connected , flags 0x100
install_method DBI::db::private_data usage: min 1, max 1, '', tl
0
, flags 0x5
install_method DBI::db::table_info usage: min 1, max 6,
'$catalog, $schema, $table, $type [, \%attr ]', tl 0
, flags 0x201
install_method DBI::db::prepare usage: min 2, max 3, '$statement [,
\%attr]', tl 0
, flags 0x1
install_method DBI::db::prepare_cached usage: min 2, max 4,
'$statement [, \%attr [, $allow_active ] ]', tl 0
, flags 0x1
install_method DBI::db::tables usage: min 1, max 6, '$catalog,
$schema, $table, $type [, \%attr ]', tl 0
, flags 0x201
install_method DBI::db::selectall_arrayref usage: min 2, max 0,
'$statement [, \%attr [, @bind_params ] ]', tl
0
, flags 0x1
install_method DBI::db::primary_key_info usage: min 4, max 5,
'$catalog, $schema, $table [, \%attr ]', tl 0
, flags 0x201
install_method DBI::db::column_info usage: min 1, max 6,
'$catalog, $schema, $table, $column [, \%attr ]', tl 0
, flags 0x201
install_method DBI::db::selectrow_hashref usage: min 2, max 0,
'$statement [, \%attr [, @bind_params ] ]', tl
0
, flags 0x1
install_method DBI::db::foreign_key_info usage: min 1, max 7,
'$pk_catalog, $pk_schema, $pk_table, $fk_catalo
g, $fk_schema, $fk_table', tl 0
, flags 0x201
install_method DBI::db::func , flags 0x6
install_method DBI::db::selectall_hashref usage: min 3, max 0,
'$statement, $keyfield [, \%attr [, @bind_param
s ] ]', tl 0
, flags 0x1
install_method DBI::db::FETCH , flags 0x404
install_method DBI::db::DESTROY
install_method DBI::db::disconnect usage: min 1, max 1, '', tl
0
, flags 0x401
install_method DBI::db::errstr , flags 0x4
install_method DBI::db::selectrow_array usage: min 2, max 0,
'$statement [, \%attr [, @bind_params ] ]', tl 0
, flags 0x1
install_method DBI::db::trace usage: min 1, max 3, '[$trace_level,
[$filename]]', tl 0
, flags 0x5
install_method DBI::db::ping usage: min 1, max 1, '', tl 0
, flags 0x405
install_method DBI::db::preparse , flags 0x0
install_method DBI::db::CLEAR , flags 0x4
install_method DBI::db::debug usage: min 1, max 2,
'[$debug_level]', tl 0
, flags 0x5
install_method DBI::db::err , flags 0x4
install_method DBI::db::state usage: min 1, max 1, '', tl 0
, flags 0x5
install_method DBI::db::STORE , flags 0x410
install_method DBI::db::get_info usage: min 2, max 2,
'$info_type', tl 0
, flags 0x201
install_method DBI::db::commit usage: min 1, max 1, '', tl 0
, flags 0x481
install_method DBI::db::selectcol_arrayref usage: min 2, max 0,
'$statement [, \%attr [, @bind_params ] ]', tl
0
, flags 0x1
install_method DBI::db::_not_impl
install_method DBI::db::selectrow_arrayref usage: min 2, max 0,
'$statement [, \%attr [, @bind_params ] ]', tl
0
, flags 0x1
install_method DBI::db::do usage: min 2, max 0, '$statement [,
\%attr [, @bind_params ] ]', tl 0
, flags 0x1
install_method DBI::db::NEXTKEY , flags 0x4
install_method DBI::db::EXISTS , flags 0x4
install_method DBI::db::set_err , flags 0x0
install_method DBI::dr::event usage: min 2, max 0, '$type, @args',
tl 0
, flags 0x5
install_method DBI::dr::FIRSTKEY , flags 0x4
install_method DBI::dr::data_sources usage: min 1, max 2,
'[\%attr]', tl 0
, flags 0x1
install_method DBI::dr::trace_msg usage: min 2, max 3,
'$message_text [, $min_level ]', tl 8
, flags 0x5
install_method DBI::dr::connect_cached usage: min 1, max 5, '[$db
[,$user [,$passwd [,\%attr]]]]', tl 0
, flags 0x1
install_method DBI::dr::default_user usage: min 3, max 4, '$user,
$pass [, \%attr]', tl 0
, flags 0x1
install_method DBI::dr::private_data usage: min 1, max 1, '', tl
0
, flags 0x5
install_method DBI::dr::disconnect_all usage: min 1, max 1, '', tl
0
, flags 0x1
install_method DBI::dr::func , flags 0x6
install_method DBI::dr::FETCH , flags 0x404
install_method DBI::dr::DESTROY
install_method DBI::dr::errstr , flags 0x4
install_method DBI::dr::trace usage: min 1, max 3, '[$trace_level,
[$filename]]', tl 0
, flags 0x5
install_method DBI::dr::CLEAR , flags 0x4
install_method DBI::dr::connect usage: min 1, max 5, '[$db [,$user
[,$passwd [,\%attr]]]]', tl 0
, flags 0x1
install_method DBI::dr::err , flags 0x4
install_method DBI::dr::debug usage: min 1, max 2,
'[$debug_level]', tl 0
, flags 0x5
install_method DBI::dr::state usage: min 1, max 1, '', tl 0
, flags 0x5
install_method DBI::dr::STORE , flags 0x410
install_method DBI::dr::_not_impl
install_method DBI::dr::EXISTS , flags 0x4
install_method DBI::dr::NEXTKEY , flags 0x4
install_method DBI::dr::set_err , flags 0x0
install_method DBI::st::fetchrow
install_method DBI::st::event usage: min 2, max 0, '$type, @args',
tl 0
, flags 0x5
install_method DBI::st::FIRSTKEY , flags 0x4
install_method DBI::st::cancel usage: min 1, max 1, '', tl 0
, flags 0x1
install_method DBI::st::trace_msg usage: min 2, max 3,
'$message_text [, $min_level ]', tl 8
, flags 0x5
install_method DBI::st::bind_param usage: min 3, max 4,
'$parameter, $var [, \%attr]', tl 0
, flags 0x1
install_method DBI::st::rows , flags 0x4
install_method DBI::st::finish usage: min 1, max 1, '', tl 0
, flags 0x1
install_method DBI::st::fetchrow_arrayref
install_method DBI::st::fetch
install_method DBI::st::bind_param_inout usage: min 4, max 5,
'$parameter, \$var, $maxlen, [, \%attr]', tl 0
, flags 0x1
install_method DBI::st::private_data usage: min 1, max 1, '', tl
0
, flags 0x5
install_method DBI::st::fetchrow_array
install_method DBI::st::dump_results usage: min 1, max 5,
'$maxfieldlen, $linesep, $fieldsep, $filehandle', tl 0
, flags 0x1
install_method DBI::st::_set_fbav , flags 0x0
install_method DBI::st::execute usage: min 1, max 0, '[@args]', tl 0
, flags 0x41
install_method DBI::st::blob_read usage: min 4, max 5,
'$field, $offset, $len [, \$buf [, $bufoffset]]', tl 0
, flags 0x1
install_method DBI::st::blob_copy_to_file usage: min 3, max 3,
'$field, $filename_or_handleref', tl 0
, flags 0x1
install_method DBI::st::bind_param_inout_array usage: min 4, max 5,
'$parameter, \@var, $maxlen, [, \%attr]', tl 0
, flags 0x1
install_method DBI::st::bind_columns usage: min 2, max 0, '\$var1
[, \$var2, ...]', tl 0
, flags 0x1
install_method DBI::st::bind_col usage: min 3, max 4,
'$column, \$var [, \%attr]', tl 0
, flags 0x1
install_method DBI::st::func , flags 0x6
install_method DBI::st::fetchrow_hashref
install_method DBI::st::DESTROY
install_method DBI::st::FETCH , flags 0x404
install_method DBI::st::errstr , flags 0x4
install_method DBI::st::fetchall_hashref usage: min 2, max 2,
'', tl 0
, flags 0x1
install_method DBI::st::trace usage: min 1, max 3, '[$trace_level,
[$filename]]', tl 0
, flags 0x5
install_method DBI::st::fetchall_arrayref usage: min 1, max 3,
'', tl 0
, flags 0x1
install_method DBI::st::CLEAR , flags 0x4
install_method DBI::st::debug usage: min 1, max 2,
'[$debug_level]', tl 0
, flags 0x5
install_method DBI::st::err , flags 0x4
install_method DBI::st::state usage: min 1, max 1, '', tl 0
, flags 0x5
install_method DBI::st::STORE , flags 0x410
install_method DBI::st::more_results usage: min 1, max 1, '', tl
0
, flags 0x1
install_method DBI::st::_get_fbav
install_method DBI::st::_not_impl
install_method DBI::st::execute_array usage: min 2, max 0,
'\%attribs [, @args]', tl 0
, flags 0x1
install_method DBI::st::NEXTKEY , flags 0x4
install_method DBI::st::EXISTS , flags 0x4
install_method DBI::st::bind_param_array usage: min 3, max 4,
'$parameter, $var [, \%attr]', tl 0
, flags 0x1
install_method DBI::st::set_err , flags 0x0
-> DBI->connect(its-admin1::csadminp, , ****, Ingres)
-> DBI->install_driver(Ingres) for dec_osf perl=5.006 pid=22060
ruid=100 euid=100
install_driver: DBD::Ingres version 0.34 loaded from
/usr/local/lib/perl5/site_perl/5.6.0/alpha-dec_osf/DBD/Ingre
s.pm
New DBI::dr (for DBD::Ingres::dr, parent=, id=)
dbih_setup_handle(DBI::dr=HASH(0x1400f3110)=>DBI::dr=HASH(0x140169f78),
DBD::Ingres::dr, 0, Null!)
dbih_make_com(Null!, DBD::Ingres::dr, 152) thr#0
dbih_setup_attrib(DBI::dr=HASH(0x140169f78), Err, Null!)
SCALAR(0x1400a8f68) (already defined)
dbih_setup_attrib(DBI::dr=HASH(0x140169f78), State, Null!)
SCALAR(0x1400f33d0) (already defined)
dbih_setup_attrib(DBI::dr=HASH(0x140169f78), Errstr, Null!)
SCALAR(0x1400a8f28) (already defined)
dbih_setup_attrib(DBI::dr=HASH(0x140169f78), Debug, Null!) 0
(already defined)
dbih_setup_attrib(DBI::dr=HASH(0x140169f78), FetchHashKeyName,
Null!) 'NAME' (already defined)
<- install_driver= DBI::dr=HASH(0x1400f3110)
>> connect DISPATCH (DBI::dr=HASH(0x1400f3110) rc1/3 @5 g0 ima1
pid#22060) at /usr/local/lib/perl5/site_perl/5.6
..0/alpha-dec_osf/DBI.pm line 503 via DBITest line 2
-> connect for DBD::Ingres::dr
(DBI::dr=HASH(0x1400f3110)~0x140169f78 'its-admin1::csadminp' '' ****
HASH(0x1400b90e
0))
New DBI::db (for DBD::Ingres::db, parent=DBI::dr=HASH(0x140169f78),
id=)
dbih_setup_handle(DBI::db=HASH(0x140169f28)=>DBI::db=HASH(0x140169e88),
DBD::Ingres::db, 1400ef558, Null!)
dbih_make_com(DBI::dr=HASH(0x140169f78), DBD::Ingres::db, 176) thr#0
dbih_setup_attrib(DBI::db=HASH(0x140169e88), Err,
DBI::dr=HASH(0x140169f78)) SCALAR(0x1400a8f68) (already defined)
dbih_setup_attrib(DBI::db=HASH(0x140169e88), State,
DBI::dr=HASH(0x140169f78)) SCALAR(0x1400f33d0) (already defined)
dbih_setup_attrib(DBI::db=HASH(0x140169e88), Errstr,
DBI::dr=HASH(0x140169f78)) SCALAR(0x1400a8f28) (already defined
)
dbih_setup_attrib(DBI::db=HASH(0x140169e88), Debug,
DBI::dr=HASH(0x140169f78)) 0 (already defined)
dbih_setup_attrib(DBI::db=HASH(0x140169e88), FetchHashKeyName,
DBI::dr=HASH(0x140169f78)) 'NAME' (already defined)
dbih_setup_attrib(DBI::db=HASH(0x140169e88), HandleError,
DBI::dr=HASH(0x140169f78)) undef (not defined)
DBD::Ingres::dbd_db_login: dbname: its-admin1::csadminp
nouser
After connect, sqlcode=0, session=1
DBD::Ingres::dbd_db_connect(AUTOCOMMIT=0)
<- connect= DBI::db=HASH(0x140169f28) at
/usr/local/lib/perl5/site_perl/5.6.0/alpha-dec_osf/DBI.pm line 503 via
DBIT
est line 2
<- connect= DBI::db=HASH(0x140169f28)
-> DBI->connect(dbi:Pg:dbname=netdbase;host=its-dev2.massey.ac.nz,
netdbase, ****)
-> DBI->install_driver(Pg) for dec_osf perl=5.006 pid=22060 ruid=100
euid=100
install_driver: DBD::Pg version 1.13 loaded from
/usr/local/lib/perl5/site_perl/5.6.0/alpha-dec_osf/DBD/Pg.pm
New DBI::dr (for DBD::Pg::dr, parent=, id=)
dbih_setup_handle(DBI::dr=HASH(0x14016ac58)=>DBI::dr=HASH(0x140181e38),
DBD::Pg::dr, 0, Null!)
dbih_make_com(Null!, DBD::Pg::dr, 152) thr#0
dbih_setup_attrib(DBI::dr=HASH(0x140181e38), Err, Null!)
SCALAR(0x14018acb8) (already defined)
dbih_setup_attrib(DBI::dr=HASH(0x140181e38), State, Null!)
SCALAR(0x140169f18) (already defined)
dbih_setup_attrib(DBI::dr=HASH(0x140181e38), Errstr, Null!)
SCALAR(0x14018ace8) (already defined)
dbih_setup_attrib(DBI::dr=HASH(0x140181e38), Debug, Null!) 0
(already defined)
dbih_setup_attrib(DBI::dr=HASH(0x140181e38), FetchHashKeyName,
Null!) 'NAME' (already defined)
<- install_driver= DBI::dr=HASH(0x14016ac58)
>> connect DISPATCH (DBI::dr=HASH(0x14016ac58) rc1/3 @5 g0 ima1
pid#22060) at /usr/local/lib/perl5/site_perl/5.6
..0/alpha-dec_osf/DBI.pm line 503 via DBITest line 3
-> connect for DBD::Pg::dr (DBI::dr=HASH(0x14016ac58)~0x140181e38
'dbname=netdbase;host=its-dev2.massey.ac.nz' 'netd
base' **** HASH(0x140169e48))
New DBI::db (for DBD::Pg::db, parent=DBI::dr=HASH(0x140181e38), id=)
dbih_setup_handle(DBI::db=HASH(0x140181de8)=>DBI::db=HASH(0x140181d48),
DBD::Pg::db, 14016ac68, Null!)
dbih_make_com(DBI::dr=HASH(0x140181e38), DBD::Pg::db, 168) thr#0
dbih_setup_attrib(DBI::db=HASH(0x140181d48), Err,
DBI::dr=HASH(0x140181e38)) SCALAR(0x14018acb8) (already defined)
dbih_setup_attrib(DBI::db=HASH(0x140181d48), State,
DBI::dr=HASH(0x140181e38)) SCALAR(0x140169f18) (already defined)
dbih_setup_attrib(DBI::db=HASH(0x140181d48), Errstr,
DBI::dr=HASH(0x140181e38)) SCALAR(0x14018ace8) (already defined
)
dbih_setup_attrib(DBI::db=HASH(0x140181d48), Debug,
DBI::dr=HASH(0x140181e38)) 0 (already defined)
dbih_setup_attrib(DBI::db=HASH(0x140181d48), FetchHashKeyName,
DBI::dr=HASH(0x140181e38)) 'NAME' (already defined)
dbih_setup_attrib(DBI::db=HASH(0x140181d48), HandleError,
DBI::dr=HASH(0x140181e38)) undef (not defined)
--
.*. | Glen Eustace, Systems Engineer - Networking.
/V\ | Information Technology Services PN460, Turitea,
(/ \) | Massey University, Palmerston North, New Zealand.
( ) | Ph: +64 6 350 5799 x 2707, Fax: +64 6 350 5607
^^-^^ |------------------------------------------------------------
