| Subject: | fb1.5 panic on trying to fetchrow_arrayref |
I have a problem with firebird 1.5.0.4290 and DBD::Interbase 0.43 compiled with 1.5.0.4290 headers.
firebird 1.0 works just fine.
$ ./test
DBD::InterBase::st fetchrow_arrayref failed: Unsuccessful execution caused by a system error that precludes
successful execution of subsequent statements
-Error reading data from the connection.
DBI handle cleared whilst still active at ./test line 10.
dbih_clearcom (sth 0x829c3fc, com 0x82a7318, imp DBD::InterBase::st):
FLAGS 0x80115: COMSET Active Warn PrintError
PARENT DBI::db=HASH(0x829bdc8)
KIDS 0 (0 Active)
IMP_DATA undef
NUM_OF_FIELDS 25
NUM_OF_PARAMS 0
-902: Unsuccessful execution caused by a system error that precludes
successful execution of subsequent statements
-Error reading data from the connection.
InterBase 6 Language Reference tells:
-902 Internal isc software consistency check (<string>)
$ cat test
#! /usr/bin/perl
use DBI;
my $dsn=<<DSN
dbi:InterBase:db=/home/alex/database.gdb;
host=192.168.0.1;
ib_dialect=3;
ib_charset=WIN1251;
DSN
;
eval {
my $dbh = DBI->connect($dsn, 'sysdba', 'masterkey')
or die;
my $sth = $dbh->prepare("select * from users where id=1;")
or die;
$sth->execute
or die;
print $sth->fetchrow_arrayref->[0];
} or die DBI::err.": ".DBI::errstr;
$ perl -v
This is perl, v5.8.4 built for i386-linux-thread-multi
$ uname -a
Linux frekenbok 2.4.26-frekenbok #7 Fri Jul 2 15:24:24 KRAST 2004 i686 GNU/Linux
/var/local/cpan/build/DBD-InterBase-0.43# make test
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/00base...........ok
t/10dsnlist........ok
t/20createdrop.....ok
t/30insertfetch....ok
t/40alltypes.......Use of uninitialized value in numeric eq (==) at t/40alltypes.t line 194.
ok
t/40bindparam......DBD::InterBase::st execute failed: Arithmetic overflow or division by zero has occurred.
-arithmetic exception, numeric overflow, or string truncation
-Cannot transliterate character between character sets
Use of uninitialized value in printf at t/40bindparam.t line 164.
FAILED tests 10, 22-24
Failed 4/26 tests, 84.62% okay
t/40blobs..........ok
t/40cursor.........Use of uninitialized value in numeric eq (==) at t/40cursor.t line 140.
ok
t/40cursoron.......Use of uninitialized value in numeric eq (==) at t/40cursoron.t line 136.
ok
t/40datetime.......Use of uninitialized value in numeric eq (==) at t/40datetime.t line 159.
ok
t/40doparam........ok
t/40listfields.....Use of uninitialized value in numeric eq (==) at t/40listfields.t line 131.
ok
t/40nulls..........ok
t/40numrows........ok
t/41numeric........Use of uninitialized value in numeric eq (==) at t/41numeric.t line 173.
ok
t/50chopblanks.....ok
t/50commit.........ok
t/60leaks..........skipped
all skipped: Long running memory leak test
t/61settx..........ok
t/70nestedoff......ok
t/70nestedon.......ok
t/ak-dbd...........DBD::InterBase::st fetchrow warning: no statement executing (perhaps you need to call execute first)
ok
t/dbdadmin.........ok
Failed 1/23 test scripts, 95.65% okay. 4/392 subtests failed, 98.98% okay.
Failed Test Stat Wstat Total Fail Failed List of Failed
-------------------------------------------------------------------------------
t/40bindparam.t 26 4 15.38% 10 22-24
1 test skipped.
make: *** [test_dynamic] Error 255