Setting PATH to /opt/SUNWspro/bin:/usr/local/bin:/opt/csw/bin:/usr/ccs/bin:/usr/bin:/usr/sbin
Start 2010-05-05T05:26:42
ActivePerl-1003 CPAN-1.9402
Going to read '/export/home/fly1003/var/cpan/Metadata'
Database was generated on Tue, 04 May 2010 21:27:06 GMT
Running make for H/HM/HMBRAND/DBD-CSV-0.29.tgz
Checksum for /net/nas/data/cpan/authors/id/H/HM/HMBRAND/DBD-CSV-0.29.tgz ok
Will not use Archive::Tar, need 1.00
DBD-CSV-0.29/
DBD-CSV-0.29/META.yml
DBD-CSV-0.29/ChangeLog
DBD-CSV-0.29/examples/
DBD-CSV-0.29/examples/passwd.pl
DBD-CSV-0.29/README
DBD-CSV-0.29/t/
DBD-CSV-0.29/t/43_blobs.t
DBD-CSV-0.29/t/73_csv-case.t
DBD-CSV-0.29/t/80_rt.t
DBD-CSV-0.29/t/72_csv-schema.t
DBD-CSV-0.29/t/40_numrows.t
DBD-CSV-0.29/t/41_nulls.t
DBD-CSV-0.29/t/20_createdrop.t
DBD-CSV-0.29/t/00_pod.t
DBD-CSV-0.29/t/51_commit.t
DBD-CSV-0.29/t/lib.pl
DBD-CSV-0.29/t/00_meta.t
DBD-CSV-0.29/t/00_pod_cov.t
DBD-CSV-0.29/t/30_insertfetch.t
DBD-CSV-0.29/t/42_bindparam.t
DBD-CSV-0.29/t/11_dsnlist.t
DBD-CSV-0.29/t/70_csv.t
DBD-CSV-0.29/t/48_utf8.t
DBD-CSV-0.29/t/10_base.t
DBD-CSV-0.29/t/71_csv-ext.t
DBD-CSV-0.29/t/60_misc.t
DBD-CSV-0.29/t/50_chopblanks.t
DBD-CSV-0.29/t/44_listfields.t
DBD-CSV-0.29/Makefile.PL
DBD-CSV-0.29/MANIFEST
DBD-CSV-0.29/MANIFEST.SKIP
DBD-CSV-0.29/lib/
DBD-CSV-0.29/lib/Bundle/
DBD-CSV-0.29/lib/Bundle/DBD/
DBD-CSV-0.29/lib/Bundle/DBD/CSV.pm
DBD-CSV-0.29/lib/DBD/
DBD-CSV-0.29/lib/DBD/CSV.pm
CPAN.pm: Going to build H/HM/HMBRAND/DBD-CSV-0.29.tgz
>>> /export/home/fly1003/bin/perl Makefile.PL
Warning: prerequisite DBD::File 0.38 not found. We have 0.37.
Warning: prerequisite DBI 1.611 not found. We have 1.609.
Checking if your kit is complete...
Looks good
Writing Makefile for DBD::CSV
---- Unsatisfied dependencies detected during ----
---- HMBRAND/DBD-CSV-0.29.tgz ----
DBD::File [requires]
DBI [requires]
Running make test
Delayed until after prerequisites
Running test for module 'DBD::File'
Running make for T/TI/TIMB/DBI-1.611.tar.gz
Checksum for /net/nas/data/cpan/authors/id/T/TI/TIMB/DBI-1.611.tar.gz ok
Will not use Archive::Tar, need 1.00
DBI-1.611/
DBI-1.611/Changes
DBI-1.611/dbd_xsh.h
DBI-1.611/DBI.pm
DBI-1.611/DBI.xs
DBI-1.611/dbi_sql.h
DBI-1.611/dbilogstrip.PL
DBI-1.611/dbipport.h
DBI-1.611/dbiprof.PL
DBI-1.611/dbiproxy.PL
DBI-1.611/dbivport.h
DBI-1.611/DBIXS.h
DBI-1.611/dbixs_rev.h
DBI-1.611/dbixs_rev.pl
DBI-1.611/Driver.xst
DBI-1.611/Driver_xst.h
DBI-1.611/ex/
DBI-1.611/lib/
DBI-1.611/Makefile.PL
DBI-1.611/MANIFEST
DBI-1.611/META.yml
DBI-1.611/Perl.xs
DBI-1.611/README
DBI-1.611/Roadmap.pod
DBI-1.611/t/
DBI-1.611/TASKS.pod
DBI-1.611/test.pl
DBI-1.611/TODO_2005.txt
DBI-1.611/TODO_gofer.txt
DBI-1.611/typemap
DBI-1.611/t/01basics.t
DBI-1.611/t/02dbidrv.t
DBI-1.611/t/03handle.t
DBI-1.611/t/04mods.t
DBI-1.611/t/05concathash.t
DBI-1.611/t/06attrs.t
DBI-1.611/t/07kids.t
DBI-1.611/t/08keeperr.t
DBI-1.611/t/09trace.t
DBI-1.611/t/10examp.t
DBI-1.611/t/11fetch.t
DBI-1.611/t/12quote.t
DBI-1.611/t/13taint.t
DBI-1.611/t/14utf8.t
DBI-1.611/t/15array.t
DBI-1.611/t/19fhtrace.t
DBI-1.611/t/20meta.t
DBI-1.611/t/30subclass.t
DBI-1.611/t/35thrclone.t
DBI-1.611/t/40profile.t
DBI-1.611/t/41prof_dump.t
DBI-1.611/t/42prof_data.t
DBI-1.611/t/43prof_env.t
DBI-1.611/t/50dbm.t
DBI-1.611/t/60preparse.t
DBI-1.611/t/65transact.t
DBI-1.611/t/70callbacks.t
DBI-1.611/t/72childhandles.t
DBI-1.611/t/80proxy.t
DBI-1.611/t/85gofer.t
DBI-1.611/t/86gofer_fail.t
DBI-1.611/t/87gofer_cache.t
DBI-1.611/t/90sql_type_cast.t
DBI-1.611/t/pod-coverage.t
DBI-1.611/t/pod.t
DBI-1.611/lib/Bundle/
DBI-1.611/lib/DBD/
DBI-1.611/lib/DBI/
DBI-1.611/lib/Win32/
DBI-1.611/lib/Win32/DBIODBC.pm
DBI-1.611/lib/DBI/Const/
DBI-1.611/lib/DBI/DBD/
DBI-1.611/lib/DBI/DBD.pm
DBI-1.611/lib/DBI/FAQ.pm
DBI-1.611/lib/DBI/Gofer/
DBI-1.611/lib/DBI/Profile.pm
DBI-1.611/lib/DBI/ProfileData.pm
DBI-1.611/lib/DBI/ProfileDumper/
DBI-1.611/lib/DBI/ProfileDumper.pm
DBI-1.611/lib/DBI/ProfileSubs.pm
DBI-1.611/lib/DBI/ProxyServer.pm
DBI-1.611/lib/DBI/PurePerl.pm
DBI-1.611/lib/DBI/SQL/
DBI-1.611/lib/DBI/Util/
DBI-1.611/lib/DBI/W32ODBC.pm
DBI-1.611/lib/DBI/Util/_accessor.pm
DBI-1.611/lib/DBI/Util/CacheMemory.pm
DBI-1.611/lib/DBI/SQL/Nano.pm
DBI-1.611/lib/DBI/ProfileDumper/Apache.pm
DBI-1.611/lib/DBI/Gofer/Execute.pm
DBI-1.611/lib/DBI/Gofer/Request.pm
DBI-1.611/lib/DBI/Gofer/Response.pm
DBI-1.611/lib/DBI/Gofer/Serializer/
DBI-1.611/lib/DBI/Gofer/Transport/
DBI-1.611/lib/DBI/Gofer/Transport/Base.pm
DBI-1.611/lib/DBI/Gofer/Transport/pipeone.pm
DBI-1.611/lib/DBI/Gofer/Transport/stream.pm
DBI-1.611/lib/DBI/Gofer/Serializer/Base.pm
DBI-1.611/lib/DBI/Gofer/Serializer/DataDumper.pm
DBI-1.611/lib/DBI/Gofer/Serializer/Storable.pm
DBI-1.611/lib/DBI/DBD/Metadata.pm
DBI-1.611/lib/DBI/Const/GetInfo/
DBI-1.611/lib/DBI/Const/GetInfoReturn.pm
DBI-1.611/lib/DBI/Const/GetInfoType.pm
DBI-1.611/lib/DBI/Const/GetInfo/ANSI.pm
DBI-1.611/lib/DBI/Const/GetInfo/ODBC.pm
DBI-1.611/lib/DBD/DBM.pm
DBI-1.611/lib/DBD/ExampleP.pm
DBI-1.611/lib/DBD/File.pm
DBI-1.611/lib/DBD/Gofer/
DBI-1.611/lib/DBD/Gofer.pm
DBI-1.611/lib/DBD/NullP.pm
DBI-1.611/lib/DBD/Proxy.pm
DBI-1.611/lib/DBD/Sponge.pm
DBI-1.611/lib/DBD/Gofer/Policy/
DBI-1.611/lib/DBD/Gofer/Transport/
DBI-1.611/lib/DBD/Gofer/Transport/Base.pm
DBI-1.611/lib/DBD/Gofer/Transport/null.pm
DBI-1.611/lib/DBD/Gofer/Transport/pipeone.pm
DBI-1.611/lib/DBD/Gofer/Transport/stream.pm
DBI-1.611/lib/DBD/Gofer/Policy/Base.pm
DBI-1.611/lib/DBD/Gofer/Policy/classic.pm
DBI-1.611/lib/DBD/Gofer/Policy/pedantic.pm
DBI-1.611/lib/DBD/Gofer/Policy/rush.pm
DBI-1.611/lib/Bundle/DBI.pm
DBI-1.611/ex/perl_dbi_nulls_test.pl
DBI-1.611/ex/profile.pl
CPAN.pm: Going to build T/TI/TIMB/DBI-1.611.tar.gz
>>> /export/home/fly1003/bin/perl Makefile.PL
*** You are using a perl configured with threading enabled.
*** You should be aware that using multiple threads is
*** not recommended for production environments.
Creating test wrappers for DBI::PurePerl:
t/zvp_01basics.t
t/zvp_02dbidrv.t
t/zvp_03handle.t
t/zvp_04mods.t
t/zvp_05concathash.t
t/zvp_06attrs.t
t/zvp_07kids.t
t/zvp_08keeperr.t
t/zvp_09trace.t
t/zvp_10examp.t
t/zvp_11fetch.t
t/zvp_12quote.t
t/zvp_13taint.t
t/zvp_14utf8.t
t/zvp_15array.t
t/zvp_19fhtrace.t
t/zvp_20meta.t
t/zvp_30subclass.t
t/zvp_35thrclone.t (use threads)
t/zvp_40profile.t
t/zvp_41prof_dump.t
t/zvp_42prof_data.t
t/zvp_43prof_env.t
t/zvp_50dbm.t
t/zvp_60preparse.t
t/zvp_65transact.t
t/zvp_70callbacks.t
t/zvp_72childhandles.t
t/zvp_80proxy.t
t/zvp_85gofer.t
t/zvp_86gofer_fail.t
t/zvp_87gofer_cache.t
t/zvp_90sql_type_cast.t
Creating test wrappers for DBD::Gofer:
t/zvg_01basics.t
t/zvg_02dbidrv.t
t/zvg_03handle.t
t/zvg_04mods.t
t/zvg_05concathash.t
t/zvg_06attrs.t
t/zvg_07kids.t
t/zvg_08keeperr.t
t/zvg_09trace.t
t/zvg_10examp.t
t/zvg_11fetch.t
t/zvg_12quote.t
t/zvg_13taint.t
t/zvg_14utf8.t
t/zvg_15array.t
t/zvg_19fhtrace.t
t/zvg_20meta.t
t/zvg_30subclass.t
t/zvg_35thrclone.t (use threads)
t/zvg_40profile.t
t/zvg_41prof_dump.t
t/zvg_42prof_data.t
t/zvg_43prof_env.t
t/zvg_50dbm.t
t/zvg_60preparse.t
t/zvg_65transact.t
t/zvg_70callbacks.t
t/zvg_72childhandles.t
t/zvg_80proxy.t
t/zvg_85gofer.t
t/zvg_86gofer_fail.t
t/zvg_87gofer_cache.t
t/zvg_90sql_type_cast.t
Creating test wrappers for PurePerl & Gofer:
t/zvxgp_01basics.t
t/zvxgp_02dbidrv.t
t/zvxgp_03handle.t
t/zvxgp_04mods.t
t/zvxgp_05concathash.t
t/zvxgp_06attrs.t
t/zvxgp_07kids.t
t/zvxgp_08keeperr.t
t/zvxgp_09trace.t
t/zvxgp_10examp.t
t/zvxgp_11fetch.t
t/zvxgp_12quote.t
t/zvxgp_13taint.t
t/zvxgp_14utf8.t
t/zvxgp_15array.t
t/zvxgp_19fhtrace.t
t/zvxgp_20meta.t
t/zvxgp_30subclass.t
t/zvxgp_35thrclone.t (use threads)
t/zvxgp_40profile.t
t/zvxgp_41prof_dump.t
t/zvxgp_42prof_data.t
t/zvxgp_43prof_env.t
t/zvxgp_50dbm.t
t/zvxgp_60preparse.t
t/zvxgp_65transact.t
t/zvxgp_70callbacks.t
t/zvxgp_72childhandles.t
t/zvxgp_80proxy.t
t/zvxgp_85gofer.t
t/zvxgp_86gofer_fail.t
t/zvxgp_87gofer_cache.t
t/zvxgp_90sql_type_cast.t
Checking if your kit is complete...
Looks good
Warning: By default new modules are installed into your 'site_lib'
directories. Since site_lib directories come after the normal library
directories you must delete old DBI files and directories from your
'privlib' and 'archlib' directories and their auto subdirectories.
Reinstall DBI and your DBD::* drivers after deleting the old directories.
Here's a list of probable old files and directories:
/export/home/fly1003/ap1003/lib/Bundle/DBD
/export/home/fly1003/ap1003/lib/Bundle/DBI.pm
/export/home/fly1003/ap1003/lib/DBD
/export/home/fly1003/ap1003/lib/DBI
/export/home/fly1003/ap1003/lib/DBI.pm
/export/home/fly1003/ap1003/lib/DBI/Changes.pm
/export/home/fly1003/ap1003/lib/DBI/Const
/export/home/fly1003/ap1003/lib/DBI/Const/GetInfo
/export/home/fly1003/ap1003/lib/DBI/Const/GetInfo/ANSI.pm
/export/home/fly1003/ap1003/lib/DBI/Const/GetInfo/ODBC.pm
/export/home/fly1003/ap1003/lib/DBI/Const/GetInfoReturn.pm
/export/home/fly1003/ap1003/lib/DBI/Const/GetInfoType.pm
/export/home/fly1003/ap1003/lib/DBI/DBD
/export/home/fly1003/ap1003/lib/DBI/DBD.pm
/export/home/fly1003/ap1003/lib/DBI/DBD/Metadata.pm
/export/home/fly1003/ap1003/lib/DBI/FAQ.pm
/export/home/fly1003/ap1003/lib/DBI/Gofer
/export/home/fly1003/ap1003/lib/DBI/Gofer/Execute.pm
/export/home/fly1003/ap1003/lib/DBI/Gofer/Request.pm
/export/home/fly1003/ap1003/lib/DBI/Gofer/Response.pm
/export/home/fly1003/ap1003/lib/DBI/Gofer/Serializer
/export/home/fly1003/ap1003/lib/DBI/Gofer/Serializer/Base.pm
/export/home/fly1003/ap1003/lib/DBI/Gofer/Serializer/DataDumper.pm
/export/home/fly1003/ap1003/lib/DBI/Gofer/Serializer/Storable.pm
/export/home/fly1003/ap1003/lib/DBI/Gofer/Transport
/export/home/fly1003/ap1003/lib/DBI/Gofer/Transport/Base.pm
/export/home/fly1003/ap1003/lib/DBI/Gofer/Transport/pipeone.pm
/export/home/fly1003/ap1003/lib/DBI/Gofer/Transport/stream.pm
/export/home/fly1003/ap1003/lib/DBI/Profile.pm
/export/home/fly1003/ap1003/lib/DBI/ProfileData.pm
/export/home/fly1003/ap1003/lib/DBI/ProfileDumper
/export/home/fly1003/ap1003/lib/DBI/ProfileDumper.pm
/export/home/fly1003/ap1003/lib/DBI/ProfileDumper/Apache.pm
/export/home/fly1003/ap1003/lib/DBI/ProfileSubs.pm
/export/home/fly1003/ap1003/lib/DBI/ProxyServer.pm
/export/home/fly1003/ap1003/lib/DBI/PurePerl.pm
/export/home/fly1003/ap1003/lib/DBI/Roadmap.pm
/export/home/fly1003/ap1003/lib/DBI/SQL
/export/home/fly1003/ap1003/lib/DBI/SQL/Nano.pm
/export/home/fly1003/ap1003/lib/DBI/Util
/export/home/fly1003/ap1003/lib/DBI/Util/CacheMemory.pm
/export/home/fly1003/ap1003/lib/DBI/Util/_accessor.pm
/export/home/fly1003/ap1003/lib/DBI/W32ODBC.pm
/export/home/fly1003/ap1003/lib/Win32/DBIODBC.pm
/export/home/fly1003/ap1003/lib/auto/DBD
/export/home/fly1003/ap1003/lib/auto/DBI
/export/home/fly1003/ap1003/lib/auto/DBI/.packlist
/export/home/fly1003/ap1003/lib/auto/DBI/DBI.bs
/export/home/fly1003/ap1003/lib/auto/DBI/DBI.so
/export/home/fly1003/ap1003/lib/auto/DBI/DBIXS.h
/export/home/fly1003/ap1003/lib/auto/DBI/Driver.xst
/export/home/fly1003/ap1003/lib/auto/DBI/Driver_xst.h
/export/home/fly1003/ap1003/lib/auto/DBI/dbd_xsh.h
/export/home/fly1003/ap1003/lib/auto/DBI/dbi_sql.h
/export/home/fly1003/ap1003/lib/auto/DBI/dbipport.h
/export/home/fly1003/ap1003/lib/auto/DBI/dbivport.h
/export/home/fly1003/ap1003/lib/auto/DBI/dbixs_rev.h
I see you're using perl 5.010000 on sun4-solaris-thread-multi, okay.
Remember to actually *read* the README file!
Use 'make' to build the software (dmake or nmake on Windows).
Then 'make test' to execute self tests.
Then 'make install' to install the DBI and then delete this working
directory before unpacking and building any DBD::* drivers.
Writing Makefile for DBI
>>> make
/export/home/fly1003/bin/perl -MExtUtils::Command -e 'mkpath' -- blib/lib/DBI
rm -f blib/lib/DBI/Changes.pm
cp Changes blib/lib/DBI/Changes.pm
/export/home/fly1003/bin/perl -MExtUtils::Command -e 'mkpath' -- blib/lib/DBI
rm -f blib/lib/DBI/Roadmap.pm
cp Roadmap.pod blib/lib/DBI/Roadmap.pm
cp Driver_xst.h blib/arch/auto/DBI/Driver_xst.h
cp lib/DBD/Proxy.pm blib/lib/DBD/Proxy.pm
cp lib/DBI/Gofer/Response.pm blib/lib/DBI/Gofer/Response.pm
cp lib/DBI/Gofer/Transport/Base.pm blib/lib/DBI/Gofer/Transport/Base.pm
cp lib/DBI/Util/_accessor.pm blib/lib/DBI/Util/_accessor.pm
cp lib/DBD/DBM.pm blib/lib/DBD/DBM.pm
cp DBIXS.h blib/arch/auto/DBI/DBIXS.h
cp Roadmap.pod blib/lib/Roadmap.pod
cp dbixs_rev.pl blib/lib/dbixs_rev.pl
cp lib/DBI/Const/GetInfoType.pm blib/lib/DBI/Const/GetInfoType.pm
cp lib/DBI/Gofer/Serializer/DataDumper.pm blib/lib/DBI/Gofer/Serializer/DataDumper.pm
cp lib/DBI/DBD/Metadata.pm blib/lib/DBI/DBD/Metadata.pm
cp lib/DBD/Gofer/Transport/pipeone.pm blib/lib/DBD/Gofer/Transport/pipeone.pm
cp lib/DBI/Const/GetInfo/ODBC.pm blib/lib/DBI/Const/GetInfo/ODBC.pm
cp lib/DBI/ProfileDumper/Apache.pm blib/lib/DBI/ProfileDumper/Apache.pm
cp Driver.xst blib/arch/auto/DBI/Driver.xst
cp lib/DBD/File.pm blib/lib/DBD/File.pm
cp lib/DBI/Util/CacheMemory.pm blib/lib/DBI/Util/CacheMemory.pm
cp lib/DBD/NullP.pm blib/lib/DBD/NullP.pm
cp lib/DBI/ProfileSubs.pm blib/lib/DBI/ProfileSubs.pm
cp dbi_sql.h blib/arch/auto/DBI/dbi_sql.h
cp lib/DBD/Gofer.pm blib/lib/DBD/Gofer.pm
cp dbivport.h blib/arch/auto/DBI/dbivport.h
cp dbd_xsh.h blib/arch/auto/DBI/dbd_xsh.h
cp dbixs_rev.h blib/arch/auto/DBI/dbixs_rev.h
cp lib/DBD/Gofer/Transport/Base.pm blib/lib/DBD/Gofer/Transport/Base.pm
cp lib/DBI/FAQ.pm blib/lib/DBI/FAQ.pm
cp lib/DBD/Gofer/Policy/rush.pm blib/lib/DBD/Gofer/Policy/rush.pm
cp lib/DBI/SQL/Nano.pm blib/lib/DBI/SQL/Nano.pm
cp lib/DBI/Gofer/Request.pm blib/lib/DBI/Gofer/Request.pm
cp lib/DBI/Const/GetInfo/ANSI.pm blib/lib/DBI/Const/GetInfo/ANSI.pm
cp lib/DBD/Gofer/Transport/stream.pm blib/lib/DBD/Gofer/Transport/stream.pm
cp lib/DBD/Gofer/Policy/classic.pm blib/lib/DBD/Gofer/Policy/classic.pm
cp lib/DBI/Const/GetInfoReturn.pm blib/lib/DBI/Const/GetInfoReturn.pm
cp lib/DBD/Gofer/Policy/Base.pm blib/lib/DBD/Gofer/Policy/Base.pm
cp DBI.pm blib/lib/DBI.pm
cp lib/DBI/Gofer/Serializer/Storable.pm blib/lib/DBI/Gofer/Serializer/Storable.pm
cp lib/DBI/Gofer/Transport/stream.pm blib/lib/DBI/Gofer/Transport/stream.pm
cp lib/DBD/Sponge.pm blib/lib/DBD/Sponge.pm
cp lib/DBD/Gofer/Policy/pedantic.pm blib/lib/DBD/Gofer/Policy/pedantic.pm
cp lib/DBI/W32ODBC.pm blib/lib/DBI/W32ODBC.pm
cp lib/DBI/Gofer/Transport/pipeone.pm blib/lib/DBI/Gofer/Transport/pipeone.pm
cp lib/DBD/Gofer/Transport/null.pm blib/lib/DBD/Gofer/Transport/null.pm
cp lib/Bundle/DBI.pm blib/lib/Bundle/DBI.pm
cp TASKS.pod blib/lib/TASKS.pod
cp lib/DBI/Profile.pm blib/lib/DBI/Profile.pm
cp lib/DBI/ProfileDumper.pm blib/lib/DBI/ProfileDumper.pm
cp lib/DBI/ProxyServer.pm blib/lib/DBI/ProxyServer.pm
cp lib/DBI/Gofer/Serializer/Base.pm blib/lib/DBI/Gofer/Serializer/Base.pm
cp dbipport.h blib/arch/auto/DBI/dbipport.h
cp lib/DBI/Gofer/Execute.pm blib/lib/DBI/Gofer/Execute.pm
cp lib/DBI/DBD.pm blib/lib/DBI/DBD.pm
cp lib/Win32/DBIODBC.pm blib/lib/Win32/DBIODBC.pm
cp lib/DBI/PurePerl.pm blib/lib/DBI/PurePerl.pm
cp lib/DBD/ExampleP.pm blib/lib/DBD/ExampleP.pm
cp lib/DBI/ProfileData.pm blib/lib/DBI/ProfileData.pm
/export/home/fly1003/bin/perl -p -e "s/~DRIVER~/Perl/g" ./Driver.xst > Perl.xsi
/export/home/fly1003/bin/perl /export/home/fly1003/var/megalib/ExtUtils/xsubpp -typemap /export/home/fly1003/ap1003/lib/ExtUtils/typemap -typemap typemap Perl.xs > Perl.xsc && mv Perl.xsc Perl.c
cc -c -D_REENTRANT -DUSE_SITECUSTOMIZE -DPRIVLIB_LAST_IN_INC -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O -DVERSION=\"1.611\" -DXS_VERSION=\"1.611\" -KPIC "-I/export/home/fly1003/ap1003/lib/CORE" Perl.c
/export/home/fly1003/bin/perl /export/home/fly1003/var/megalib/ExtUtils/xsubpp -typemap /export/home/fly1003/ap1003/lib/ExtUtils/typemap -typemap typemap DBI.xs > DBI.xsc && mv DBI.xsc DBI.c
cc -c -D_REENTRANT -DUSE_SITECUSTOMIZE -DPRIVLIB_LAST_IN_INC -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O -DVERSION=\"1.611\" -DXS_VERSION=\"1.611\" -KPIC "-I/export/home/fly1003/ap1003/lib/CORE" DBI.c
Running Mkbootstrap for DBI ()
chmod 644 DBI.bs
rm -f blib/arch/auto/DBI/DBI.so
cc -G -L/usr/lib -L/usr/ccs/lib -L/opt/SUNWspro/prod/lib DBI.o -o blib/arch/auto/DBI/DBI.so \
\
chmod 755 blib/arch/auto/DBI/DBI.so
cp DBI.bs blib/arch/auto/DBI/DBI.bs
chmod 644 blib/arch/auto/DBI/DBI.bs
/export/home/fly1003/bin/perl "-Iblib/arch" "-Iblib/lib" dbiprof.PL dbiprof
Extracted dbiprof from dbiprof.PL with variable substitutions.
cp dbiprof blib/script/dbiprof
/export/home/fly1003/bin/perl -MExtUtils::MY -e 'MY->fixin(shift)' -- blib/script/dbiprof
/export/home/fly1003/bin/perl "-Iblib/arch" "-Iblib/lib" dbiproxy.PL dbiproxy
Extracted dbiproxy from dbiproxy.PL with variable substitutions.
cp dbiproxy blib/script/dbiproxy
/export/home/fly1003/bin/perl -MExtUtils::MY -e 'MY->fixin(shift)' -- blib/script/dbiproxy
/export/home/fly1003/bin/perl "-Iblib/arch" "-Iblib/lib" dbilogstrip.PL dbilogstrip
Extracted dbilogstrip from dbilogstrip.PL with variable substitutions.
cp dbilogstrip blib/script/dbilogstrip
/export/home/fly1003/bin/perl -MExtUtils::MY -e 'MY->fixin(shift)' -- blib/script/dbilogstrip
Manifying blib/man1/dbiprof.1
Manifying blib/man1/dbiproxy.1
Manifying blib/man1/dbilogstrip.1
Manifying blib/man3/DBI::Gofer::Response.3
Manifying blib/man3/DBD::Proxy.3
Manifying blib/man3/DBI::Gofer::Transport::Base.3
Manifying blib/man3/DBD::DBM.3
Manifying blib/man3/DBI::Gofer::Serializer::DataDumper.3
Manifying blib/man3/DBI::Const::GetInfoType.3
Manifying blib/man3/Roadmap.3
Manifying blib/man3/DBI::DBD::Metadata.3
Manifying blib/man3/DBI::Const::GetInfo::ODBC.3
Manifying blib/man3/DBD::Gofer::Transport::pipeone.3
Manifying blib/man3/DBI::ProfileDumper::Apache.3
Manifying blib/man3/DBD::File.3
Manifying blib/man3/DBI::Util::CacheMemory.3
Manifying blib/man3/DBI::ProfileSubs.3
Manifying blib/man3/DBD::Gofer.3
Manifying blib/man3/DBD::Gofer::Transport::Base.3
Manifying blib/man3/DBI::FAQ.3
Manifying blib/man3/DBD::Gofer::Policy::rush.3
Manifying blib/man3/DBI::SQL::Nano.3
Manifying blib/man3/DBI::Gofer::Request.3
Manifying blib/man3/DBI::Const::GetInfo::ANSI.3
Manifying blib/man3/DBD::Gofer::Transport::stream.3
Manifying blib/man3/DBD::Gofer::Policy::classic.3
Manifying blib/man3/DBI::Gofer::Transport::stream.3
Manifying blib/man3/DBI::Gofer::Serializer::Storable.3
Manifying blib/man3/DBI.3
Manifying blib/man3/DBD::Gofer::Policy::Base.3
Manifying blib/man3/DBI::Const::GetInfoReturn.3
Manifying blib/man3/DBD::Sponge.3
Manifying blib/man3/DBD::Gofer::Policy::pedantic.3
Manifying blib/man3/DBI::Gofer::Transport::pipeone.3
Manifying blib/man3/DBI::W32ODBC.3
Manifying blib/man3/DBD::Gofer::Transport::null.3
Manifying blib/man3/Bundle::DBI.3
Manifying blib/man3/TASKS.3
Manifying blib/man3/DBI::Profile.3
Manifying blib/man3/DBI::ProfileDumper.3
Manifying blib/man3/DBI::Gofer::Serializer::Base.3
Manifying blib/man3/DBI::ProxyServer.3
Manifying blib/man3/DBI::Gofer::Execute.3
Manifying blib/man3/DBI::DBD.3
Manifying blib/man3/Win32::DBIODBC.3
Manifying blib/man3/DBI::PurePerl.3
Manifying blib/man3/DBI::ProfileData.3
TIMB/DBI-1.611.tar.gz
make -- OK
Running make test
>>> make test TEST_VERBOSE=1
PERL_DL_NONLAZY=1 /export/home/fly1003/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t
t/01basics.t ...............
1..130
ok 1 - use DBI;
ok 2 - ... testing sql_type
ok 3 - ... testing sql_type
ok 4 - ... testing sql_type
ok 5 - ... testing sql_type
ok 6 - ... testing sql_type
ok 7 - ... testing sql_type
ok 8 - ... testing sql_type
ok 9 - ... testing sql_type
ok 10 - ... testing sql_type
ok 11 - ... testing sql_type
ok 12 - ... testing sql_type
ok 13 - ... testing sql_type
ok 14 - ... testing sql_type
ok 15 - ... testing sql_type
ok 16 - ... testing sql_type
ok 17 - ... testing sql_type
ok 18 - ... testing sql_type
ok 19 - ... testing sql_type
ok 20 - ... testing sql_type
ok 21 - ... testing sql_type
ok 22 - ... testing sql_type
ok 23 - ... testing sql_type
ok 24 - ... testing sql_type
ok 25 - ... testing sql_type
ok 26 - ... testing sql_type
ok 27 - ... testing sql_type
ok 28 - ... testing sql_type
ok 29 - ... testing sql_type
ok 30 - ... testing sql_type
ok 31 - ... testing sql_type
ok 32 - ... testing sql_type
ok 33 - ... testing sql_type
ok 34 - ... testing sql_type
ok 35 - ... testing sql_type
ok 36 - ... testing sql_type
ok 37 - ... testing sql_type
ok 38 - ... testing sql_type
ok 39 - ... testing sql_type
ok 40 - ... testing sql_type
ok 41 - ... testing sql_type
ok 42 - ... testing sql_type
ok 43 - ... testing sql_type
ok 44 - ... testing sql_type
ok 45 - ... testing sql_type
ok 46 - ... testing sql_type
ok 47 - ... testing sql_type
ok 48 - ... testing sql_type
ok 49 - ... testing sql_type
ok 50 - ... testing sql_type
ok 51 - ... testing sql_type
ok 52 - ... testing sql_type
ok 53 - ... testing sql_type
ok 54 - ... testing sql_type
ok 55 - ... testing sql_type
ok 56 - ... testing sql_type
ok 57 - ... testing sql_type
ok 58 - ... testing sql_type
ok 59 - ... testing sql_type
ok 60 - ... testing sql_cursor_types
ok 61 - ... testing sql_cursor_types
ok 62 - ... testing sql_cursor_types
ok 63 - ... testing sql_cursor_types
ok 64 - ... testing sql_cursor_types
ok 65 - ... looks_like_number : undef -> undef
ok 66 - ... looks_like_number : "" -> undef (eg "don't know")
ok 67 - ... looks_like_number : "foo" -> defined false
ok 68 - ... looks_like_number : "foo" -> defined false
ok 69 - ... looks_like_number : 1 -> true
ok 70 - ... looks_like_number : "." -> false
ok 71 - ... looks_like_number : 1 -> true
ok 72 - ... looks_like_number : 1 -> true
ok 73 - ... 1000 initial state is 400
ok 74 - ... neat : 1 + 1 -> "2"
ok 75 - ... neat : 2 -> "'2'"
ok 76 - ... neat : undef -> "undef"
ok 77 - ... test array argument w/seperator and maxlen
ok 78 - ... test array argument w/out seperator or maxlen
ok 79 - The object isa DBI::dr
ok 80 - ... test debug
ok 81 - ... test DebugDispatch
ok 82 - ... test Warn
ok 83 - ... this should say Tim Bunce
ok 84 - ... the version should match DBI version
ok 85 - ... this should work and return 1
ok 86 - ... this should equal 1
ok 87 - ... CachedKids should be undef initially
ok 88 - ... CachedKids should be our ref
ok 89 - ... this should be zero
ok 90 - ... this should be zero
ok 91 - ... Active flag is true
ok 92 - ... we should get a warning here
ok 93 - ... we should get a warning here
ok 94 - ... we should get no warnings here
ok 95 - ... we at least have one driver installed
ok 96 - ... we should at least have ExampleP installed
ok 97 - ... we should at least have one driver
ok 98 - ... should be -1077531989
ok 99 - ... should be -1077531989
ok 100 - ... should be -1077531990
ok 101
ok 102
ok 103
ok 104
ok 105
ok 106
ok 107
ok 108
ok 109
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116
ok 117
ok 118
ok 119
ok 120
ok 121
ok 122
ok 123
ok 124 # skip developer tests
ok 125 # skip developer tests
ok 126 # skip developer tests
ok 127 # skip developer tests
ok 128 - ... DBI::dbi_debug's initial state is 0
ok 129 - ... DBI::dbi_debug is 15
ok 130 - ... DBI::dbi_debug is 0
ok
t/02dbidrv.t ...............
1..53
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - ... DBD::Test->driver called to getnew Driver handle
ok 5 - ... new Driver handle (DBI::dr=HASH(0x39b830)) created successfully
ok 6 - The object isa DBI::dr
ok 7 - ... got a Test Driver object back from DBI->install_driver
ok 8 - The object isa DBI::dr
ok 9 - ... checking the DBI::_get_imp_data function
ok 10 - ... Driver object passed to data_sources
ok 11 - The object isa DBI::dr
ok 12 - ... Driver object is not tied
ok 13 - ... got correct datasources from DBI->data_sources("Test")
ok 14 - ... this Driver does not yet have any Kids
ok 15 - ... got a database handle from calling $drh->connect
ok 16 - The object isa DBI::db
ok 17 - ... this Driver does not yet have any Kids
ok 18 - ... Driver object passed to data_sources
ok 19 - The object isa DBI::dr
ok 20 - ... Driver object is not tied
ok 21 - ... checking fetched datasources from Driver
ok 22 - ... got correct datasources from $dbh->data_sources()
ok 23 - ... Database object passed to do
ok 24 - The object isa DBI::db
ok 25 - ... Database object is not tied
ok 26 - ... got Driver object from Database object with Driver attribute
ok 27 - The object isa DBI::dr
ok 28 - ... Driver object is not tied
ok 29 - ... got Driver object from Database object by FETCH-ing Driver attribute
ok 30 - The object isa DBI::dr
ok 31 - ... Driver object is not tied
ok 32 - ... this will trigger more driver internal tests above in DBD::Test::db
ok 33 - ... checking Driver handle err set with set_err method
ok 34 - ... checking Database handle err set with set_err method
ok 35 - ... checking Database handle err set with Driver handle set_err method
ok 36 - ... this Driver does not yet have any Kids
ok 37 - ... $dbh->DESTROY should set $drh->err to 42
ok 38 - ... checking $DBI::err set with Driver handle set_err method
ok 39 - ... checking $DBI::errstr
ok 40 - ... checking $DBI::state
ok 41 - ... checking $DBI::state
ok 42 - ... checking $DBI::state
ok 43 - ... trying to assign to $DBI::rows should throw an excpetion
ok 44 - ... FetchHashKeyName is NAME
ok 45 - ... FetchHashKeyName is now changed to NAME_lc
ok 46 - ... calling $drh->disconnect_all (not implemented but will fail silently)
ok 47 - has dbixs_revision
ok 48 - has integer dbixs_revision
ok 49 - ... $drh can FETCH
ok 50 - ... and it returned a proper CODE ref
ok 51 - ... used FETCH returned from can to fetch the Name attribute
ok 52 - ... the Name attribute is equal to Test
ok 53 - ...
ok
t/03handle.t ...............
1..137
ok 1 - use DBI;
ok 2
ok 3 - The object isa DBI::dr
ok 4 - ... this Driver does not yet have any Kids
ok 5
ok 6
ok 7
ok 8 - The object isa DBI::db
ok 9 - ... our Driver has one Kid
ok 10 - ... our Driver has one ActiveKid
ok 11 - The object isa DBI::st
ok 12 - ... execute ran successfully
ok 13 - ... we got the CachedKids hash
ok 14 - ... there is one CachedKid
ok 15 - ... our statment handle should be in the CachedKids
ok 16 - ... our first statment is Active
ok 17 - The object isa DBI::st
ok 18 - ... prepare_cached returned the same statement handle
ok 19 - ... we got warned about our first statement handle being still active
ok 20 - ... our first statment is no longer Active since we re-prepared it
ok 21 - The object isa DBI::st
ok 22 - ... prepare_cached returned a different statement handle now
ok 23 - ... there are two CachedKids
ok 24 - ... both statment handles should be in the CachedKids
ok 25 - ... executing first statement handle again
ok 26 - ... first statement handle is now active again
ok 27 - The object isa DBI::st
ok 28 - ... our fourth statement handle is not the same as our first
ok 29 - ... first statement handle is still active
ok 30 - ... there are two CachedKids
ok 31 - ... second and fourth statment handles should be in the CachedKids
ok 32 - ... first statement handle is no longer active
ok 33 - ... fourth statement handle executed properly
ok 34 - ... fourth statement handle is Active
ok 35 - The object isa DBI::st
ok 36 - ... we still only got one warning
ok 37 - ... fourth statement handle and fifth one match
ok 38 - ... fourth statement handle is not Active
ok 39 - ... fifth statement handle is not Active (shouldnt be its the same as fifth)
ok 40 - ... there are two CachedKids
ok 41 - ... second and fourth/fifth statment handles should be in the CachedKids
ok 42 - ... sixth statement handle is active
ok 43 - ... first statement handle is not active
ok 44 - ... first statement handle becomes the sixth
ok 45 - ... sixth statement handle is now not active
ok 46 - ... first statement handle is now active again
ok 47 - ... first statement handle becomes the sixth
ok 48 - ... sixth statement handle is active
ok 49 - ... first statement handle is not active
ok 50 - ... first statement handle becomes the sixth
ok 51 - ... sixth statement handle is now not active
ok 52 - ... first statement handle is now active again
ok 53 - ... can not swap a sth with a dbh
ok 54
ok 55 - ... first statement handle becomes the sixth
ok 56 - ... sixth statement handle is active
ok 57 - ... first statement handle is not active
ok 58
ok 59
ok 60 - ... can't swap_inner_handle with handle from different parent
ok 61
ok 62
ok 63 - ... can swap to different parent if forced
ok 64
ok 65 - ping should be true before disconnect
ok 66 - ping should be false after disconnect
ok 67 - ... our Driver has one Kid after disconnect
ok 68 - ... our Driver has no ActiveKids after disconnect
ok 69 - ... our ExampleP driver should have 0 Kids after dbh was destoryed
ok 70 - The object isa DBI::db
ok 71 - ... the Driver should have 1 Kid(s) now
ok 72 - not testing Driver here
ok 73 - The object isa DBI::st
ok 74 - not testing Database here
ok 75 - ... the Driver should have no Kids
ok 76 - The object isa DBI::db
ok 77 - ... the Driver should have 1 Kid(s) now
ok 78 - The object isa DBI::dr
ok 79 - The object isa DBI::st
ok 80 - not testing Database here
ok 81 - ... the Driver should have no Kids
ok 82 - The object isa DBI::db
ok 83 - ... the Driver should have 1 Kid(s) now
ok 84 - not testing Driver here
ok 85 - The object isa DBI::st
ok 86 - The object isa DBI::db
ok 87 - ... the Driver should have no Kids
ok 88 - The object isa DBI::db
ok 89 - ... the Driver should have 1 Kid(s) now
ok 90 - The object isa DBI::dr
ok 91 - The object isa DBI::st
ok 92 - The object isa DBI::db
ok 93 - ... the Driver should have no Kids
ok 94 - ... the Driver should have no Kids at the end of this test
ok 95 - The object isa DBI::db
ok 96 - ... our Driver should have 1 Kid(s) here
ok 97
ok 98
ok 99 - we need weakrefs for take_imp_data to work safely with child handles
ok 100 - should have 3 entries (implementation detail)
ok 101 - should have 2 defined handles
ok 102 - ... we got some imp_data to test
ok 103 - ... test that our imp_data is greater than or equal to 80, this is reasonable
ok 104 - ... our Driver should have 0 Kid(s) after calling take_imp_data
ok 105 - sth should be reblessed
ok 106
warn: Can't call FETCH method on handle DBI::db=HASH(0x3d7df0) after take_imp_data() at t/03handle.t line 316.
ok 107 - ... our Driver should be undefined
warn: Can't call FETCH method on handle DBI::db=HASH(0x3d7df0) after take_imp_data() at t/03handle.t line 319.
ok 108 - ... our TraceLevel should be undefined
warn: Can't call disconnect method on handle DBI::db=HASH(0x3d7df0) after take_imp_data() at t/03handle.t line 322.
ok 109 - ... disconnect should return undef
warn: Can't call quote method on handle DBI::db=HASH(0x3d7df0) after take_imp_data() at t/03handle.t line 324.
ok 110 - ... quote should return undefined
ok 111 - ... we should have gotten 4 warnings
ok 112 - The object isa DBI::db
ok 113 - ... our Driver should have 1 Kid(s) again
ok 114 - ... our Driver has no Kids after this test
ok 115 - The object isa DBI::dr
ok 116 - ... our Driver (2) has no Kids before this test
ok 117 - The object isa DBI::db
ok 118 - The object isa DBI::st
ok 119 - ... NUM_OF_PARAMS is 0
ok 120 - ... NUM_OF_FIELDS should be undef
ok 121 - ... Statement is "foo bar"
ok 122 - ... NAME is undefined
ok 123 - ... TYPE is undefined
ok 124 - ... SCALE is undefined
ok 125 - ... PRECISION is undefined
ok 126 - ... NULLABLE is undefined
ok 127 - ... RowsInCache is undefined
ok 128 - ... ParamValues is undefined
ok 129 - ... NAME_uc is undefined
ok 130 - ... NAME_lc is undefined
ok 131 - ... NAME_hash is undefined
ok 132 - ... NAME_uc_hash is undefined
ok 133 - ... NAME_lc_hash is undefined
ok 134 - ... $dbh can call "prepare"
ok 135 - ... $dbh cannot call "nonesuch"
ok 136 - ... $sth can call "execute"
ok 137 - ... our Driver (2) has no Kids after this test
ok
t/04mods.t .................
1..12
ok 1 - use DBI;
ok 2 - use DBI::Const::GetInfo::ANSI;
ok 3 - use DBI::Const::GetInfo::ODBC;
ok 4 - use DBI::Const::GetInfoType;
ok 5 - use DBI::Const::GetInfoReturn;
ok 6 - ... we have at least one key in the GetInfoType hash
ok 7 - ... the GetInfoType hash is constructed from the ANSI and ODBC hashes
ok 8 - ... we have at least one key in the GetInfoReturnType hash
ok 9 - ... the GetInfoReturnType hash is constructed from the ANSI and ODBC hashes
ok 10 - ... we have at least one key in the GetInfoReturnValues hash
ok 11 - DBI::Const::GetInfoReturn->can('Format')
ok 12 - DBI::Const::GetInfoReturn->can('Explain')
ok
t/05concathash.t ...........
1..41
ok 1 - use DBI;
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9 - should work with nul bytes in kv_sep and pair_sep
ok 10 - should work with nul bytes in hash value (neat)
ok 11 - should work with nul bytes in hash value (not neat)
ok 12
ok 13
ok 14
ok 15 - test
ok 16 - test
ok 17 - Unknown sort order
ok 18 - Float Hash - Not Neat lexical
ok 19 - Numeric - Not Neat lexical
ok 20 - Mixed Hash - Not Neat lexical
ok 21 - Simple Hash - Not Neat lexical
ok 22 - Float Hash - Neat lexical
ok 23 - Numeric - Neat lexical
ok 24 - Mixed Hash - Neat lexical
ok 25 - Simple Hash - Neat lexical
ok 26 - Float Hash - Not Neat guess
ok 27 - Numeric - Not Neat guess
ok 28 - Mixed Hash - Not Neat guess
ok 29 - Simple Hash - Not Neat guess
ok 30 - Float Hash - Neat guess
ok 31 - Numeric - Neat guess
ok 32 - Mixed Hash - Neat guess
ok 33 - Simple Hash - Neat guess
ok 34 - Float Hash - Not Neat numeric
ok 35 - Numeric - Not Neat numeric
ok 36 - Mixed Hash - Not Neat numeric
ok 37 - Simple Hash - Not Neat numeric
ok 38 - Float Hash - Neat numeric
ok 39 - Numeric - Neat numeric
ok 40 - Mixed Hash - Neat numeric
ok 41 - Simple Hash - Neat numeric
ok
t/06attrs.t ................
1..145
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking Warn attribute for dbh
ok 4 - ... checking Active attribute for dbh
ok 5 - ... checking AutoCommit attribute for dbh
ok 6 - ... checking CompatMode attribute for dbh
ok 7 - ... checking InactiveDestory attribute for dbh
ok 8 - ... checking PrintError attribute for dbh
ok 9 - ... checking PrintWarn attribute for dbh
ok 10 - ... checking RaiseError attribute for dbh
ok 11 - ... checking ShowErrorStatement attribute for dbh
ok 12 - ... checking ChopBlanks attribute for dbh
ok 13 - ... checking LongTrunkOk attribute for dbh
ok 14 - ... checking TaintIn attribute for dbh
ok 15 - ... checking TaintOut attribute for dbh
ok 16 - ... checking Taint attribute for dbh
ok 17 - ... checking Executed attribute for dbh
ok 18 - ... checking ErrCount attribute for dbh
ok 19 - ... checking Kids attribute for dbh
ok 20 - ... checking ActiveKids attribute for dbh
ok 21 - ... checking CachedKids attribute for dbh
ok 22 - ... checking HandleError attribute for dbh
ok 23 - ... checking Profile attribute for dbh
ok 24 - ... checking Statement attribute for dbh
ok 25 - ... checking RowCacheSize attribute for dbh
ok 26 - ... checking ReadOnly attribute for dbh
ok 27 - ... checking FetchHashKeyName attribute for dbh
ok 28 - ... checking Name attribute for dbh
ok 29 - ... checking TraceLevel attribute for dbh
ok 30 - ... checking LongReadLen attribute for dbh
ok 31 - should be able to FETCH_many
ok 32 - should see driver-private dbh attribute value
ok 33 - ... catching exception
ok 34 - ... $dbh->err is undefined
ok 35 - ... checking $dbh->errstr
ok 36 - ... checking $dbh->state
ok 37 - ... checking Executed attribute for dbh
ok 38 - ... checking Executed attribute for dbh (after reset)
ok 39 - ... checking ErrCount attribute for dbh (after error was generated)
ok 40 - The object isa DBI::dr
ok 41 - ... checking $dbh->err
ok 42 - ... checking ErrCount attribute for drh
ok 43 - ... checking Warn attribute for drh
ok 44 - ... checking Active attribute for drh
ok 45 - ... checking AutoCommit attribute for drh
ok 46 - ... checking CompatMode attribute for drh
ok 47 - ... checking InactiveDestory attribute for drh
ok 48 - ... checking PrintError attribute for drh
ok 49 - ... checking PrintWarn attribute for drh
ok 50 - ... checking RaiseError attribute for drh
ok 51 - ... checking ShowErrorStatement attribute for drh
ok 52 - ... checking ChopBlanks attribute for drh
ok 53 - ... checking LongTrunkOk attribute for drh
ok 54 - ... checking TaintIn attribute for drh
ok 55 - ... checking TaintOut attribute for drh
ok 56 - ... checking Taint attribute for drh
ok 57 - ... checking Executed attribute for drh
ok 58 - ... checking Kids attribute for drh
ok 59 - ... checking ActiveKids attribute for drh
ok 60 - ... checking CachedKids attribute for drh
ok 61 - ... checking HandleError attribute for drh
ok 62 - ... checking Profile attribute for drh
ok 63 - ... checking ReadOnly attribute for drh
ok 64 - ... checking TraceLevel attribute for drh
ok 65 - ... checking LongReadLen attribute for drh
ok 66 - ... checking FetchHashKeyName attribute for drh
ok 67 - ... checking Name attribute for drh
ok 68 - The object isa DBI::st
ok 69 - ... checking Executed attribute for sth
ok 70 - ... checking Executed attribute for dbh
ok 71 - ... checking ErrCount attribute for sth
ok 72 - ... checking exception
ok 73 - ... checking $sth->errstr
ok 74 - ... checking $sth->state
ok 75 - ... checking Executed attribute for sth
ok 76 - ... checking Exceuted attribute for dbh
ok 77 - ... checking ErrCount attribute for sth
ok 78 - ... checking exception
ok 79 - ... checking ErrCount attribute for sth (after assignment)
ok 80 - ... checking ErrCount attribute for sth (after reset)
ok 81 - ... checking Warn attribute for sth
ok 82 - ... checking Active attribute for sth
ok 83 - ... checking CompatMode attribute for sth
ok 84 - ... checking InactiveDestroy attribute for sth
ok 85 - ... checking PrintError attribute for sth
ok 86 - ... checking PrintWarn attribute for sth
ok 87 - ... checking RaiseError attribute for sth
ok 88 - ... checking ShowErrorStatement attribute for sth
ok 89 - ... checking ChopBlanks attribute for sth
ok 90 - ... checking LongTrunkOk attribute for sth
ok 91 - ... checking TaintIn attribute for sth
ok 92 - ... checking TaintOut attribute for sth
ok 93 - ... checking Taint attribute for sth
ok 94 - ... checking Kids attribute for sth
ok 95 - ... checking ActiveKids attribute for sth
ok 96 - ... checking CachedKids attribute for sth
ok 97 - ... checking HandleError attribute for sth
ok 98 - ... checking Profile attribute for sth
ok 99 - ... checking ReadOnly attribute for sth
ok 100 - ... checking TraceLevel attribute for sth
ok 101 - ... checking LongReadLen attribute for sth
ok 102 - ... checking FetchHashKeyName attribute for sth
ok 103 - ... checking CursorName attribute for sth
ok 104 - ... checking NUM_OF_FIELDS attribute for sth
ok 105 - ... checking NUM_OF_PARAMS attribute for sth
ok 106 - ... checking type of NAME attribute for sth
ok 107 - ... checking number of elements returned
ok 108 - ... checking values returned
ok 109 - ... checking type of NAME_lc attribute for sth
ok 110 - ... checking number of elements returned
ok 111 - ... checking values returned
ok 112 - ... checking type of NAME_uc attribute for sth
ok 113 - ... checking number of elements returned
ok 114 - ... checking values returned
ok 115 - ... checking type of NAME_hash attribute for sth
ok 116 - ... checking number of keys returned
ok 117 - ... checking values returned
ok 118 - ... checking values returned
ok 119 - ... checking type of NAME_lc_hash attribute for sth
ok 120 - ... checking number of keys returned
ok 121 - ... checking values returned
ok 122 - ... checking values returned
ok 123 - ... checking type of NAME_uc_hash attribute for sth
ok 124 - ... checking number of keys returned
ok 125 - ... checking values returned
ok 126 - ... checking values returned
ok 127 - ... checking type of TYPE attribute for sth
ok 128 - ... checking number of elements returned
ok 129 - ... checking values returned
ok 130 - ... checking type of NULLABLE attribute for sth
ok 131 - ... checking number of elements returned
ok 132 - ... checking values returned
ok 133 - ... checking type of PRECISION attribute for sth
ok 134 - ... checking number of elements returned
ok 135 - ... checking values returned
ok 136 - ... checking type of SCALE attribute for sth
ok 137 - ... checking number of elements returned
ok 138 - ... checking values returned
ok 139 - ... checking type of ParamValues attribute for sth
ok 140 - ... checking values returned
ok 141 - ... checking Statement attribute for sth
ok 142 - ... checking type of RowsInCache attribute for sth
ok 143 - should see driver-private sth attribute value
Checking inheritance
ok 144 - dbh ReadOnly value should be inherited from drh
ok 145 - sth ReadOnly value should be inherited from dbh
ok
t/07kids.t .................
1..20
ok 1 - The object isa DBI::db
ok 2 - ... database handle has 0 Kid(s) at start
ok 3 - ... database handle has 0 ActiveKid(s) at start
ok 4 - The object isa DBI::st
ok 5 - ... database handle has 1 Kid(s) after $dbh->prepare
ok 6 - ... database handle has 0 ActiveKid(s) after $dbh->prepare
ok 7 - ... database handle has 1 Kid(s) after $sth->execute
ok 8 - ... database handle has 1 ActiveKid(s) after $sth->execute
ok 9 - ... database handle has 1 Kid(s) after $sth->finish
ok 10 - ... database handle has 0 ActiveKid(s) after $sth->finish
ok 11 - ... database handle has 0 Kid(s) after $sth is destroyed
ok 12 - ... database handle has 0 ActiveKid(s) after $sth is destroyed
ok 13 - The object isa DBI::dr
ok 14 - ... driver handle has 1 Kid(s)
ok 15 - ... driver handle has 1 ActiveKid(s)
ok 16 - ... driver handle has 1 Kid(s) after $dbh->disconnect
ok 17 - ... driver handle has 0 ActiveKid(s) after $dbh->disconnect
ok 18 - ... lets be sure that $dbh is not undefined
ok 19 - ... driver handle has 0 Kid(s) after undef $dbh
ok 20 - ... driver handle has 0 ActiveKid(s) after undef $dbh
ok
t/08keeperr.t ..............
1..69
ok 1 - use DBI;
ok 2 - ... checking error
ok 3 - ... checking error
Test HandleSetErr
ok 4 - The object isa DBI::db
ok 5 - ... $DBI::err is not defined
HandleSetErr called: h=DBI::db=HASH(0x2e4000), err=, errstr=(got info), state=
ok 6 - ... $DBI::err is defined
ok 7 - ... $DBI::err is an empty string
ok 8 - ... $DBI::errstr is as we expected
ok 9 - ... $dbh->errstr matches $DBI::errstr
ok 10 - ... $warn{failed} is 0
ok 11 - ... $warn{warning} is 0
ok 12 - ... the @handlewarn array is (1, 0, 0)
HandleSetErr called: h=DBI::db=HASH(0x2e4000), err=0, errstr=(got warn), state=AA001
warn: 'DBD::ExampleP::db set_err warning: (got info)\n(got warn) at t/08keeperr.t line 131.\n'
ok 13 - ... $DBI::err is defined
ok 14 - ... $DBI::err is "0"
ok 15 - ... $DBI::errstr is as we expected
ok 16 - ... $dbh->errstr matches $DBI::errstr
ok 17 - ... $DBI::state is AA001
ok 18 - ... $warn{warning} is 1
ok 19 - ... the @handlewarn array is (1, 1, 0)
HandleSetErr called: h=DBI::db=HASH(0x2e4000), err=, errstr=(got more info), state=
warn: 'DBD::ExampleP::db set_err warning: (got info)\n(got warn)\n(got more info) at t/08keeperr.t line 146.\n'
ok 20 - ... $DBI::err is defined
ok 21 - ... $DBI::err is "0"
ok 22 - ... $dbh->err is "0"
ok 23 - ... $DBI::state is AA001
ok 24 - ... $DBI::errstr is as we expected
ok 25 - ... $dbh->errstr matches $DBI::errstr
ok 26 - ... $warn{warning} is 2
ok 27 - ... the @handlewarn array is (2, 1, 0)
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error) at t/08keeperr.t line 167.\n'
ok 28 - ... $DBI::err is defined
ok 29 - ... $DBI::err is 42
ok 30 - ... $warn{warning} is 2
ok 31 - ... $dbh->errstr is as we expected
ok 32 - ... $DBI::state is AA002
ok 33 - ... the @handlewarn array is (2, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x2e4000), err=, errstr=(got info), state=
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info) at t/08keeperr.t line 179.\n'
ok 34 - ... $DBI::err is defined
ok 35 - ... $DBI::err is 42
ok 36 - ... $warn{warning} is 2
ok 37 - ... $dbh->errstr is as we expected
ok 38 - ... the @handlewarn array is (3, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x2e4000), err=0, errstr=(got warn), state=
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) at t/08keeperr.t line 190.\n'
ok 39 - ... $DBI::err is defined
ok 40 - ... $DBI::err is 42
ok 41 - ... $warn{warning} is 2
ok 42 - ... $dbh->errstr is as we expected
ok 43 - ... the @handlewarn array is (3, 2, 1)
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) [err was 42 now 4200] [state was AA002 now AA003]\n(got new error) at t/08keeperr.t line 201.\n'
ok 44 - ... $DBI::err is defined
ok 45 - ... $DBI::err is 4200
ok 46 - ... $warn{warning} is 2
ok 47 - ... $dbh->errstr is as we expected
ok 48 - ... the @handlewarn array is (3, 2, 2)
ok 49 - ... $dbh->errstr is defined
ok 50 - ... $dbh->err is defined
ok 51 - ... $dbh->state is an empty string
warn: 'DBD::ExampleP::db set_err failed: foo at t/08keeperr.t line 226.\n'
ok 52 - ... only returned one value
ok 53 - ... the first value is undefined
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar at t/08keeperr.t line 230.\n'
ok 54 - ... $dbh->set_err returned undefiend
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz at t/08keeperr.t line 231.\n'
ok 55 - ... $dbh->set_err returned undefiend
HandleSetErr called: h=DBI::db=HASH(0x2e4000), err=0, errstr=warn, state=
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz\nwarn at t/08keeperr.t line 232.\n'
ok 56 - ... $dbh->set_err returned undefiend
ok 57 - ... $dbh->errstr is as we expected
ok 58 - ... $warn{failed} is 4
ok 59 - ... the @handlewarn array is (0, 1, 3)
warn: 'DBD::ExampleP::db method failed: foo at t/08keeperr.t line 242.\n'
ok 60 - ... only returned one value
ok 61 - ... the first value is undefined
warn: 'DBD::ExampleP::db method failed: foo at t/08keeperr.t line 246.\n'
ok 62 - ... only returned one value
ok 63 - ... the first value is "42"
warn: 'DBD::ExampleP::db method failed: foo at t/08keeperr.t line 250.\n'
ok 64 - ... returned no values
HandleSetErr called: h=DBI::db=HASH(0x2e4000), err=, errstr=info, state=override
warn: 'DBD::ExampleP::db set_err failed: errstr99 at t/08keeperr.t line 257.\n'
ok 65 - ... only returned one value
ok 66 - ... the first value is undefined
ok 67 - ... $dbh->err is 99
ok 68 - ... $dbh->errstr is as we expected
ok 69 - ... $dbh->state is as we expected
ok
t/09trace.t ................
1..67
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - trace file size = 3023
ok 4 - ... checking TraceLevel attribute
ok 5 - ... trace file successfully created
parse_trace_flag SQL
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
parse_trace_flag foo
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
parse_trace_flag bar
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
parse_trace_flag baz
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
parse_trace_flag boo
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
parse_trace_flag bop
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53
parse_trace_flag SQL foo bar baz boo bop
ok 54 - ...
ok 55 - ...
inherit
ok 56 - The object isa DBI::st
ok 57
ok 58
ok 59
test unknown parse_trace_flag
ok 60
ok 61
caught warn: DBI::db=HASH(0x3e8048)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at t/09trace.t line 118
ok 62
ok 63
caught warn: DBI::db=HASH(0x3e8048)->parse_trace_flags(nonesuch|SQL|nonesuch2) ignored unknown trace flags: 'nonesuch' 'nonesuch2' at t/09trace.t line 120
ok 64
ok 65
ok 66
ok 67
ok
t/10examp.t ................
1..210
ok 1 - connect should fail
ok 2 - ... we should have an exception here
ok 3 - ... $dbh2 should not be defined
ok 4
ok 5
ok 6 - ... these 2 handles are cached, so they are the same
ok 7
ok 8 - ... this handle was created with different parameters, so it is not the same
ok 9
ok 10 - Executed should be true
ok 11
ok 12 - should return same handle
ok 13 - Executed should be false because reset by connect attributes
ok 14 - The object isa DBI::dr
ok 15 - ... these are our cached kids
ok 16 - ... we have emptied out cache
ok 17
ok 18 - ... PrintError should be 0
ok 19 - ... FetchHashKey is NAME
ok 20 - ... checking the example driver_path
others
ok 21 - DBI commit: invalid number of arguments: got handle + 1, expected handle + between 0 and 0
# Usage: $h->commit() at t/10examp.t line 87.
#
ok 22 - ping should return true
ok 23 - prepare should fail
ok 24 - sth->err should be true
ok 25 - DBI::err should be true
ok 26 - $DBI::err should match $dbh->err
ok 27 - $DBI::errstr should contain error string
ok 28 - $DBI::errstr should match $dbh->errstr
ok 29
ok 30
ok 31
ok 32
ok 33 - DBI::db=HASH(0x449b50) ne DBI::db=HASH(0x449b50)
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53 - errstr should contain error message
ok 54
ok 55 - errstr should contain error message
ok 56
ok 57
ok 58 - errstr should contain error message
ok 59
ok 60 - errstr should contain error message
ok 61
ok 62
ok 63
ok 64
ok 65
ok 66
ok 67
ok 68
fetchrow_hashref('NAME_uc')
ok 69
ok 70
ok 71
ok 72
ok 73
fetchrow_hashref('ParamValues')
ok 74
ok 75
FetchHashKeyName
ok 76
ok 77
ok 78
ok 79
ok 80
ok 81
fetchall_arrayref
ok 82
ok 83
ok 84
ok 85
ok 86
ok 87
fetchall_arrayref array slice
ok 88
ok 89
ok 90
ok 91
fetchall_arrayref hash slice
ok 92
ok 93
ok 94
ok 95
fetchall_arrayref hash
ok 96
ok 97
ok 98
ok 99 - '16877 1024 .' ne '16877 1024 .'
rows()
ok 100 - row count 44
ok 101 - 44 vs 44
ok 102 - 44 vs 44
fetchall_arrayref array slice and max rows
ok 103
ok 104
ok 105
selectrow_array
ok 106
ok 107
selectrow_hashref
ok 108
ok 109
ok 110
ok 111
selectall_arrayref
ok 112
ok 113
ok 114
ok 115
selectall_arrayref Slice array slice
ok 116
ok 117
ok 118 - ". 16877" eq ". 16877"
ok 119
selectall_arrayref Columns array slice
ok 120
ok 121
ok 122 - ". 16877" eq ". 16877"
ok 123
selectall_arrayref hash slice
ok 124
ok 125
ok 126
ok 127
ok 128
ok 129
ok 130
selectall_hashref
ok 131 - selectall_hashref result
ok 132 - selectall_hashref HASH: HASH
ok 133
ok 134 - 1024 eq 1024
selectall_hashref by column number
ok 135
ok 136 - 1024 eq 1024
selectcol_arrayref
ok 137
ok 138
ok 139
selectcol_arrayref column slice
ok 140
ok 141
ok 142
ok 143
others...
ok 144
ok 145
RaiseError & PrintError & ShowErrorStatement
ok 146
ok 147
ok 148
ok 149
ok 150
ok 151
ok 152
ok 153
ok 154
ok 155
ok 156
ok 157
ok 158
ok 159
ok 160
ok 161 - DBD::ExampleP::st execute failed: 2 values bound when 1 expected [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at t/10examp.t line 366.
#
ok 162 - DBD::ExampleP::st execute failed: 2 values bound when 1 expected [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at t/10examp.t line 366.
#
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168
HandleError
ok 169
ok 170
HandleError -> die
ok 171
ok 172 - HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x449b50), rv=undef, \#=3] at t/10examp.t line 395.
#
HandleError -> 0 -> RaiseError
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x449b50), rv=undef, #=3]
ok 173
ok 174 - DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 at t/10examp.t line 416.
#
HandleError -> 1 -> return (original)undef
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x449b50), rv=undef, #=3]
ok 175 -
ok 176
HandleError -> 2 -> return (modified)42
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x449b50), rv=undef, #=3]
ok 177 -
ok 178
ok 179
ok 180 - The object isa DBI::st
ok 181
ok 182
ok 183
ok 184 - Remove dumpcsr.tst
ok 185 - Actually gone
table_info
ok 186
Local /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE subdirs: lib ex .. . blib t
ok 187
ok 188
ok 189
tables
ok 190 - Table count mismatch5 vs 5
ok 191 - "schema"."table" ne "schema"."table"
ok 192 - "sch-ema"."table" ne "sch-ema"."table"
ok 193 - "schema"."ta-ble" ne "schema"."ta-ble"
ok 194 - "sch ema"."table" ne "sch ema"."table"
ok 195 - "schema"."ta ble" ne "schema"."ta ble"
Testing the fake directories (0).
ok 196
ok 197
ok 198 - 0 rows instead of 0
ok 199
Testing the fake directories (100).
ok 200
ok 201
ok 202 - 100 rows instead of 100
ok 203 - 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
Testing the fake directories (200).
ok 204
ok 205
ok 206 - 200 rows instead of 200
ok 207 - 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
Testing $dbh->func().
ok 208
ok 209
ok 210 - ping should return false after disconnect
ok
t/11fetch.t ................
1..24
# fetchall_hashref(C1)
ok 1
ok 2
ok 3
ok 4
# fetchall_hashref(C2)
ok 5
ok 6
ok 7
ok 8
# fetchall_hashref([C2])
ok 9
ok 10
ok 11
ok 12
# fetchall_hashref([C1 C2])
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok
t/12quote.t ................
1..10
ok 1 - ... quoting strings with embedded single quotes
ok 2 - ... quoting number as SQL_VARCHAR
ok 3 - ... quoting number as SQL_INTEGER
ok 4 - ... quoting undef as NULL
ok 5 - ... properly quotes foo as "foo"
ok 6 - ... properly quotes f"o as "f""o"
ok 7 - ... properly quotes foo, bar as "foo"."bar"
ok 8 - ... properly quotes undef, undef, bar as "bar"
ok 9 - ... properly quotes foo, undef, bar as "foo"."bar"
ok 10 - ... now quotes it as "bar"@"foo" after flushing cache
ok
t/13taint.t ................
1..36
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19 - should execute ok
ok 20
ok 21
ok 22
ok 23
TaintIn
ok 24
ok 25
ok 26
ok 27
TaintOut
ok 28
ok 29
ok 30
ok 31
ok 32 - Insecure dependency in parameter 1 of DBI::db=HASH(0x3fb850)->prepare method call while running with -T switch at t/13taint.t line 113.
#
ok 33 - Insecure dependency in parameter 1 of DBI::st=HASH(0x3fb990)->execute method call while running with -T switch at t/13taint.t line 115.
#
ok 34 -
ok 35 -
ok 36
ok
t/14utf8.t .................
1..16
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok
t/15array.t ................
1..55
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - The object isa DBI::st
ok 4 - ... we should have 0 rows
ok 5 - ... execute_array should return false
ok 6 - execute_array failure with RaiseError should have died
ok 7
ok 8 - ... we should have 2 rows
ok 9 - ... we should have 3 tuple_status
ok 10 - ... our rows are as expected
ok 11 - ... our tuple_status is as expected
ok 12 - ... bind_param_array should return true
ok 13 - ... execute_array should return true
ok 14 - ... we should have 3 rows
ok 15 - ... we should have 3 tuple_status
ok 16 - ... our rows are as expected
ok 17 - ... our tuple_status is as expected
ok 18 - ... execute_array should return true
ok 19 - ... we should have executed 3 rows
ok 20 - ... we should have affected 3 rows
ok 21 - ... execute_array should return true
ok 22 - ... execute_array should return 0 (but true)
ok 23 - ... we should have 0 rows
ok 24 - ... we should have 0 tuple_status
ok 25 - ... execute_array should return 1
ok 26 - ... we should have 1 rows
ok 27 - ... our rows are as expected
ok 28 - ... we should have 1 tuple_status
ok 29 - ... our tuple_status is as expected
ok 30 - ... execute_array should return 0
ok 31 - ... we should have 0 rows
ok 32 - ... we should have 0 tuple_status
ok 33 - The object isa DBI::st
ok 34 - ... execute_array should return true
ok 35 - ... execute_array should return 0 (but true)
ok 36 - ... we should have 0 rows
ok 37 - ... execute_array should return true
ok 38 - ... we should have 2 rows
ok 39 - ... we should have 2 tuple_status
ok 40 - ... rows should match
ok 41 - ... tuple_status should match
ok 42 - The object isa DBI::st
ok 43 - ... execute_array should return true
ok 44 - ... we should have 3 rows
ok 45 - ... we should have 3 tuple_status
ok 46 - ... rows should match
ok 47 - ... tuple status should match
ok 48 - ... execute_array should return undef
ok 49 - ... errstr is as expected
ok 50 - ... execute_array should return undef
ok 51 - ... errstr is as expected
ok 52 - ... execute_array should return undef
ok 53 - ... errstr is as expected
ok 54 - ... bind_param_array should return undef
ok 55 - ... errstr is as expected
ok
t/19fhtrace.t ..............
1..27
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking TraceLevel attribute
ok 4 - ... regular fh: trace file successfully created
ok 5 - ... regular fh: filehandle successfully set
ok 6 - ... regular fh: trace_msg
<- trace= 2 at 19fhtrace.t line 196
ok 7 - ... regular fh: file successfully changed
ok 8 - ... regular fh: trace_msg after changing trace output
Next logline
-> trace for DBD::ExampleP::db (DBI::db=HASH(0x3f0160)~0x3f00e0 0) thr#173f40
<- trace= 2 at 19fhtrace.t line 209
ok 9 - Tracefile removed
ok 10 - Tracefile FOO opened
ok 11 - Tracefile created
ok 12 - Regression test
ok 13 - Traced message
ok 14 - Regression test
ok 15 - ... layered fh: file is layered: *** Test our layer
#
#
ok 16 - ... layered fh: filehandle successfully set
ok 17 - ... layered fh: trace_msg: Layered logline
#
#
<- trace(1, 'STDOUT')= 1 at 19fhtrace.t line 251
ok 18 - ... layered fh: close doesn't close: Layered logline
#
#
ok 19 - ... layered fh: trace_msg after change trace output: Layered logline
#
#
ok 20 - ... scalar trace: file is layered: *** Test our layer
#
#
ok 21 - ... scalar trace: filehandle successfully set
ok 22 - ... scalar trace: *** Test our layer
# <- trace(1, GLOB(0x2322c8))= 1 at 19fhtrace.t line 267
# Layered logline
#
#
Next logline
<- trace(1, 'STDOUT')= 1 at 19fhtrace.t line 273
ok 23 - ... scalar trace: close doesn't close: *** Test our layer
# <- trace(1, GLOB(0x2322c8))= 1 at 19fhtrace.t line 267
# Layered logline
#
#
ok 24 - ... scalar trace: after change trace output: *** Test our layer
# <- trace(1, GLOB(0x2322c8))= 1 at 19fhtrace.t line 267
# Layered logline
#
#
ok 25 - ... logger: trace_msg
#
Next logline
DBI::db=HASH(0x3f00e0) trace level set to 0x0/1 (DBI @ 0x100/0) in DBI 1.611-ithread (pid 3709)
ok 26 - ... logger: close doesn't close
#
ok 27 - ... logger: trace_msg after change trace output
#
Next logline
<- disconnect= 1 at 19fhtrace.t line 157
<- FETCH('Active')= '' at ExampleP.pm line 259
<- DESTROY(DBI::db=HASH(3f00e0))= undef
ok
t/20meta.t .................
1..8
ok 1 - use DBI;
ok 2 - use DBI::DBD::Metadata;
ok 3 - The object isa DBI::db
ok 4
ok 5
ok 6
ok 7
ok 8
ok
t/30subclass.t .............
1..36
ok 1 - use DBI;
ok 2 - The object isa MyDBI::db
ok 3
ok 4 - The object isa MyDBI::db
ok 5
ok 6
ok 7 - The object isa MyDBI::st
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15 - The reference isa ARRAY
ok 16
ok 17
ok 18
ok 19
ok 20 - Clone A isa MyDBI::db
ok 21
ok 22
ok 23 - Clone B isa MyDBI::db
ok 24
ok 25
ok 26 - The object isa MyDBI::db
ok 27
ok 28 - installed method isa ARRAY
ok 29
ok 30
ok 31
ok 32
ok 33 - Failed connect \#1
ok 34
ok 35 - Failed connect \#2
ok 36
fetch 4 prepare 1
ok
t/35thrclone.t .............
1..20
ok 1 - use DBI;
ok 2 - ... assignment of neat_maxlen was successful
ok 3 - The object isa DBI::db
ok 4 - ... DBI::neat_maxlen still holding its value
ok 5 - The object isa DBI::db
ok 6 - ... new $dbh is not the same instance as $dbh_parent
ok 7 - ... the Driver has one Kid
ok 8 - ... DBI::neat_maxlen still holding its value
ok 9 - The object isa DBI::db
ok 10 - ... new $dbh is not the same instance as $dbh_parent
ok 11 - ... the Driver has one Kid
ok 12 - ... DBI::neat_maxlen still holding its value
ok 13 - The object isa DBI::db
ok 14 - ... new $dbh is not the same instance as $dbh_parent
ok 15 - ... the Driver has one Kid
ok 16 - ... DBI::neat_maxlen still holding its value
ok 17 - The object isa DBI::db
ok 18 - ... new $dbh is not the same instance as $dbh_parent
ok 19 - ... the Driver has one Kid
ok 20 - ... all tests have passed
ok
t/40profile.t ..............
1..60
Test enabling the profile
ok 1
ok 2
ok 3
ok 4
ok 5
bless( {
'Path' => [
'!MethodName',
'!Caller2'
],
'Data' => {
'do' => {
'40profile.t line 80' => [
1,
'0.000392913818359375',
'0.000392913818359375',
'0.000392913818359375',
'0.000392913818359375',
'1273062448.50196',
'1273062448.50196'
]
}
}
}, 'DBI::Profile' )
ok 6
ok 7
ok 8
ok 9
ok 10
dbi_profile
bless( {
'Path' => [
'!Statement',
'!MethodName'
],
'Data' => {
'' => {
'connected' => [
1,
'1.9073486328125e-06',
'1.9073486328125e-06',
'1.9073486328125e-06',
'1.9073486328125e-06',
'1273062448.50943',
'1273062448.50943'
],
'FETCH' => [
1,
'3.814697265625e-06',
'3.814697265625e-06',
'3.814697265625e-06',
'3.814697265625e-06',
'1273062448.5094',
'1273062448.5094'
],
'STORE' => [
5,
'0.000146627426147461',
'2.88486480712891e-05',
'2.69412994384766e-05',
'3.19480895996094e-05',
'1273062448.50917',
'1273062448.50946'
]
},
'Hi mom' => {
'my_method_name' => [
1,
'1',
'1',
'1',
'1',
'1273062448.51417',
'1273062448.51417'
]
}
}
}, 'DBI::Profile' )
ok 11
ok 12
ok 13
ok 14 - should return ref to leaf node
ok 15 - should return ref to leaf node
ok 16 - should return ref to correct leaf node
1 1 1 1 1 1273062448.51417 1273062448.51417
ok 17
2 3 1 1 2 1273062448.51417 1273062448.52268
ok 18
Test collected profile data
bless( {
'Path' => [
'!Statement'
],
'Data' => {
'set foo=1' => [
1,
'0.000249862670898438',
'0.000249862670898438',
'0.000249862670898438',
'0.000249862670898438',
'1273062448.93207',
'1273062448.93207'
],
'' => [
7,
'0.000156164169311523',
'3.09944152832031e-05',
'1.9073486328125e-06',
'3.19480895996094e-05',
'1273062448.52593',
'1273062448.52621'
],
'select mode,size,name from ?' => [
2351,
'0.367948055267334',
'0.000317096710205078',
'8.17775726318359e-05',
'0.000360012054443359',
'1273062448.52727',
'1273062448.93197'
]
}
}, 'DBI::Profile' )
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
ok 30
ok 31
ok 32
ok 33
ok 34
Test profile format
Profile Output
DBI::Profile: 0.368354s 90.70% (2359 calls) 40profile.t @ 2010-05-05 05:27:28
'' =>
0.000156s / 7 = 0.000022s avg (first 0.000031s, min 0.000002s, max 0.000032s)
'select mode,size,name from ?' =>
0.367948s / 2351 = 0.000157s avg (first 0.000317s, min 0.000082s, max 0.000360s)
'set foo=1' =>
0.000250s
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41 - should have 9 nodes
ok 42
testing '!File', '!Caller' and their variants in Path
ok 43
testing '!Time' and variants in Path
ok 44 - !Time and !Time~1000000 should work
testing &norm_std_n3 in Path
ok 45
ok 46 - &norm_std_n3 should normalize statement
testing code ref in Path
ok 47
ok 48
ok 49 - should be vetoed
ok 50 - $_ should contain statement
ok 51 - should have @_ as keys
ok 52 - should be able to filter by method
ok 53 - output should go to log file
testing as_text
ok 54
ok 55
ok 56
DBI::Profile: 2.000000s 200.00% (203 calls) 40profile.t @ 2010-05-05 05:27:30
'A' =>
'Z' =>
1.000000s / 101 = 0.009901s avg (first 2.000000s, min 3.000000s, max 4.000000s)
'B' =>
'Y' =>
1.000000s / 102 = 0.009804s avg (first 2.000000s, min 3.000000s, max 4.000000s)
dbi_profile_merge_nodes
ok 57
ok 58
ok 59
ok 60
DBI::Profile: 0.000070s 0.00% (14 calls) 40profile.t @ 2010-05-05 05:27:30
'foo' =>
'DESTROY' =>
'baz' =>
0.000000s
'FETCH' =>
'baz' =>
0.000032s / 2 = 0.000016s avg (first 0.000000s, min 0.000000s, max 0.000032s)
'STORE' =>
'baz' =>
0.000000s / 5 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'connected' =>
'baz' =>
0.000000s
'disconnect' =>
'baz' =>
0.000038s
'execute' =>
'baz' =>
0.000000s
'fetchrow_hashref' =>
'baz' =>
0.000000s
'finish' =>
'baz' =>
0.000000s
'prepare' =>
'baz' =>
0.000000s
ok
t/41prof_dump.t ............
1..15
ok 1 - use DBI;
ok 2 - use DBI::ProfileDumper;
ok 3 - The object isa DBI::db
ok 4 - The object isa DBI::ProfileDumper
ok 5 - The reference isa HASH
ok 6 - The reference isa ARRAY
ok 7 - The object isa DBI::st
ok 8
ok 9 - Profile is on disk and nonzero size
DBI::ProfileDumper 2.009894
Path = [ ]
Program = t/41prof_dump.t
+ 1
= 7 0.00017094612121582 3.09944152832031e-05 4.05311584472656e-06 3.40938568115234e-05 1273062450.35046 1273062450.35076
+ 1 select mode,size,name from ?
= 2 0.000643730163574219 0.000419855117797852 0.000223875045776367 0.000419855117797852 1273062450.35365 1273062450.35473
+ 1
= 2 8.79764556884766e-05 4.60147857666016e-05 4.1961669921875e-05 4.60147857666016e-05 1273062450.36501 1273062450.36509
+ 1 select mode,size,name from ?
= 48 0.00764131546020508 0.000321865081787109 1.40666961669922e-05 0.000321865081787109 1273062450.35664 1273062450.36508
ok 10 - Found a version number
ok 11 - Version numbers match in DBI::ProfileDumper 2.009894
#
ok 12 - Found the Path
ok 13 - Found the Program
ok 14
ok 15 # skip developer-only test
ok
t/42prof_data.t ............
1..31
ok 1 - use DBI::ProfileDumper;
ok 2 - use DBI::ProfileData;
ok 3 - Created connection isa DBI::db
ok 4 - Profile written to disk, non-zero size
ok 5 - The object isa DBI::ProfileData
ok 6 - At least 3 profile data items
ok 7
ok 8
ok 9
ok 10
ok 11 - The object isa DBI::ProfileData
ok 12
ok 13
ok 14 - The object isa DBI::ProfileData
ok 15
ok 16
ok 17
SQL: set dummy=N
SQL:
SQL: select mode,size,name from ?
ok 18
ok 19
ok 20
ok 21 - Created connection isa DBI::db
ok 22 - The object isa DBI::st
ok 23 - The object isa DBI::st
ok 24 - The object isa DBI::st
ok 25 - The object isa DBI::st
ok 26 - The object isa DBI::st
ok 27 - The object isa DBI::st
ok 28 - The object isa DBI::ProfileData
ok 29 - file should be deleted when DeleteFiles set
ok 30
ok 31
ok
t/43prof_env.t .............
1..11
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7 - $h->{Profile} should be shared
ok 8
ok 9
ok 10
ok 11
DBI::Profile: 0.001763s 0.18% (25 calls) 43prof_env.t @ 2010-05-05 05:27:31
'' =>
'DESTROY' =>
0.000122s
'FETCH' =>
0.000082s / 4 = 0.000021s avg (first 0.000003s, min 0.000003s, max 0.000046s)
'STORE' =>
0.000316s / 10 = 0.000032s avg (first 0.000043s, min 0.000027s, max 0.000043s)
'connect' =>
0.000398s / 2 = 0.000199s avg (first 0.000261s, min 0.000137s, max 0.000261s)
'connected' =>
0.000025s / 2 = 0.000013s avg (first 0.000023s, min 0.000002s, max 0.000023s)
'disconnect' =>
0.000072s / 2 = 0.000036s avg (first 0.000038s, min 0.000034s, max 0.000038s)
'disconnect_all' =>
0.000016s
'set dummy=1' =>
'do' =>
0.000409s
'set dummy=2' =>
'DESTROY' =>
0.000088s
'do' =>
0.000234s
ok
t/50dbm.t ..................
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable
Test count: 1 x 3 x 14 = 42
1..42
--- Using SDBM_File () ---
DBD::DBM 0.04 using SDBM_File
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 1
ok 2 - The object isa DBI::db
ok 3
ok 4
ok 5
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
INSERT INTO SDBM_File_fruit VALUES (3, NULL )
INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
INSERT INTO SDBM_File_fruit VALUES (?,?); #5,via placeholders
UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
SELECT * FROM SDBM_File_fruit
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
DBD::DBM 0.04 using SDBM_File + MLDBM + Data::Dumper
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 15
ok 16 - The object isa DBI::db
ok 17
ok 18
ok 19
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
INSERT INTO SDBM_File_fruit VALUES (2,'apples' , 0 )
INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
INSERT INTO SDBM_File_fruit VALUES (?,?,?); #5,via placeholders,15
UPDATE SDBM_File_fruit SET qux='12' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dKey=4
SELECT dKey,qux FROM SDBM_File_fruit
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
DBD::DBM 0.04 using SDBM_File + MLDBM + Storable
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 29
ok 30 - The object isa DBI::db
ok 31
ok 32
ok 33
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
INSERT INTO SDBM_File_fruit VALUES (2,'apples' , 0 )
INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
INSERT INTO SDBM_File_fruit VALUES (?,?,?); #5,via placeholders,15
UPDATE SDBM_File_fruit SET qux='12' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dKey=4
SELECT dKey,qux FROM SDBM_File_fruit
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
DROP TABLE SDBM_File_fruit
ok
t/60preparse.t .............
1..39
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok
t/65transact.t .............
1..10
begin_work...
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok
t/70callbacks.t ............
1..63
ok 1 - Create dbh
ok 2 - Callbacks initially undef
ok 3
ok 4 - Callbacks can be set to a hash ref
ok 5 - Callbacks set to same hash ref
ok 6 - Callbacks set to undef again
ok 7
ok 8
ok 9
ok 10 - $_ holds method name
ok 11 - @_ holds 1 values
ok 12 - first is $dbh
ok 13
ok 14
ok 15 - $_ not altered by callback
ok 16 - $_ holds method name
ok 17 - @_ holds 1 values
ok 18 - first is $dbh
ok 19
ok 20
ok 21
ok 22 - fallback callback
ok 23 - @_ holds 4 values
ok 24 - first is $dbh
ok 25
ok 26
ok 27
ok 28
ok 29 - quote_identifier callback caused fatal error
ok 30 - param modified by callback - not recommended!
ok 31
ok 32 - You can't disconnect that easily!
#
ok 33
ok 34
ok 35
ok 36 - should return a single value in list context
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42 - intercepted commit should return undef
ok 43
ok 44
ok 45
ok 46 - Create handle with callbacks
ok 47 - no callback for plain connect
ok 48 - Create handle with callbacks
ok 49 - connect_cached.new called
ok 50 - connect_cached.reused not yet called
ok 51 - Create handle with callbacks
ok 52 - connect_cached.reused called
ok 53 - connect_cached.new not called again
ok 54 - Create handle with ChildCallbacks
ok 55 - Ping
ok 56 - Ping callback should have been called
ok 57 - Prepare a statement handle (child)
ok 58 - child should have Callbacks
ok 59 - child Callbacks should be ChildCallbacks of parent
ok 60 - Execute
ok 61 - Execute callback should have been called
ok 62 - Fetch
ok 63 - Fetch callback should have been called
ok
t/72childhandles.t .........
1..16
ok 1
ok 2
ok 3
ok 4
ok 5 - All handles should be undef now
ok 6 - ChildHandles should be an array-ref if wekref is available
ok 7
drh DBI::dr=HASH(0x3c2438)
dbh DBI::db=HASH(0x3c2508)
sth DBI::st=HASH(0x3c4d00)
sth DBI::st=HASH(0x27f828)
sth DBI::st=HASH(0x3c4cb0)
ok 8
ok 9
ok 10
ok 11
ok 12 - handles should be gone now
ok 13
ok 14
ok 15
ok 16
ok
t/80proxy.t ................ skipped: modules required for proxy are probably not installed (e.g., RPC/PlClient.pm)
t/85gofer.t ................
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x5317a0)
ok 20
ok 21
ok 22
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x6c71f0)
ok 46
ok 47
ok 48
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x6da4a0)
ok 72
ok 73
ok 74
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
# =============
# Testing pipeone transport with pedantic policy
# dbi:Gofer:transport=pipeone;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 79 - should connect to dbi:Gofer:transport=pipeone;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 80
ok 81
ok 82
ok 83 - should detect prepare failure
ok 84
ok 85
ok 86
ok 87
ok 88
ok 89
ok 90 - go_response executed flag should be true
ok 91
ok 92
ok 93
ok 94
# Testing go_request_count and caching of simple values
ok 95
ok 96
ok 97
# use_remote=1 (policy=pedantic, transport=pipeone) HASH(0x721ff8)
ok 98
ok 99
ok 100
ok 101 # skip caching of metadata methods returning sth not yet implemented
ok 102 # skip caching of metadata methods returning sth not yet implemented
ok 103
ok 104
# =============
# Testing pipeone transport with classic policy
# dbi:Gofer:transport=pipeone;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 105 - should connect to dbi:Gofer:transport=pipeone;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 106
ok 107
ok 108
ok 109 - The object isa DBI::st
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116 - go_response executed flag should be true
ok 117
ok 118
ok 119
ok 120
# Testing go_request_count and caching of simple values
ok 121
ok 122
ok 123
# use_remote=0 (policy=classic, transport=pipeone) HASH(0x6c7440)
ok 124
ok 125
ok 126
ok 127 # skip caching of metadata methods returning sth not yet implemented
ok 128 # skip caching of metadata methods returning sth not yet implemented
ok 129
ok 130
# =============
# Testing pipeone transport with rush policy
# dbi:Gofer:transport=pipeone;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 131 - should connect to dbi:Gofer:transport=pipeone;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 132
ok 133
ok 134
ok 135 - The object isa DBI::st
ok 136
ok 137
ok 138
ok 139
ok 140
ok 141
ok 142 - go_response executed flag should be true
ok 143
ok 144
ok 145
ok 146
# Testing go_request_count and caching of simple values
ok 147
ok 148
ok 149
# use_remote=0 (policy=rush, transport=pipeone) HASH(0x7222d8)
ok 150
ok 151
ok 152
ok 153 # skip caching of metadata methods returning sth not yet implemented
ok 154 # skip caching of metadata methods returning sth not yet implemented
ok 155
ok 156
# =============
# Testing stream transport with pedantic policy
# dbi:Gofer:transport=stream;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 157 - should connect to dbi:Gofer:transport=stream;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 158
ok 159
ok 160
ok 161 - should detect prepare failure
ok 162
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168 - go_response executed flag should be true
ok 169
ok 170
ok 171
ok 172
# Testing go_request_count and caching of simple values
ok 173
ok 174
ok 175
# use_remote=1 (policy=pedantic, transport=stream) HASH(0x7425a8)
ok 176
ok 177
ok 178
ok 179 # skip caching of metadata methods returning sth not yet implemented
ok 180 # skip caching of metadata methods returning sth not yet implemented
ok 181
ok 182
# =============
# Testing stream transport with classic policy
# dbi:Gofer:transport=stream;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 183 - should connect to dbi:Gofer:transport=stream;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 184
ok 185
ok 186
ok 187 - The object isa DBI::st
ok 188
ok 189
ok 190
ok 191
ok 192
ok 193
ok 194 - go_response executed flag should be true
ok 195
ok 196
ok 197
ok 198
# Testing go_request_count and caching of simple values
ok 199
ok 200
ok 201
# use_remote=0 (policy=classic, transport=stream) HASH(0x725058)
ok 202
ok 203
ok 204
ok 205 # skip caching of metadata methods returning sth not yet implemented
ok 206 # skip caching of metadata methods returning sth not yet implemented
ok 207
ok 208
# =============
# Testing stream transport with rush policy
# dbi:Gofer:transport=stream;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 209 - should connect to dbi:Gofer:transport=stream;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 210
ok 211
ok 212
ok 213 - The object isa DBI::st
ok 214
ok 215
ok 216
ok 217
ok 218
ok 219
ok 220 - go_response executed flag should be true
ok 221
ok 222
ok 223
ok 224
# Testing go_request_count and caching of simple values
ok 225
ok 226
ok 227
# use_remote=0 (policy=rush, transport=stream) HASH(0x741d98)
ok 228
ok 229
ok 230
ok 231 # skip caching of metadata methods returning sth not yet implemented
ok 232 # skip caching of metadata methods returning sth not yet implemented
ok 233
ok 234
1..234
ok
t/86gofer_fail.t ...........
ok 1 - should fail 100% of the time
ok 2 - $@ should be set
ok 3
ok 4 - errstr should be set
ok 5 - errstr should contain DBI_GOFER_RANDOM
ok 6 - go_response executed flag should be false
target approx 50% random failures, got 49%
ok 7 - should fail about 50% of the time, but at least between 10% and 90% (got 49)
ok 8 - should fail about 50% of the time, but at least between 10% and 90% (got 49)
target less than 20% effective random failures (ideally 0), got 0%
ok 9 - should fail < 20%
ok 10 - should fail < 1%
ok 11
ok 12 - should fail ~25% (ie 50% with one retry) (got 32)
ok 13 - should fail ~25% (ie 50% with one retry) (got 32)
ok 14 - transport request_retry_count should be around 50 (got 58)
ok 15 - transport request_retry_count should be around 50 (got 58)
ok 16
ok 17 - should fail ~50%, ie no retries (got 57)
ok 18 - should fail ~50%, ie no retries (got 57)
ok 19 - transport request_retry_count should be zero or undef
ok 20 - positive percentage should fail randomly
ok 21 - negative percentage should fail non-randomly
Testing random delay
ok 22
ok 23 - should not fail for DBI_GOFER_RANDOM='delay0.1=51%,do'
ok 24 - should be delayed around 5 times (got 11)
ok 25 - should be delayed around 5 times (got 11)
1..25
ok
t/87gofer_cache.t ..........
using DBI::Util::CacheMemory=HASH(0x3d42f8) for dbi:Gofer:transport=null;policy=classic;dsn=dbi:ExampleP:
ok 1
ok 2
ok 3 - cache should be empty after clear
ok 4 - transmit_count should be 0
ok 5
ok 6 - cache should not be empty after select
ok 7
ok 8
ok 9
ok 10 - should make 1 round trip
ok 11 - transmit_count should be 0
ok 12
ok 13
ok 14 - should make 1 round trip
ok 15
ok 16
ok 17
using 1 for dbi:Gofer:transport=null;policy=classic;dsn=dbi:ExampleP:
ok 18
ok 19
ok 20 - cache should be empty after clear
ok 21 - transmit_count should be 0
ok 22
ok 23 - cache should not be empty after select
ok 24
ok 25
ok 26
ok 27 - should make 1 round trip
ok 28 - transmit_count should be 0
ok 29
ok 30
ok 31 - should make 1 round trip
ok 32
ok 33
ok 34
test per-sth go_cache
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
1..47
ok
t/90sql_type_cast.t ........
1..39
ok 1 - result, undef
ok 2 - json undef
ok 3 - discard works, undef
ok 4 - result, invalid sql type
ok 5 - json invalid sql type
ok 6 - result, non numeric cast to int
ok 7 - json non numeric cast to int
ok 8 - result, non numeric cast to int (strict)
ok 9 - json non numeric cast to int (strict)
ok 10 - result, small int cast to int
ok 11 - json small int cast to int
ok 12 - result, 2 byte max signed int cast to int
ok 13 - json 2 byte max signed int cast to int
ok 14 - result, 2 byte max unsigned int cast to int
ok 15 - json 2 byte max unsigned int cast to int
ok 16 - result, 4 byte max signed int cast to int
ok 17 - json 4 byte max signed int cast to int
ok 18 - result, 4 byte max unsigned int cast to int
ok 19 - json 4 byte max unsigned int cast to int
ok 20 - result, small int cast to int (discard)
ok 21 - json small int cast to int (discard)
ok 22 - discard works, small int cast to int (discard)
ok 23 - result, non numeric cast to numeric
ok 24 - json non numeric cast to numeric
ok 25 - result, non numeric cast to numeric (strict)
ok 26 - json non numeric cast to numeric (strict)
ok 27 - result, very large int cast to int
ok 28 - json very large int cast to int
ok 29 - result, very large int cast to int (strict)
ok 30 - json very large int cast to int (strict)
ok 31 - result, float cast to int
ok 32 - json float cast to int
ok 33 - result, float cast to int (strict)
ok 34 - json float cast to int (strict)
ok 35 - result, float cast to double
ok 36 - json float cast to double
ok 37 - nv defined float cast to double
ok 38 - result, 4 byte max unsigned int cast to int (ivsize=4)
ok 39 - json 4 byte max unsigned int cast to int (ivsize=4)
ok
t/pod-coverage.t ........... skipped: Currently a developer-only test
t/pod.t ....................
1..53
ok 1 - POD test for blib/lib/Roadmap.pod
ok 2 - POD test for blib/lib/dbixs_rev.pl (no pod)
ok 3 - POD test for blib/lib/DBI.pm
ok 4 - POD test for blib/lib/TASKS.pod
ok 5 - POD test for blib/script/dbiprof
ok 6 - POD test for blib/script/dbiproxy
ok 7 - POD test for blib/script/dbilogstrip
ok 8 - POD test for blib/lib/DBI/Changes.pm
ok 9 - POD test for blib/lib/DBI/Roadmap.pm
ok 10 - POD test for blib/lib/DBI/ProfileSubs.pm
ok 11 - POD test for blib/lib/DBI/FAQ.pm
ok 12 - POD test for blib/lib/DBI/W32ODBC.pm
ok 13 - POD test for blib/lib/DBI/Profile.pm
ok 14 - POD test for blib/lib/DBI/ProfileDumper.pm
ok 15 - POD test for blib/lib/DBI/ProxyServer.pm
ok 16 - POD test for blib/lib/DBI/DBD.pm
ok 17 - POD test for blib/lib/DBI/PurePerl.pm
ok 18 - POD test for blib/lib/DBI/ProfileData.pm
ok 19 - POD test for blib/lib/DBD/Proxy.pm
ok 20 - POD test for blib/lib/DBD/DBM.pm
ok 21 - POD test for blib/lib/DBD/File.pm
ok 22 - POD test for blib/lib/DBD/NullP.pm (no pod)
ok 23 - POD test for blib/lib/DBD/Gofer.pm
ok 24 - POD test for blib/lib/DBD/Sponge.pm
ok 25 - POD test for blib/lib/DBD/ExampleP.pm (no pod)
ok 26 - POD test for blib/lib/Bundle/DBI.pm
ok 27 - POD test for blib/lib/Win32/DBIODBC.pm
ok 28 - POD test for blib/lib/DBI/Gofer/Response.pm
ok 29 - POD test for blib/lib/DBI/Gofer/Request.pm
ok 30 - POD test for blib/lib/DBI/Gofer/Execute.pm
ok 31 - POD test for blib/lib/DBI/Util/_accessor.pm (no pod)
ok 32 - POD test for blib/lib/DBI/Util/CacheMemory.pm
ok 33 - POD test for blib/lib/DBI/Const/GetInfoType.pm
ok 34 - POD test for blib/lib/DBI/Const/GetInfoReturn.pm
ok 35 - POD test for blib/lib/DBI/DBD/Metadata.pm
ok 36 - POD test for blib/lib/DBI/ProfileDumper/Apache.pm
ok 37 - POD test for blib/lib/DBI/SQL/Nano.pm
ok 38 - POD test for blib/lib/DBI/Gofer/Transport/Base.pm
ok 39 - POD test for blib/lib/DBI/Gofer/Transport/stream.pm
ok 40 - POD test for blib/lib/DBI/Gofer/Transport/pipeone.pm
ok 41 - POD test for blib/lib/DBI/Gofer/Serializer/DataDumper.pm
ok 42 - POD test for blib/lib/DBI/Gofer/Serializer/Storable.pm
ok 43 - POD test for blib/lib/DBI/Gofer/Serializer/Base.pm
ok 44 - POD test for blib/lib/DBI/Const/GetInfo/ODBC.pm
ok 45 - POD test for blib/lib/DBI/Const/GetInfo/ANSI.pm
ok 46 - POD test for blib/lib/DBD/Gofer/Transport/pipeone.pm
ok 47 - POD test for blib/lib/DBD/Gofer/Transport/Base.pm
ok 48 - POD test for blib/lib/DBD/Gofer/Transport/stream.pm
ok 49 - POD test for blib/lib/DBD/Gofer/Transport/null.pm
ok 50 - POD test for blib/lib/DBD/Gofer/Policy/rush.pm
ok 51 - POD test for blib/lib/DBD/Gofer/Policy/classic.pm
ok 52 - POD test for blib/lib/DBD/Gofer/Policy/Base.pm
ok 53 - POD test for blib/lib/DBD/Gofer/Policy/pedantic.pm
ok
t/zvg_01basics.t ...........
1..130
ok 1 - use DBI;
ok 2 - ... testing sql_type
ok 3 - ... testing sql_type
ok 4 - ... testing sql_type
ok 5 - ... testing sql_type
ok 6 - ... testing sql_type
ok 7 - ... testing sql_type
ok 8 - ... testing sql_type
ok 9 - ... testing sql_type
ok 10 - ... testing sql_type
ok 11 - ... testing sql_type
ok 12 - ... testing sql_type
ok 13 - ... testing sql_type
ok 14 - ... testing sql_type
ok 15 - ... testing sql_type
ok 16 - ... testing sql_type
ok 17 - ... testing sql_type
ok 18 - ... testing sql_type
ok 19 - ... testing sql_type
ok 20 - ... testing sql_type
ok 21 - ... testing sql_type
ok 22 - ... testing sql_type
ok 23 - ... testing sql_type
ok 24 - ... testing sql_type
ok 25 - ... testing sql_type
ok 26 - ... testing sql_type
ok 27 - ... testing sql_type
ok 28 - ... testing sql_type
ok 29 - ... testing sql_type
ok 30 - ... testing sql_type
ok 31 - ... testing sql_type
ok 32 - ... testing sql_type
ok 33 - ... testing sql_type
ok 34 - ... testing sql_type
ok 35 - ... testing sql_type
ok 36 - ... testing sql_type
ok 37 - ... testing sql_type
ok 38 - ... testing sql_type
ok 39 - ... testing sql_type
ok 40 - ... testing sql_type
ok 41 - ... testing sql_type
ok 42 - ... testing sql_type
ok 43 - ... testing sql_type
ok 44 - ... testing sql_type
ok 45 - ... testing sql_type
ok 46 - ... testing sql_type
ok 47 - ... testing sql_type
ok 48 - ... testing sql_type
ok 49 - ... testing sql_type
ok 50 - ... testing sql_type
ok 51 - ... testing sql_type
ok 52 - ... testing sql_type
ok 53 - ... testing sql_type
ok 54 - ... testing sql_type
ok 55 - ... testing sql_type
ok 56 - ... testing sql_type
ok 57 - ... testing sql_type
ok 58 - ... testing sql_type
ok 59 - ... testing sql_type
ok 60 - ... testing sql_cursor_types
ok 61 - ... testing sql_cursor_types
ok 62 - ... testing sql_cursor_types
ok 63 - ... testing sql_cursor_types
ok 64 - ... testing sql_cursor_types
ok 65 - ... looks_like_number : undef -> undef
ok 66 - ... looks_like_number : "" -> undef (eg "don't know")
ok 67 - ... looks_like_number : "foo" -> defined false
ok 68 - ... looks_like_number : "foo" -> defined false
ok 69 - ... looks_like_number : 1 -> true
ok 70 - ... looks_like_number : "." -> false
ok 71 - ... looks_like_number : 1 -> true
ok 72 - ... looks_like_number : 1 -> true
ok 73 - ... 1000 initial state is 400
ok 74 - ... neat : 1 + 1 -> "2"
ok 75 - ... neat : 2 -> "'2'"
ok 76 - ... neat : undef -> "undef"
ok 77 - ... test array argument w/seperator and maxlen
ok 78 - ... test array argument w/out seperator or maxlen
ok 79 - The object isa DBI::dr
ok 80 - ... test debug
ok 81 - ... test DebugDispatch
ok 82 - ... test Warn
ok 83 - ... this should say Tim Bunce
ok 84 - ... the version should match DBI version
ok 85 - ... this should work and return 1
ok 86 - ... this should equal 1
ok 87 - ... CachedKids should be undef initially
ok 88 - ... CachedKids should be our ref
ok 89 - ... this should be zero
ok 90 - ... this should be zero
ok 91 - ... Active flag is true
ok 92 - ... we should get a warning here
ok 93 - ... we should get a warning here
ok 94 - ... we should get no warnings here
ok 95 - ... we at least have one driver installed
ok 96 - ... we should at least have ExampleP installed
ok 97 - ... we should at least have one driver
ok 98 - ... should be -1077531989
ok 99 - ... should be -1077531989
ok 100 - ... should be -1077531990
ok 101
ok 102
ok 103
ok 104
ok 105
ok 106
ok 107
ok 108
ok 109
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116
ok 117
ok 118
ok 119
ok 120
ok 121
ok 122
ok 123
ok 124 # skip developer tests
ok 125 # skip developer tests
ok 126 # skip developer tests
ok 127 # skip developer tests
ok 128 - ... DBI::dbi_debug's initial state is 0
ok 129 - ... DBI::dbi_debug is 15
ok 130 - ... DBI::dbi_debug is 0
ok
t/zvg_02dbidrv.t ...........
1..53
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - ... DBD::Test->driver called to getnew Driver handle
ok 5 - ... new Driver handle (DBI::dr=HASH(0x39b9d8)) created successfully
ok 6 - The object isa DBI::dr
ok 7 - ... got a Test Driver object back from DBI->install_driver
ok 8 - The object isa DBI::dr
ok 9 - ... checking the DBI::_get_imp_data function
ok 10 - ... Driver object passed to data_sources
ok 11 - The object isa DBI::dr
ok 12 - ... Driver object is not tied
ok 13 - ... got correct datasources from DBI->data_sources("Test")
ok 14 - ... this Driver does not yet have any Kids
ok 15 - ... got a database handle from calling $drh->connect
ok 16 - The object isa DBI::db
ok 17 - ... this Driver does not yet have any Kids
ok 18 - ... Driver object passed to data_sources
ok 19 - The object isa DBI::dr
ok 20 - ... Driver object is not tied
ok 21 - ... checking fetched datasources from Driver
ok 22 - ... got correct datasources from $dbh->data_sources()
ok 23 - ... Database object passed to do
ok 24 - The object isa DBI::db
ok 25 - ... Database object is not tied
ok 26 - ... got Driver object from Database object with Driver attribute
ok 27 - The object isa DBI::dr
ok 28 - ... Driver object is not tied
ok 29 - ... got Driver object from Database object by FETCH-ing Driver attribute
ok 30 - The object isa DBI::dr
ok 31 - ... Driver object is not tied
ok 32 - ... this will trigger more driver internal tests above in DBD::Test::db
ok 33 - ... checking Driver handle err set with set_err method
ok 34 - ... checking Database handle err set with set_err method
ok 35 - ... checking Database handle err set with Driver handle set_err method
ok 36 - ... this Driver does not yet have any Kids
ok 37 - ... $dbh->DESTROY should set $drh->err to 42
ok 38 - ... checking $DBI::err set with Driver handle set_err method
ok 39 - ... checking $DBI::errstr
ok 40 - ... checking $DBI::state
ok 41 - ... checking $DBI::state
ok 42 - ... checking $DBI::state
ok 43 - ... trying to assign to $DBI::rows should throw an excpetion
ok 44 - ... FetchHashKeyName is NAME
ok 45 - ... FetchHashKeyName is now changed to NAME_lc
ok 46 - ... calling $drh->disconnect_all (not implemented but will fail silently)
ok 47 - has dbixs_revision
ok 48 - has integer dbixs_revision
ok 49 - ... $drh can FETCH
ok 50 - ... and it returned a proper CODE ref
ok 51 - ... used FETCH returned from can to fetch the Name attribute
ok 52 - ... the Name attribute is equal to Test
ok 53 - ...
ok
t/zvg_03handle.t ...........
1..137
ok 1 - use DBI;
ok 2
ok 3 - The object isa DBI::dr
ok 4 - ... this Driver does not yet have any Kids
ok 5
ok 6
ok 7
ok 8 - The object isa DBI::db
ok 9 - ... our Driver has one Kid
ok 10 - ... our Driver has one ActiveKid
ok 11 - The object isa DBI::st
ok 12 - ... execute ran successfully
ok 13 - ... we got the CachedKids hash
ok 14 - ... there is one CachedKid
ok 15 - ... our statment handle should be in the CachedKids
ok 16 - ... our first statment is Active
ok 17 - The object isa DBI::st
ok 18 - ... prepare_cached returned the same statement handle
ok 19 - ... we got warned about our first statement handle being still active
ok 20 - ... our first statment is no longer Active since we re-prepared it
ok 21 - The object isa DBI::st
ok 22 - ... prepare_cached returned a different statement handle now
ok 23 - ... there are two CachedKids
ok 24 - ... both statment handles should be in the CachedKids
ok 25 - ... executing first statement handle again
ok 26 - ... first statement handle is now active again
ok 27 - The object isa DBI::st
ok 28 - ... our fourth statement handle is not the same as our first
ok 29 - ... first statement handle is still active
ok 30 - ... there are two CachedKids
ok 31 - ... second and fourth statment handles should be in the CachedKids
ok 32 - ... first statement handle is no longer active
ok 33 - ... fourth statement handle executed properly
ok 34 - ... fourth statement handle is Active
ok 35 - The object isa DBI::st
ok 36 - ... we still only got one warning
ok 37 - ... fourth statement handle and fifth one match
ok 38 - ... fourth statement handle is not Active
ok 39 - ... fifth statement handle is not Active (shouldnt be its the same as fifth)
ok 40 - ... there are two CachedKids
ok 41 - ... second and fourth/fifth statment handles should be in the CachedKids
ok 42 - ... sixth statement handle is active
ok 43 - ... first statement handle is not active
ok 44 - ... first statement handle becomes the sixth
ok 45 - ... sixth statement handle is now not active
ok 46 - ... first statement handle is now active again
ok 47 - ... first statement handle becomes the sixth
ok 48 - ... sixth statement handle is active
ok 49 - ... first statement handle is not active
ok 50 - ... first statement handle becomes the sixth
ok 51 - ... sixth statement handle is now not active
ok 52 - ... first statement handle is now active again
ok 53 - ... can not swap a sth with a dbh
ok 54
ok 55 - ... first statement handle becomes the sixth
ok 56 - ... sixth statement handle is active
ok 57 - ... first statement handle is not active
ok 58
ok 59
ok 60 - ... can't swap_inner_handle with handle from different parent
ok 61
ok 62
ok 63 - ... can swap to different parent if forced
ok 64
ok 65 - ping should be true before disconnect
ok 66 - ping should be false after disconnect
ok 67 - ... our Driver has one Kid after disconnect
ok 68 - ... our Driver has no ActiveKids after disconnect
ok 69 - ... our ExampleP driver should have 0 Kids after dbh was destoryed
ok 70 # skip drh Kids not testable under DBD::Gofer
ok 71 # skip drh Kids not testable under DBD::Gofer
ok 72 # skip drh Kids not testable under DBD::Gofer
ok 73 # skip drh Kids not testable under DBD::Gofer
ok 74 # skip drh Kids not testable under DBD::Gofer
ok 75 # skip drh Kids not testable under DBD::Gofer
ok 76 # skip drh Kids not testable under DBD::Gofer
ok 77 # skip drh Kids not testable under DBD::Gofer
ok 78 # skip drh Kids not testable under DBD::Gofer
ok 79 # skip drh Kids not testable under DBD::Gofer
ok 80 # skip drh Kids not testable under DBD::Gofer
ok 81 # skip drh Kids not testable under DBD::Gofer
ok 82 # skip drh Kids not testable under DBD::Gofer
ok 83 # skip drh Kids not testable under DBD::Gofer
ok 84 # skip drh Kids not testable under DBD::Gofer
ok 85 # skip drh Kids not testable under DBD::Gofer
ok 86 # skip drh Kids not testable under DBD::Gofer
ok 87 # skip drh Kids not testable under DBD::Gofer
ok 88 # skip drh Kids not testable under DBD::Gofer
ok 89 # skip drh Kids not testable under DBD::Gofer
ok 90 # skip drh Kids not testable under DBD::Gofer
ok 91 # skip drh Kids not testable under DBD::Gofer
ok 92 # skip drh Kids not testable under DBD::Gofer
ok 93 # skip drh Kids not testable under DBD::Gofer
ok 94 # skip drh Kids not testable under DBD::Gofer
ok 95 # skip take_imp_data test not supported under DBD::Gofer
ok 96 # skip take_imp_data test not supported under DBD::Gofer
ok 97 # skip take_imp_data test not supported under DBD::Gofer
ok 98 # skip take_imp_data test not supported under DBD::Gofer
ok 99 # skip take_imp_data test not supported under DBD::Gofer
ok 100 # skip take_imp_data test not supported under DBD::Gofer
ok 101 # skip take_imp_data test not supported under DBD::Gofer
ok 102 # skip take_imp_data test not supported under DBD::Gofer
ok 103 # skip take_imp_data test not supported under DBD::Gofer
ok 104 # skip take_imp_data test not supported under DBD::Gofer
ok 105 # skip take_imp_data test not supported under DBD::Gofer
ok 106 # skip take_imp_data test not supported under DBD::Gofer
ok 107 # skip take_imp_data test not supported under DBD::Gofer
ok 108 # skip take_imp_data test not supported under DBD::Gofer
ok 109 # skip take_imp_data test not supported under DBD::Gofer
ok 110 # skip take_imp_data test not supported under DBD::Gofer
ok 111 # skip take_imp_data test not supported under DBD::Gofer
ok 112 # skip take_imp_data test not supported under DBD::Gofer
ok 113 # skip take_imp_data test not supported under DBD::Gofer
ok 114 - ... our Driver has no Kids after this test
ok 115 - The object isa DBI::dr
ok 116 - ... our Driver (2) has no Kids before this test
ok 117 - The object isa DBI::db
ok 118 - The object isa DBI::st
ok 119 - ... NUM_OF_PARAMS is 0
ok 120 - ... NUM_OF_FIELDS should be undef
ok 121 - ... Statement is "foo bar"
ok 122 - ... NAME is undefined
ok 123 - ... TYPE is undefined
ok 124 - ... SCALE is undefined
ok 125 - ... PRECISION is undefined
ok 126 - ... NULLABLE is undefined
ok 127 - ... RowsInCache is undefined
ok 128 - ... ParamValues is undefined
ok 129 - ... NAME_uc is undefined
ok 130 - ... NAME_lc is undefined
ok 131 - ... NAME_hash is undefined
ok 132 - ... NAME_uc_hash is undefined
ok 133 - ... NAME_lc_hash is undefined
ok 134 - ... $dbh can call "prepare"
ok 135 - ... $dbh cannot call "nonesuch"
ok 136 - ... $sth can call "execute"
ok 137 - ... our Driver (2) has no Kids after this test
ok
t/zvg_04mods.t .............
1..12
ok 1 - use DBI;
ok 2 - use DBI::Const::GetInfo::ANSI;
ok 3 - use DBI::Const::GetInfo::ODBC;
ok 4 - use DBI::Const::GetInfoType;
ok 5 - use DBI::Const::GetInfoReturn;
ok 6 - ... we have at least one key in the GetInfoType hash
ok 7 - ... the GetInfoType hash is constructed from the ANSI and ODBC hashes
ok 8 - ... we have at least one key in the GetInfoReturnType hash
ok 9 - ... the GetInfoReturnType hash is constructed from the ANSI and ODBC hashes
ok 10 - ... we have at least one key in the GetInfoReturnValues hash
ok 11 - DBI::Const::GetInfoReturn->can('Format')
ok 12 - DBI::Const::GetInfoReturn->can('Explain')
ok
t/zvg_05concathash.t .......
1..41
ok 1 - use DBI;
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9 - should work with nul bytes in kv_sep and pair_sep
ok 10 - should work with nul bytes in hash value (neat)
ok 11 - should work with nul bytes in hash value (not neat)
ok 12
ok 13
ok 14
ok 15 - test
ok 16 - test
ok 17 - Unknown sort order
ok 18 - Float Hash - Not Neat lexical
ok 19 - Numeric - Not Neat lexical
ok 20 - Mixed Hash - Not Neat lexical
ok 21 - Simple Hash - Not Neat lexical
ok 22 - Float Hash - Neat lexical
ok 23 - Numeric - Neat lexical
ok 24 - Mixed Hash - Neat lexical
ok 25 - Simple Hash - Neat lexical
ok 26 - Float Hash - Not Neat guess
ok 27 - Numeric - Not Neat guess
ok 28 - Mixed Hash - Not Neat guess
ok 29 - Simple Hash - Not Neat guess
ok 30 - Float Hash - Neat guess
ok 31 - Numeric - Neat guess
ok 32 - Mixed Hash - Neat guess
ok 33 - Simple Hash - Neat guess
ok 34 - Float Hash - Not Neat numeric
ok 35 - Numeric - Not Neat numeric
ok 36 - Mixed Hash - Not Neat numeric
ok 37 - Simple Hash - Not Neat numeric
ok 38 - Float Hash - Neat numeric
ok 39 - Numeric - Neat numeric
ok 40 - Mixed Hash - Neat numeric
ok 41 - Simple Hash - Neat numeric
ok
t/zvg_06attrs.t ............
1..145
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking Warn attribute for dbh
ok 4 - ... checking Active attribute for dbh
ok 5 - ... checking AutoCommit attribute for dbh
ok 6 - ... checking CompatMode attribute for dbh
ok 7 - ... checking InactiveDestory attribute for dbh
ok 8 - ... checking PrintError attribute for dbh
ok 9 - ... checking PrintWarn attribute for dbh
ok 10 - ... checking RaiseError attribute for dbh
ok 11 - ... checking ShowErrorStatement attribute for dbh
ok 12 - ... checking ChopBlanks attribute for dbh
ok 13 - ... checking LongTrunkOk attribute for dbh
ok 14 - ... checking TaintIn attribute for dbh
ok 15 - ... checking TaintOut attribute for dbh
ok 16 - ... checking Taint attribute for dbh
ok 17 - ... checking Executed attribute for dbh
ok 18 - ... checking ErrCount attribute for dbh
ok 19 - ... checking Kids attribute for dbh
ok 20 - ... checking ActiveKids attribute for dbh
ok 21 - ... checking CachedKids attribute for dbh
ok 22 - ... checking HandleError attribute for dbh
ok 23 - ... checking Profile attribute for dbh
ok 24 - ... checking Statement attribute for dbh
ok 25 - ... checking RowCacheSize attribute for dbh
ok 26 - ... checking ReadOnly attribute for dbh
ok 27 - ... checking FetchHashKeyName attribute for dbh
ok 28
ok 29 - ... checking TraceLevel attribute for dbh
ok 30 - ... checking LongReadLen attribute for dbh
ok 31 - should be able to FETCH_many
ok 32 - should see driver-private dbh attribute value
ok 33 - ... catching exception
ok 34 - ... $dbh->err is undefined
ok 35 - ... checking $dbh->errstr
ok 36 - ... checking $dbh->state
ok 37 - ... checking Executed attribute for dbh
ok 38 - ... checking Executed attribute for dbh (after reset)
ok 39 - ... checking ErrCount attribute for dbh (after error was generated)
ok 40 - The object isa DBI::dr
ok 41 - ... checking $dbh->err
ok 42 - ... checking ErrCount attribute for drh
ok 43 - ... checking Warn attribute for drh
ok 44 - ... checking Active attribute for drh
ok 45 - ... checking AutoCommit attribute for drh
ok 46 - ... checking CompatMode attribute for drh
ok 47 - ... checking InactiveDestory attribute for drh
ok 48 - ... checking PrintError attribute for drh
ok 49 - ... checking PrintWarn attribute for drh
ok 50 - ... checking RaiseError attribute for drh
ok 51 - ... checking ShowErrorStatement attribute for drh
ok 52 - ... checking ChopBlanks attribute for drh
ok 53 - ... checking LongTrunkOk attribute for drh
ok 54 - ... checking TaintIn attribute for drh
ok 55 - ... checking TaintOut attribute for drh
ok 56 - ... checking Taint attribute for drh
ok 57 - ... checking Executed attribute for drh
ok 58 - ... checking Kids attribute for drh
ok 59 - ... checking ActiveKids attribute for drh
ok 60 - ... checking CachedKids attribute for drh
ok 61 - ... checking HandleError attribute for drh
ok 62 - ... checking Profile attribute for drh
ok 63 - ... checking ReadOnly attribute for drh
ok 64 - ... checking TraceLevel attribute for drh
ok 65 - ... checking LongReadLen attribute for drh
ok 66 - ... checking FetchHashKeyName attribute for drh
ok 67
ok 68 - The object isa DBI::st
ok 69 - ... checking Executed attribute for sth
ok 70 - ... checking Executed attribute for dbh
ok 71 - ... checking ErrCount attribute for sth
ok 72 - ... checking exception
ok 73 - ... checking $sth->errstr
ok 74 - ... checking $sth->state
ok 75 - ... checking Executed attribute for sth
ok 76 - ... checking Exceuted attribute for dbh
ok 77 - ... checking ErrCount attribute for sth
ok 78 - ... checking exception
ok 79 - ... checking ErrCount attribute for sth (after assignment)
ok 80 - ... checking ErrCount attribute for sth (after reset)
ok 81 - ... checking Warn attribute for sth
ok 82 - ... checking Active attribute for sth
ok 83 - ... checking CompatMode attribute for sth
ok 84 - ... checking InactiveDestroy attribute for sth
ok 85 - ... checking PrintError attribute for sth
ok 86 - ... checking PrintWarn attribute for sth
ok 87 - ... checking RaiseError attribute for sth
ok 88 - ... checking ShowErrorStatement attribute for sth
ok 89 - ... checking ChopBlanks attribute for sth
ok 90 - ... checking LongTrunkOk attribute for sth
ok 91 - ... checking TaintIn attribute for sth
ok 92 - ... checking TaintOut attribute for sth
ok 93 - ... checking Taint attribute for sth
ok 94 - ... checking Kids attribute for sth
ok 95 - ... checking ActiveKids attribute for sth
ok 96 - ... checking CachedKids attribute for sth
ok 97 - ... checking HandleError attribute for sth
ok 98 - ... checking Profile attribute for sth
ok 99 - ... checking ReadOnly attribute for sth
ok 100 - ... checking TraceLevel attribute for sth
ok 101 - ... checking LongReadLen attribute for sth
ok 102 - ... checking FetchHashKeyName attribute for sth
ok 103 - ... checking CursorName attribute for sth
ok 104 - ... checking NUM_OF_FIELDS attribute for sth
ok 105 - ... checking NUM_OF_PARAMS attribute for sth
ok 106 - ... checking type of NAME attribute for sth
ok 107 - ... checking number of elements returned
ok 108 - ... checking values returned
ok 109 - ... checking type of NAME_lc attribute for sth
ok 110 - ... checking number of elements returned
ok 111 - ... checking values returned
ok 112 - ... checking type of NAME_uc attribute for sth
ok 113 - ... checking number of elements returned
ok 114 - ... checking values returned
ok 115 - ... checking type of NAME_hash attribute for sth
ok 116 - ... checking number of keys returned
ok 117 - ... checking values returned
ok 118 - ... checking values returned
ok 119 - ... checking type of NAME_lc_hash attribute for sth
ok 120 - ... checking number of keys returned
ok 121 - ... checking values returned
ok 122 - ... checking values returned
ok 123 - ... checking type of NAME_uc_hash attribute for sth
ok 124 - ... checking number of keys returned
ok 125 - ... checking values returned
ok 126 - ... checking values returned
ok 127 - ... checking type of TYPE attribute for sth
ok 128 - ... checking number of elements returned
ok 129 - ... checking values returned
ok 130 - ... checking type of NULLABLE attribute for sth
ok 131 - ... checking number of elements returned
ok 132 - ... checking values returned
ok 133 - ... checking type of PRECISION attribute for sth
ok 134 - ... checking number of elements returned
ok 135 - ... checking values returned
ok 136 - ... checking type of SCALE attribute for sth
ok 137 - ... checking number of elements returned
ok 138 - ... checking values returned
ok 139 - ... checking type of ParamValues attribute for sth
ok 140 - ... checking values returned
ok 141 - ... checking Statement attribute for sth
ok 142 - ... checking type of RowsInCache attribute for sth
ok 143 - should see driver-private sth attribute value
Checking inheritance
ok 144 # skip drh->dbh->sth inheritance test skipped with DBI_AUTOPROXY
ok 145 # skip drh->dbh->sth inheritance test skipped with DBI_AUTOPROXY
ok
t/zvg_07kids.t .............
1..20
ok 1 - The object isa DBI::db
ok 2 - ... database handle has 0 Kid(s) at start
ok 3 - ... database handle has 0 ActiveKid(s) at start
ok 4 - The object isa DBI::st
ok 5 - ... database handle has 1 Kid(s) after $dbh->prepare
ok 6 - ... database handle has 0 ActiveKid(s) after $dbh->prepare
ok 7 - ... database handle has 1 Kid(s) after $sth->execute
ok 8 - ... database handle has 1 ActiveKid(s) after $sth->execute
ok 9 - ... database handle has 1 Kid(s) after $sth->finish
ok 10 - ... database handle has 0 ActiveKid(s) after $sth->finish
ok 11 - ... database handle has 0 Kid(s) after $sth is destroyed
ok 12 - ... database handle has 0 ActiveKid(s) after $sth is destroyed
ok 13 - The object isa DBI::dr
ok 14 - ... driver handle has 1 Kid(s)
ok 15 - ... driver handle has 1 ActiveKid(s)
ok 16 - ... driver handle has 1 Kid(s) after $dbh->disconnect
ok 17 - ... driver handle has 0 ActiveKid(s) after $dbh->disconnect
ok 18 - ... lets be sure that $dbh is not undefined
ok 19 - ... driver handle has 0 Kid(s) after undef $dbh
ok 20 - ... driver handle has 0 ActiveKid(s) after undef $dbh
ok
t/zvg_08keeperr.t ..........
1..69
ok 1 - use DBI;
ok 2 - ... checking error
ok 3 - ... checking error
Test HandleSetErr
ok 4 - The object isa DBI::db
ok 5 - ... $DBI::err is not defined
HandleSetErr called: h=DBI::db=HASH(0x5705e8), err=, errstr=(got info), state=
ok 6 - ... $DBI::err is defined
ok 7 - ... $DBI::err is an empty string
ok 8 - ... $DBI::errstr is as we expected
ok 9 - ... $dbh->errstr matches $DBI::errstr
ok 10 - ... $warn{failed} is 0
ok 11 - ... $warn{warning} is 0
ok 12 - ... the @handlewarn array is (1, 0, 0)
HandleSetErr called: h=DBI::db=HASH(0x5705e8), err=0, errstr=(got warn), state=AA001
warn: 'DBD::Gofer::db set_err warning: (got info)\n(got warn) at ./t/08keeperr.t line 131.\n'
ok 13 - ... $DBI::err is defined
ok 14 - ... $DBI::err is "0"
ok 15 - ... $DBI::errstr is as we expected
ok 16 - ... $dbh->errstr matches $DBI::errstr
ok 17 - ... $DBI::state is AA001
ok 18 - ... $warn{warning} is 1
ok 19 - ... the @handlewarn array is (1, 1, 0)
HandleSetErr called: h=DBI::db=HASH(0x5705e8), err=, errstr=(got more info), state=
warn: 'DBD::Gofer::db set_err warning: (got info)\n(got warn)\n(got more info) at ./t/08keeperr.t line 146.\n'
ok 20 - ... $DBI::err is defined
ok 21 - ... $DBI::err is "0"
ok 22 - ... $dbh->err is "0"
ok 23 - ... $DBI::state is AA001
ok 24 - ... $DBI::errstr is as we expected
ok 25 - ... $dbh->errstr matches $DBI::errstr
ok 26 - ... $warn{warning} is 2
ok 27 - ... the @handlewarn array is (2, 1, 0)
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error) at ./t/08keeperr.t line 167.\n'
ok 28 - ... $DBI::err is defined
ok 29 - ... $DBI::err is 42
ok 30 - ... $warn{warning} is 2
ok 31 - ... $dbh->errstr is as we expected
ok 32 - ... $DBI::state is AA002
ok 33 - ... the @handlewarn array is (2, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x5705e8), err=, errstr=(got info), state=
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info) at ./t/08keeperr.t line 179.\n'
ok 34 - ... $DBI::err is defined
ok 35 - ... $DBI::err is 42
ok 36 - ... $warn{warning} is 2
ok 37 - ... $dbh->errstr is as we expected
ok 38 - ... the @handlewarn array is (3, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x5705e8), err=0, errstr=(got warn), state=
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) at ./t/08keeperr.t line 190.\n'
ok 39 - ... $DBI::err is defined
ok 40 - ... $DBI::err is 42
ok 41 - ... $warn{warning} is 2
ok 42 - ... $dbh->errstr is as we expected
ok 43 - ... the @handlewarn array is (3, 2, 1)
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) [err was 42 now 4200] [state was AA002 now AA003]\n(got new error) at ./t/08keeperr.t line 201.\n'
ok 44 - ... $DBI::err is defined
ok 45 - ... $DBI::err is 4200
ok 46 - ... $warn{warning} is 2
ok 47 - ... $dbh->errstr is as we expected
ok 48 - ... the @handlewarn array is (3, 2, 2)
ok 49 - ... $dbh->errstr is defined
ok 50 - ... $dbh->err is defined
ok 51 - ... $dbh->state is an empty string
warn: 'DBD::Gofer::db set_err failed: foo at ./t/08keeperr.t line 226.\n'
ok 52 - ... only returned one value
ok 53 - ... the first value is undefined
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar at ./t/08keeperr.t line 230.\n'
ok 54 - ... $dbh->set_err returned undefiend
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz at ./t/08keeperr.t line 231.\n'
ok 55 - ... $dbh->set_err returned undefiend
HandleSetErr called: h=DBI::db=HASH(0x5705e8), err=0, errstr=warn, state=
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz\nwarn at ./t/08keeperr.t line 232.\n'
ok 56 - ... $dbh->set_err returned undefiend
ok 57 - ... $dbh->errstr is as we expected
ok 58 - ... $warn{failed} is 4
ok 59 - ... the @handlewarn array is (0, 1, 3)
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 242.\n'
ok 60 - ... only returned one value
ok 61 - ... the first value is undefined
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 246.\n'
ok 62 - ... only returned one value
ok 63 - ... the first value is "42"
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 250.\n'
ok 64 - ... returned no values
HandleSetErr called: h=DBI::db=HASH(0x5705e8), err=, errstr=info, state=override
warn: 'DBD::Gofer::db set_err failed: errstr99 at ./t/08keeperr.t line 257.\n'
ok 65 - ... only returned one value
ok 66 - ... the first value is undefined
ok 67 - ... $dbh->err is 99
ok 68 - ... $dbh->errstr is as we expected
ok 69 - ... $dbh->state is as we expected
ok
t/zvg_09trace.t ............
1..67
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - trace file size = 11207
ok 4 - ... checking TraceLevel attribute
ok 5 - ... trace file successfully created
parse_trace_flag SQL
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
parse_trace_flag foo
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
parse_trace_flag bar
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
parse_trace_flag baz
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
parse_trace_flag boo
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
parse_trace_flag bop
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53
parse_trace_flag SQL foo bar baz boo bop
ok 54 - ...
ok 55 - ...
inherit
ok 56 - The object isa DBI::st
ok 57
ok 58
ok 59
test unknown parse_trace_flag
ok 60
ok 61
caught warn: DBI::db=HASH(0x59eff8)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/lib/DBI/Gofer/Execute.pm line 329
ok 62
ok 63
caught warn: DBI::db=HASH(0x5a14a8)->parse_trace_flags(nonesuch|SQL|nonesuch2) ignored unknown trace flags: 'nonesuch' 'nonesuch2' at /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/lib/DBI/Gofer/Execute.pm line 329
ok 64
ok 65
ok 66
ok 67
ok
t/zvg_10examp.t ............
1..210
ok 1 - connect should fail
ok 2 - ... we should have an exception here
ok 3 - ... $dbh2 should not be defined
ok 4
ok 5
ok 6 - ... these 2 handles are cached, so they are the same
ok 7
ok 8 - ... this handle was created with different parameters, so it is not the same
ok 9
ok 10 - Executed should be true
ok 11
ok 12 - should return same handle
ok 13 - Executed should be false because reset by connect attributes
ok 14 - The object isa DBI::dr
ok 15 - ... these are our cached kids
ok 16 - ... we have emptied out cache
ok 17
ok 18 - ... PrintError should be 0
ok 19 - ... FetchHashKey is NAME
ok 20 - ... checking the example driver_path
others
ok 21 - DBI commit: invalid number of arguments: got handle + 1, expected handle + between 0 and 0
# Usage: $h->commit() at ./t/10examp.t line 87.
#
ok 22 - ping should return true
ok 23 - prepare should fail
ok 24 - sth->err should be true
ok 25 - DBI::err should be true
ok 26 - $DBI::err should match $dbh->err
ok 27 - $DBI::errstr should contain error string
ok 28 - $DBI::errstr should match $dbh->errstr
ok 29
ok 30
ok 31
ok 32
ok 33 - DBI::db=HASH(0x497360) ne DBI::db=HASH(0x497360)
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53 - errstr should contain error message
ok 54
ok 55 - errstr should contain error message
ok 56
ok 57
ok 58 - errstr should contain error message
ok 59
ok 60 - errstr should contain error message
ok 61
ok 62
ok 63
ok 64
ok 65
ok 66
ok 67
ok 68
fetchrow_hashref('NAME_uc')
ok 69
ok 70
ok 71
ok 72
ok 73
fetchrow_hashref('ParamValues')
ok 74
ok 75
FetchHashKeyName
ok 76
ok 77
ok 78
ok 79
ok 80
ok 81
fetchall_arrayref
ok 82
ok 83
ok 84
ok 85
ok 86
ok 87
fetchall_arrayref array slice
ok 88
ok 89
ok 90
ok 91
fetchall_arrayref hash slice
ok 92
ok 93
ok 94
ok 95
fetchall_arrayref hash
ok 96
ok 97
ok 98
ok 99 - '16877 1024 .' ne '16877 1024 .'
rows()
ok 100 - row count 44
ok 101 - 44 vs 44
ok 102 - 44 vs 44
fetchall_arrayref array slice and max rows
ok 103
ok 104
ok 105
selectrow_array
ok 106
ok 107
selectrow_hashref
ok 108
ok 109
ok 110
ok 111
selectall_arrayref
ok 112
ok 113
ok 114
ok 115
selectall_arrayref Slice array slice
ok 116
ok 117
ok 118 - ". 16877" eq ". 16877"
ok 119
selectall_arrayref Columns array slice
ok 120
ok 121
ok 122 - ". 16877" eq ". 16877"
ok 123
selectall_arrayref hash slice
ok 124
ok 125
ok 126
ok 127
ok 128
ok 129
ok 130
selectall_hashref
ok 131 - selectall_hashref result
ok 132 - selectall_hashref HASH: HASH
ok 133
ok 134 - 1024 eq 1024
selectall_hashref by column number
ok 135
ok 136 - 1024 eq 1024
selectcol_arrayref
ok 137
ok 138
ok 139
selectcol_arrayref column slice
ok 140
ok 141
ok 142
ok 143
others...
ok 144
ok 145
RaiseError & PrintError & ShowErrorStatement
ok 146
ok 147
ok 148
ok 149
ok 150
ok 151
ok 152
ok 153
ok 154
ok 155
ok 156
ok 157
ok 158
ok 159
ok 160
ok 161 - DBD::Gofer::st execute failed: 2 values bound when 1 expected; DBD::ExampleP::st execute failed at blib/lib/DBI/Gofer/Execute.pm line 451. [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at ./t/10examp.t line 366.
#
ok 162 - DBD::Gofer::st execute failed: 2 values bound when 1 expected; DBD::ExampleP::st execute failed at blib/lib/DBI/Gofer/Execute.pm line 451. [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at ./t/10examp.t line 366.
#
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168
HandleError
ok 169
ok 170
HandleError -> die
ok 171
ok 172 - HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. [h=DBI::db=HASH(0x497360), rv=undef, \#=3] at ./t/10examp.t line 395.
#
HandleError -> 0 -> RaiseError
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. [h=DBI::db=HASH(0x497360), rv=undef, #=3]
ok 173
ok 174 - DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. at ./t/10examp.t line 416.
#
HandleError -> 1 -> return (original)undef
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. [h=DBI::db=HASH(0x497360), rv=undef, #=3]
ok 175 -
ok 176
HandleError -> 2 -> return (modified)42
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. [h=DBI::db=HASH(0x497360), rv=undef, #=3]
ok 177 -
ok 178
ok 179
ok 180 - The object isa DBI::st
ok 181
ok 182
ok 183
ok 184 - Remove dumpcsr.tst
ok 185 - Actually gone
table_info
ok 186
Local /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE subdirs: lib ex .. . blib t
ok 187
ok 188
ok 189
tables
ok 190 - Table count mismatch5 vs 5
ok 191 - "schema"."table" ne "schema"."table"
ok 192 - "sch-ema"."table" ne "sch-ema"."table"
ok 193 - "schema"."ta-ble" ne "schema"."ta-ble"
ok 194 - "sch ema"."table" ne "sch ema"."table"
ok 195 - "schema"."ta ble" ne "schema"."ta ble"
Testing the fake directories (0).
ok 196
ok 197
ok 198 - 0 rows instead of 0
ok 199
Testing the fake directories (100).
ok 200
ok 201
ok 202 - 100 rows instead of 100
ok 203 - 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
Testing the fake directories (200).
ok 204
ok 205
ok 206 - 200 rows instead of 200
ok 207 - 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
Testing $dbh->func().
ok 208
ok 209
ok 210 - ping should return false after disconnect
ok
t/zvg_11fetch.t ............
1..24
# fetchall_hashref(C1)
ok 1
ok 2
ok 3
ok 4
# fetchall_hashref(C2)
ok 5
ok 6
ok 7
ok 8
# fetchall_hashref([C2])
ok 9
ok 10
ok 11
ok 12
# fetchall_hashref([C1 C2])
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok
t/zvg_12quote.t ............
1..10
ok 1 - ... quoting strings with embedded single quotes
ok 2 - ... quoting number as SQL_VARCHAR
ok 3 - ... quoting number as SQL_INTEGER
ok 4 - ... quoting undef as NULL
ok 5 - ... properly quotes foo as "foo"
ok 6 - ... properly quotes f"o as "f""o"
ok 7 - ... properly quotes foo, bar as "foo"."bar"
ok 8 - ... properly quotes undef, undef, bar as "bar"
ok 9 - ... properly quotes foo, undef, bar as "foo"."bar"
ok 10 # skip Can't test alternate quote_identifier logic with DBI_AUTOPROXY
ok
t/zvg_13taint.t ............ skipped: Taint attribute tests not functional with DBI_AUTOPROXY
t/zvg_14utf8.t .............
1..16
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok
t/zvg_15array.t ............
1..55
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - The object isa DBI::st
ok 4 - ... we should have 0 rows
ok 5 - ... execute_array should return false
ok 6 - execute_array failure with RaiseError should have died
ok 7
ok 8 - ... we should have 2 rows
ok 9 - ... we should have 3 tuple_status
ok 10 - ... our rows are as expected
ok 11 - ... our tuple_status is as expected
ok 12 - ... bind_param_array should return true
ok 13 - ... execute_array should return true
ok 14 - ... we should have 3 rows
ok 15 - ... we should have 3 tuple_status
ok 16 - ... our rows are as expected
ok 17 - ... our tuple_status is as expected
ok 18 - ... execute_array should return true
ok 19 - ... we should have executed 3 rows
ok 20 - ... we should have affected 3 rows
ok 21 - ... execute_array should return true
ok 22 - ... execute_array should return 0 (but true)
ok 23 - ... we should have 0 rows
ok 24 - ... we should have 0 tuple_status
ok 25 - ... execute_array should return 1
ok 26 - ... we should have 1 rows
ok 27 - ... our rows are as expected
ok 28 - ... we should have 1 tuple_status
ok 29 - ... our tuple_status is as expected
ok 30 - ... execute_array should return 0
ok 31 - ... we should have 0 rows
ok 32 - ... we should have 0 tuple_status
ok 33 - The object isa DBI::st
ok 34 - ... execute_array should return true
ok 35 - ... execute_array should return 0 (but true)
ok 36 - ... we should have 0 rows
ok 37 - ... execute_array should return true
ok 38 - ... we should have 2 rows
ok 39 - ... we should have 2 tuple_status
ok 40 - ... rows should match
ok 41 - ... tuple_status should match
ok 42 - The object isa DBI::st
ok 43 - ... execute_array should return true
ok 44 - ... we should have 3 rows
ok 45 - ... we should have 3 tuple_status
ok 46 - ... rows should match
ok 47 - ... tuple status should match
ok 48 - ... execute_array should return undef
ok 49 - ... errstr is as expected
ok 50 - ... execute_array should return undef
ok 51 - ... errstr is as expected
ok 52 - ... execute_array should return undef
ok 53 - ... errstr is as expected
ok 54 - ... bind_param_array should return undef
ok 55 - ... errstr is as expected
ok
t/zvg_19fhtrace.t ..........
1..27
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking TraceLevel attribute
ok 4 - ... regular fh: trace file successfully created
ok 5 - ... regular fh: filehandle successfully set
ok 6 - ... regular fh: trace_msg
<- trace= 2 at 19fhtrace.t line 196
ok 7 - ... regular fh: file successfully changed
ok 8 - ... regular fh: trace_msg after changing trace output
Next logline
-> trace for DBD::Gofer::db (DBI::db=HASH(0x3e0dc0)~0x3e0c00 0) thr#173f40
<- trace= 2 at 19fhtrace.t line 209
ok 9 - Tracefile removed
ok 10 - Tracefile FOO opened
ok 11 - Tracefile created
ok 12 - Regression test
ok 13 - Traced message
ok 14 - Regression test
ok 15 - ... layered fh: file is layered: *** Test our layer
#
#
ok 16 - ... layered fh: filehandle successfully set
ok 17 - ... layered fh: trace_msg: Layered logline
#
#
<- trace(1, 'STDOUT')= 1 at 19fhtrace.t line 251
ok 18 - ... layered fh: close doesn't close: Layered logline
#
#
ok 19 - ... layered fh: trace_msg after change trace output: Layered logline
#
#
ok 20 - ... scalar trace: file is layered: *** Test our layer
#
#
ok 21 - ... scalar trace: filehandle successfully set
ok 22 - ... scalar trace: *** Test our layer
# <- trace(1, GLOB(0x2322f0))= 1 at 19fhtrace.t line 267
# Layered logline
#
#
Next logline
<- trace(1, 'STDOUT')= 1 at 19fhtrace.t line 273
ok 23 - ... scalar trace: close doesn't close: *** Test our layer
# <- trace(1, GLOB(0x2322f0))= 1 at 19fhtrace.t line 267
# Layered logline
#
#
ok 24 - ... scalar trace: after change trace output: *** Test our layer
# <- trace(1, GLOB(0x2322f0))= 1 at 19fhtrace.t line 267
# Layered logline
#
#
Next logline
-----> execute_request
<- connect('dummy', '', ...)= DBI::db=HASH(0x5abc48) at DBI.pm line 655
<- STORE('RaiseError', 1)= 1 at DBI.pm line 707
<- STORE('PrintError', undef)= 1 at DBI.pm line 707
<- STORE('AutoCommit', 1)= 1 at DBI.pm line 707
<- STORE('PrintWarn', undef)= 1 at DBI.pm line 710
<- FETCH('PrintWarn')= '' at DBI.pm line 710
<- STORE('Username', '')= 1 at DBI.pm line 710
<> FETCH('Username')= '' ('Username' from cache) at DBI.pm line 710
<- STORE('dbi_go_execute_unique', 'DBI::Gofer::Execute|3777|')= 1 at DBI.pm line 710
<> FETCH('dbi_go_execute_unique')= 'DBI::Gofer::Execute|3777|' ('dbi_go_execute_unique' from cache) at DBI.pm line 710
<- STORE('Executed', 0)= 1 at DBI.pm line 710
<- FETCH('Executed')= '' at DBI.pm line 710
<- connected('dbi:ExampleP:dummy', undef, ...)= undef at DBI.pm line 716
<- STORE('dbi_connect_closure', CODE(0x5ab978))= 1 at DBI.pm line 725
<- FETCH('CachedKids')= undef at Execute.pm line 221
<- $DBI::err= undef
<- $DBI::errstr= undef
<- $DBI::state= ''
<- FETCH('Executed')= '' at Execute.pm line 261
<- private_attribute_info= HASH(0x5a8130)1keys at Execute.pm line 413
_std_response_attribute_names for ExampleP dbh: ChopBlanks LongReadLen LongTruncOk ReadOnly Name example_driver_path
<- FETCH_many('ChopBlanks', 'LongReadLen', ...)= ( '' 80 '' undef 'dummy' '/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/lib/DBD/ExampleP.pm' ) [6 items] at Execute.pm line 372
<> FETCH('ImplementorClass')= 'DBD::ExampleP::db' ('ImplementorClass' from cache) at Execute.pm line 561
<- set_err(undef, undef)= undef at Execute.pm line 234
<- FETCH('Active')= 1 at ExampleP.pm line 259
<- disconnect= 1 at ExampleP.pm line 259
<- DESTROY(DBI::db=HASH(5abbf8))= undef at Execute.pm line 312
ok 25 - ... logger: trace_msg
#
<----- execute_request
gofer receive_response
DBI::db=HASH(0x3e0c00) trace level set to 0x0/1 (DBI @ 0x100/0) in DBI 1.611-ithread (pid 3777)
ok 26 - ... logger: close doesn't close
#
ok 27 - ... logger: trace_msg after change trace output
#
Next logline
<- disconnect= 1 at 19fhtrace.t line 157
<- DESTROY(DBI::db=HASH(3e0c00))= undef
ok
t/zvg_20meta.t .............
1..8
ok 1 - use DBI;
ok 2 - use DBI::DBD::Metadata;
ok 3 - The object isa DBI::db
ok 4
ok 5
ok 6
ok 7
ok 8
ok
t/zvg_30subclass.t .........
1..36
ok 1 - use DBI;
ok 2 - The object isa MyDBI::db
ok 3
ok 4 - The object isa MyDBI::db
ok 5
ok 6
ok 7 - The object isa MyDBI::st
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15 - The reference isa ARRAY
ok 16
ok 17
ok 18
ok 19
ok 20 - Clone A isa MyDBI::db
ok 21
ok 22
ok 23 - Clone B isa MyDBI::db
ok 24
ok 25
ok 26 - The object isa MyDBI::db
ok 27
ok 28 - installed method isa ARRAY
ok 29
ok 30
ok 31
ok 32
ok 33 - Failed connect \#1
ok 34
ok 35 - Failed connect \#2
ok 36
fetch 4 prepare 1
ok
t/zvg_35thrclone.t .........
1..20
ok 1 - use DBI;
ok 2 - ... assignment of neat_maxlen was successful
ok 3 - The object isa DBI::db
ok 4 - ... DBI::neat_maxlen still holding its value
ok 5 - The object isa DBI::db
ok 6 - ... new $dbh is not the same instance as $dbh_parent
ok 7 - ... the Driver has one Kid
ok 8 - ... DBI::neat_maxlen still holding its value
ok 9 - The object isa DBI::db
ok 10 - ... new $dbh is not the same instance as $dbh_parent
ok 11 - ... the Driver has one Kid
ok 12 - ... DBI::neat_maxlen still holding its value
ok 13 - The object isa DBI::db
ok 14 - ... new $dbh is not the same instance as $dbh_parent
ok 15 - ... the Driver has one Kid
ok 16 - ... DBI::neat_maxlen still holding its value
ok 17 - The object isa DBI::db
ok 18 - ... new $dbh is not the same instance as $dbh_parent
ok 19 - ... the Driver has one Kid
ok 20 - ... all tests have passed
ok
t/zvg_40profile.t ..........
1..60
Test enabling the profile
ok 1
ok 2
ok 3
ok 4
ok 5
bless( {
'Path' => [
'!MethodName',
'!Caller2'
],
'Data' => {
'do' => {
'40profile.t line 80 via zvg_40profile.t line 3' => [
1,
'0.00375795364379883',
'0.00375795364379883',
'0.00375795364379883',
'0.00375795364379883',
'1273062490.81942',
'1273062490.81942'
]
}
}
}, 'DBI::Profile' )
ok 6
ok 7
ok 8
ok 9
ok 10
dbi_profile
bless( {
'Path' => [
'!Statement',
'!MethodName'
],
'Data' => {
'' => {
'connected' => [
1,
'3.29017639160156e-05',
'3.29017639160156e-05',
'3.29017639160156e-05',
'3.29017639160156e-05',
'1273062490.83443',
'1273062490.83443'
],
'FETCH' => [
1,
'3.09944152832031e-06',
'3.09944152832031e-06',
'3.09944152832031e-06',
'3.09944152832031e-06',
'1273062490.8344',
'1273062490.8344'
],
'STORE' => [
5,
'0.000174045562744141',
'2.88486480712891e-05',
'2.71797180175781e-05',
'6.103515625e-05',
'1273062490.83415',
'1273062490.8345'
]
},
'Hi mom' => {
'my_method_name' => [
1,
'1',
'1',
'1',
'1',
'1273062490.83891',
'1273062490.83891'
]
}
}
}, 'DBI::Profile' )
ok 11
ok 12
ok 13
ok 14 - should return ref to leaf node
ok 15 - should return ref to leaf node
ok 16 - should return ref to correct leaf node
1 1 1 1 1 1273062490.83891 1273062490.83891
ok 17
2 3 1 1 2 1273062490.83891 1273062490.84733
ok 18
Test collected profile data
bless( {
'Path' => [
'!Statement'
],
'Data' => {
'set foo=1' => [
1,
'0.00382518768310547',
'0.00382518768310547',
'0.00382518768310547',
'0.00382518768310547',
'1273062491.5774',
'1273062491.5774'
],
'' => [
7,
'0.000213623046875',
'2.88486480712891e-05',
'2.86102294921875e-06',
'6.19888305664062e-05',
'1273062490.85447',
'1273062490.8548'
],
'select mode,size,name from ?' => [
2351,
'0.686976432800293',
'0.00518202781677246',
'3.50475311279297e-05',
'0.0129640102386475',
'1273062490.85578',
'1273062491.57734'
]
}
}, 'DBI::Profile' )
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
ok 30
ok 31
ok 32
ok 33
ok 34
Test profile format
Profile Output
DBI::Profile: 0.691015s 95.59% (2359 calls) zvg_40profile.t @ 2010-05-05 05:28:11
'' =>
0.000214s / 7 = 0.000031s avg (first 0.000029s, min 0.000003s, max 0.000062s)
'select mode,size,name from ?' =>
0.686976s / 2351 = 0.000292s avg (first 0.005182s, min 0.000035s, max 0.012964s)
'set foo=1' =>
0.003825s
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41 - should have 9 nodes
ok 42
testing '!File', '!Caller' and their variants in Path
ok 43
testing '!Time' and variants in Path
ok 44 - !Time and !Time~1000000 should work
testing &norm_std_n3 in Path
ok 45
ok 46 - &norm_std_n3 should normalize statement
testing code ref in Path
ok 47
ok 48
ok 49 - should be vetoed
ok 50 - $_ should contain statement
ok 51 - should have @_ as keys
ok 52 - should be able to filter by method
ok 53 - output should go to log file
testing as_text
ok 54
ok 55
ok 56
DBI::Profile: 2.000000s 200.00% (203 calls) zvg_40profile.t @ 2010-05-05 05:28:12
'A' =>
'Z' =>
1.000000s / 101 = 0.009901s avg (first 2.000000s, min 3.000000s, max 4.000000s)
'B' =>
'Y' =>
1.000000s / 102 = 0.009804s avg (first 2.000000s, min 3.000000s, max 4.000000s)
dbi_profile_merge_nodes
ok 57
ok 58
ok 59
ok 60
DBI::Profile: 0.000000s 0.00% (12 calls) zvg_40profile.t @ 2010-05-05 05:28:12
'foo' =>
'DESTROY' =>
'baz' =>
0.000000s
'FETCH' =>
'baz' =>
0.000000s
'STORE' =>
'baz' =>
0.000000s / 5 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'connected' =>
'baz' =>
0.000000s
'execute' =>
'baz' =>
0.000000s
'fetchrow_hashref' =>
'baz' =>
0.000000s
'finish' =>
'baz' =>
0.000000s
'prepare' =>
'baz' =>
0.000000s
ok
t/zvg_41prof_dump.t ........
1..15
ok 1 - use DBI;
ok 2 - use DBI::ProfileDumper;
ok 3 - The object isa DBI::db
ok 4 - The object isa DBI::ProfileDumper
ok 5 - The reference isa HASH
ok 6 - The reference isa ARRAY
ok 7 - The object isa DBI::st
ok 8
ok 9 - Profile is on disk and nonzero size
DBI::ProfileDumper 2.009894
Path = [ ]
Program = t/zvg_41prof_dump.t
+ 1
= 7 0.000248908996582031 3.19480895996094e-05 3.09944152832031e-06 8.48770141601562e-05 1273062492.64719 1273062492.64756
+ 1 select mode,size,name from ?
= 2 0.0174121856689453 0.00548911094665527 0.00548911094665527 0.01192307472229 1273062492.65067 1273062492.65686
+ 1
= 1 0.000194072723388672 0.000194072723388672 0.000194072723388672 0.000194072723388672 1273062492.6733 1273062492.6733
+ 1 select mode,size,name from ?
= 47 0.00202631950378418 8.51154327392578e-05 1.21593475341797e-05 8.51154327392578e-05 1273062492.67056 1273062492.67352
ok 10 - Found a version number
ok 11 - Version numbers match in DBI::ProfileDumper 2.009894
#
ok 12 - Found the Path
ok 13 - Found the Program
ok 14
ok 15 # skip developer-only test
ok
t/zvg_42prof_data.t ........
1..31
ok 1 - use DBI::ProfileDumper;
ok 2 - use DBI::ProfileData;
ok 3 - Created connection isa DBI::db
ok 4 - Profile written to disk, non-zero size
ok 5 - The object isa DBI::ProfileData
ok 6 - At least 3 profile data items
ok 7
ok 8
ok 9
ok 10
ok 11 - The object isa DBI::ProfileData
ok 12
ok 13
ok 14 - The object isa DBI::ProfileData
ok 15
ok 16
ok 17
SQL: set dummy=N
SQL:
SQL: select mode,size,name from ?
ok 18
ok 19
ok 20
ok 21 - Created connection isa DBI::db
ok 22 - The object isa DBI::st
ok 23 - The object isa DBI::st
ok 24 - The object isa DBI::st
ok 25 - The object isa DBI::st
ok 26 - The object isa DBI::st
ok 27 - The object isa DBI::st
ok 28 - The object isa DBI::ProfileData
ok 29 - file should be deleted when DeleteFiles set
ok 30
ok 31
ok
t/zvg_43prof_env.t .........
1..11
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7 - $h->{Profile} should be shared
ok 8
ok 9
ok 10
ok 11
DBI::Profile: 0.135934s 13.59% (130 calls) zvg_43prof_env.t @ 2010-05-05 05:28:17
'' =>
'DESTROY' =>
0.000197s / 3 = 0.000066s avg (first 0.000096s, min 0.000016s, max 0.000096s)
'FETCH' =>
0.000556s / 38 = 0.000015s avg (first 0.000041s, min 0.000001s, max 0.000041s)
'FETCH_many' =>
0.000568s / 4 = 0.000142s avg (first 0.000150s, min 0.000138s, max 0.000150s)
'STORE' =>
0.001357s / 42 = 0.000032s avg (first 0.000032s, min 0.000025s, max 0.000079s)
'connect' =>
0.123932s / 6 = 0.020655s avg (first 0.000218s, min 0.000142s, max 0.118980s)
'connected' =>
0.000087s / 6 = 0.000015s avg (first 0.000011s, min 0.000002s, max 0.000036s)
'disconnect' =>
0.000143s / 4 = 0.000036s avg (first 0.000037s, min 0.000035s, max 0.000037s)
'disconnect_all' =>
0.000035s / 2 = 0.000017s avg (first 0.000018s, min 0.000017s, max 0.000018s)
'ping' =>
0.000064s / 2 = 0.000032s avg (first 0.000032s, min 0.000032s, max 0.000032s)
'private_attribute_info' =>
0.000021s / 2 = 0.000010s avg (first 0.000011s, min 0.000010s, max 0.000011s)
'set_err' =>
0.000016s / 2 = 0.000008s avg (first 0.000010s, min 0.000006s, max 0.000010s)
'trace_msg' =>
0.000015s / 2 = 0.000008s avg (first 0.000011s, min 0.000004s, max 0.000011s)
'set dummy=1' =>
'DESTROY' =>
0.000086s
'FETCH' =>
0.000001s / 2 = 0.000000s avg (first 0.000001s, min 0.000000s, max 0.000001s)
'do' =>
0.004640s / 2 = 0.002320s avg (first 0.000362s, min 0.000362s, max 0.004278s)
'private_attribute_info' =>
0.000010s
'set_err' =>
0.000007s
'trace_msg' =>
0.000003s
'set dummy=2' =>
'DESTROY' =>
0.000088s / 2 = 0.000044s avg (first 0.000084s, min 0.000004s, max 0.000084s)
'FETCH' =>
0.000001s / 2 = 0.000000s avg (first 0.000001s, min 0.000000s, max 0.000001s)
'do' =>
0.004088s / 2 = 0.002044s avg (first 0.000248s, min 0.000248s, max 0.003840s)
'private_attribute_info' =>
0.000009s
'set_err' =>
0.000006s
'trace_msg' =>
0.000004s
ok
t/zvg_50dbm.t ..............
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable
Test count: 1 x 3 x 14 = 42
1..42
--- Using SDBM_File () ---
DBD::DBM 0.04 using SDBM_File
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 1
ok 2 - The object isa DBI::db
ok 3 # skip Can't set attributes after connect using DBD::Gofer
ok 4 # skip Can't set attributes after connect using DBD::Gofer
ok 5
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
INSERT INTO SDBM_File_fruit VALUES (3, NULL )
INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
INSERT INTO SDBM_File_fruit VALUES (?,?); #5,via placeholders
UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
SELECT * FROM SDBM_File_fruit
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
DBD::DBM 0.04 using SDBM_File + MLDBM + Data::Dumper
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 15
ok 16 - The object isa DBI::db
ok 17 # skip Can't set attributes after connect using DBD::Gofer
ok 18 # skip Can't set attributes after connect using DBD::Gofer
ok 19
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
INSERT INTO SDBM_File_fruit VALUES (2,'apples' , 0 )
INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
INSERT INTO SDBM_File_fruit VALUES (?,?,?); #5,via placeholders,15
UPDATE SDBM_File_fruit SET qux='12' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dKey=4
SELECT dKey,qux FROM SDBM_File_fruit
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
DBD::DBM 0.04 using SDBM_File + MLDBM + Storable
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 29
ok 30 - The object isa DBI::db
ok 31 # skip Can't set attributes after connect using DBD::Gofer
ok 32 # skip Can't set attributes after connect using DBD::Gofer
ok 33
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
INSERT INTO SDBM_File_fruit VALUES (2,'apples' , 0 )
INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
INSERT INTO SDBM_File_fruit VALUES (?,?,?); #5,via placeholders,15
UPDATE SDBM_File_fruit SET qux='12' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dKey=4
SELECT dKey,qux FROM SDBM_File_fruit
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
DROP TABLE SDBM_File_fruit
ok
t/zvg_60preparse.t .........
1..39
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok
t/zvg_65transact.t ......... skipped: Transactions not supported by DBD::Gofer
t/zvg_70callbacks.t ........
1..63
ok 1 - Create dbh
ok 2 - Callbacks initially undef
ok 3
ok 4 - Callbacks can be set to a hash ref
ok 5 - Callbacks set to same hash ref
ok 6 - Callbacks set to undef again
ok 7
ok 8
ok 9
ok 10 - $_ holds method name
ok 11 - @_ holds 1 values
ok 12 - first is $dbh
ok 13
ok 14
ok 15 - $_ not altered by callback
ok 16 - $_ holds method name
ok 17 - @_ holds 1 values
ok 18 - first is $dbh
ok 19
ok 20
ok 21
ok 22 - fallback callback
ok 23 - @_ holds 4 values
ok 24 - first is $dbh
ok 25
ok 26
ok 27
ok 28
ok 29 - quote_identifier callback caused fatal error
ok 30 - param modified by callback - not recommended!
ok 31
ok 32 - You can't disconnect that easily!
#
ok 33
ok 34
ok 35
ok 36 - should return a single value in list context
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42 - intercepted commit should return undef
ok 43
ok 44
ok 45
ok 46 - Create handle with callbacks
ok 47 - no callback for plain connect
ok 48 - Create handle with callbacks
ok 49 - connect_cached.new called
ok 50 - connect_cached.reused not yet called
ok 51 - Create handle with callbacks
ok 52 - connect_cached.reused called
ok 53 - connect_cached.new not called again
ok 54 - Create handle with ChildCallbacks
ok 55 - Ping
ok 56 - Ping callback should have been called
ok 57 - Prepare a statement handle (child)
ok 58 - child should have Callbacks
ok 59 - child Callbacks should be ChildCallbacks of parent
ok 60 - Execute
ok 61 - Execute callback should have been called
ok 62 - Fetch
ok 63 - Fetch callback should have been called
ok
t/zvg_72childhandles.t .....
1..16
ok 1
ok 2
ok 3
ok 4
ok 5 - All handles should be undef now
ok 6 - ChildHandles should be an array-ref if wekref is available
ok 7
drh DBI::dr=HASH(0x426ad8)
dbh DBI::db=HASH(0x595e90)
sth DBI::st=HASH(0x568ad8)
sth DBI::st=HASH(0x426d78)
sth DBI::st=HASH(0x595d50)
ok 8
ok 9
ok 10
ok 11
ok 12 - handles should be gone now
ok 13
ok 14
ok 15 # skip slow tests avoided when using DBD::Gofer
ok 16 # skip slow tests avoided when using DBD::Gofer
ok
t/zvg_80proxy.t ............ skipped: modules required for proxy are probably not installed (e.g., RPC/PlClient.pm)
t/zvg_85gofer.t ............
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x6cf698)
ok 20 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 21 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 22 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x6eb420)
ok 46 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 47 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 48 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x6f03a0)
ok 72 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 73 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 74 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
# =============
# Testing pipeone transport with pedantic policy
# dbi:Gofer:transport=pipeone;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 79 - should connect to dbi:Gofer:transport=pipeone;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 80
ok 81
ok 82
ok 83 - should detect prepare failure
ok 84
ok 85
ok 86
ok 87
ok 88
ok 89
ok 90 - go_response executed flag should be true
ok 91
ok 92
ok 93
ok 94
# Testing go_request_count and caching of simple values
ok 95
ok 96
ok 97
# use_remote=1 (policy=pedantic, transport=pipeone) HASH(0x728db0)
ok 98 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 99 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 100 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 101 # skip caching of metadata methods returning sth not yet implemented
ok 102 # skip caching of metadata methods returning sth not yet implemented
ok 103
ok 104
# =============
# Testing pipeone transport with classic policy
# dbi:Gofer:transport=pipeone;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 105 - should connect to dbi:Gofer:transport=pipeone;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 106
ok 107
ok 108
ok 109 - The object isa DBI::st
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116 - go_response executed flag should be true
ok 117
ok 118
ok 119
ok 120
# Testing go_request_count and caching of simple values
ok 121
ok 122
ok 123
# use_remote=0 (policy=classic, transport=pipeone) HASH(0x72c5d0)
ok 124 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 125 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 126 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 127 # skip caching of metadata methods returning sth not yet implemented
ok 128 # skip caching of metadata methods returning sth not yet implemented
ok 129
ok 130
# =============
# Testing pipeone transport with rush policy
# dbi:Gofer:transport=pipeone;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 131 - should connect to dbi:Gofer:transport=pipeone;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 132
ok 133
ok 134
ok 135 - The object isa DBI::st
ok 136
ok 137
ok 138
ok 139
ok 140
ok 141
ok 142 - go_response executed flag should be true
ok 143
ok 144
ok 145
ok 146
# Testing go_request_count and caching of simple values
ok 147
ok 148
ok 149
# use_remote=0 (policy=rush, transport=pipeone) HASH(0x7318e0)
ok 150 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 151 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 152 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 153 # skip caching of metadata methods returning sth not yet implemented
ok 154 # skip caching of metadata methods returning sth not yet implemented
ok 155
ok 156
# =============
# Testing stream transport with pedantic policy
# dbi:Gofer:transport=stream;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 157 - should connect to dbi:Gofer:transport=stream;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 158
ok 159
ok 160
ok 161 - should detect prepare failure
ok 162
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168 - go_response executed flag should be true
ok 169
ok 170
ok 171
ok 172
# Testing go_request_count and caching of simple values
ok 173
ok 174
ok 175
# use_remote=1 (policy=pedantic, transport=stream) HASH(0x74f1a8)
ok 176 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 177 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 178 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 179 # skip caching of metadata methods returning sth not yet implemented
ok 180 # skip caching of metadata methods returning sth not yet implemented
ok 181
ok 182
# =============
# Testing stream transport with classic policy
# dbi:Gofer:transport=stream;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 183 - should connect to dbi:Gofer:transport=stream;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 184
ok 185
ok 186
ok 187 - The object isa DBI::st
ok 188
ok 189
ok 190
ok 191
ok 192
ok 193
ok 194 - go_response executed flag should be true
ok 195
ok 196
ok 197
ok 198
# Testing go_request_count and caching of simple values
ok 199
ok 200
ok 201
# use_remote=0 (policy=classic, transport=stream) HASH(0x755888)
ok 202 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 203 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 204 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 205 # skip caching of metadata methods returning sth not yet implemented
ok 206 # skip caching of metadata methods returning sth not yet implemented
ok 207
ok 208
# =============
# Testing stream transport with rush policy
# dbi:Gofer:transport=stream;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 209 - should connect to dbi:Gofer:transport=stream;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 210
ok 211
ok 212
ok 213 - The object isa DBI::st
ok 214
ok 215
ok 216
ok 217
ok 218
ok 219
ok 220 - go_response executed flag should be true
ok 221
ok 222
ok 223
ok 224
# Testing go_request_count and caching of simple values
ok 225
ok 226
ok 227
# use_remote=0 (policy=rush, transport=stream) HASH(0x752fb0)
ok 228 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 229 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 230 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 231 # skip caching of metadata methods returning sth not yet implemented
ok 232 # skip caching of metadata methods returning sth not yet implemented
ok 233
ok 234
1..234
ok
t/zvg_86gofer_fail.t ....... skipped: Gofer DBI_AUTOPROXY
t/zvg_87gofer_cache.t ...... skipped: Gofer DBI_AUTOPROXY
t/zvg_90sql_type_cast.t ....
1..39
ok 1 - result, undef
ok 2 - json undef
ok 3 - discard works, undef
ok 4 - result, invalid sql type
ok 5 - json invalid sql type
ok 6 - result, non numeric cast to int
ok 7 - json non numeric cast to int
ok 8 - result, non numeric cast to int (strict)
ok 9 - json non numeric cast to int (strict)
ok 10 - result, small int cast to int
ok 11 - json small int cast to int
ok 12 - result, 2 byte max signed int cast to int
ok 13 - json 2 byte max signed int cast to int
ok 14 - result, 2 byte max unsigned int cast to int
ok 15 - json 2 byte max unsigned int cast to int
ok 16 - result, 4 byte max signed int cast to int
ok 17 - json 4 byte max signed int cast to int
ok 18 - result, 4 byte max unsigned int cast to int
ok 19 - json 4 byte max unsigned int cast to int
ok 20 - result, small int cast to int (discard)
ok 21 - json small int cast to int (discard)
ok 22 - discard works, small int cast to int (discard)
ok 23 - result, non numeric cast to numeric
ok 24 - json non numeric cast to numeric
ok 25 - result, non numeric cast to numeric (strict)
ok 26 - json non numeric cast to numeric (strict)
ok 27 - result, very large int cast to int
ok 28 - json very large int cast to int
ok 29 - result, very large int cast to int (strict)
ok 30 - json very large int cast to int (strict)
ok 31 - result, float cast to int
ok 32 - json float cast to int
ok 33 - result, float cast to int (strict)
ok 34 - json float cast to int (strict)
ok 35 - result, float cast to double
ok 36 - json float cast to double
ok 37 - nv defined float cast to double
ok 38 - result, 4 byte max unsigned int cast to int (ivsize=4)
ok 39 - json 4 byte max unsigned int cast to int (ivsize=4)
ok
t/zvp_01basics.t ...........
1..130
ok 1 - use DBI;
ok 2 - ... testing sql_type
ok 3 - ... testing sql_type
ok 4 - ... testing sql_type
ok 5 - ... testing sql_type
ok 6 - ... testing sql_type
ok 7 - ... testing sql_type
ok 8 - ... testing sql_type
ok 9 - ... testing sql_type
ok 10 - ... testing sql_type
ok 11 - ... testing sql_type
ok 12 - ... testing sql_type
ok 13 - ... testing sql_type
ok 14 - ... testing sql_type
ok 15 - ... testing sql_type
ok 16 - ... testing sql_type
ok 17 - ... testing sql_type
ok 18 - ... testing sql_type
ok 19 - ... testing sql_type
ok 20 - ... testing sql_type
ok 21 - ... testing sql_type
ok 22 - ... testing sql_type
ok 23 - ... testing sql_type
ok 24 - ... testing sql_type
ok 25 - ... testing sql_type
ok 26 - ... testing sql_type
ok 27 - ... testing sql_type
ok 28 - ... testing sql_type
ok 29 - ... testing sql_type
ok 30 - ... testing sql_type
ok 31 - ... testing sql_type
ok 32 - ... testing sql_type
ok 33 - ... testing sql_type
ok 34 - ... testing sql_type
ok 35 - ... testing sql_type
ok 36 - ... testing sql_type
ok 37 - ... testing sql_type
ok 38 - ... testing sql_type
ok 39 - ... testing sql_type
ok 40 - ... testing sql_type
ok 41 - ... testing sql_type
ok 42 - ... testing sql_type
ok 43 - ... testing sql_type
ok 44 - ... testing sql_type
ok 45 - ... testing sql_type
ok 46 - ... testing sql_type
ok 47 - ... testing sql_type
ok 48 - ... testing sql_type
ok 49 - ... testing sql_type
ok 50 - ... testing sql_type
ok 51 - ... testing sql_type
ok 52 - ... testing sql_type
ok 53 - ... testing sql_type
ok 54 - ... testing sql_type
ok 55 - ... testing sql_type
ok 56 - ... testing sql_type
ok 57 - ... testing sql_type
ok 58 - ... testing sql_type
ok 59 - ... testing sql_type
ok 60 - ... testing sql_cursor_types
ok 61 - ... testing sql_cursor_types
ok 62 - ... testing sql_cursor_types
ok 63 - ... testing sql_cursor_types
ok 64 - ... testing sql_cursor_types
ok 65 - ... looks_like_number : undef -> undef
ok 66 - ... looks_like_number : "" -> undef (eg "don't know")
ok 67 - ... looks_like_number : "foo" -> defined false
ok 68 - ... looks_like_number : "foo" -> defined false
ok 69 - ... looks_like_number : 1 -> true
ok 70 - ... looks_like_number : "." -> false
ok 71 - ... looks_like_number : 1 -> true
ok 72 - ... looks_like_number : 1 -> true
ok 73 - ... 1000 initial state is 400
ok 74 - ... neat : 1 + 1 -> "2"
ok 75 - ... neat : 2 -> "'2'"
ok 76 - ... neat : undef -> "undef"
ok 77 - ... test array argument w/seperator and maxlen
ok 78 - ... test array argument w/out seperator or maxlen
ok 79 - The object isa DBI::dr
ok 80 - ... test debug
ok 81 - ... test DebugDispatch
ok 82 - ... test Warn
ok 83 - ... this should say Tim Bunce
ok 84 - ... the version should match DBI version
ok 85 - ... this should work and return 1
ok 86 - ... this should equal 1
ok 87 - ... CachedKids should be undef initially
ok 88 - ... CachedKids should be our ref
ok 89 - ... this should be zero
ok 90 - ... this should be zero
ok 91 - ... Active flag is true
ok 92 - ... we should get a warning here
ok 93 - ... we should get a warning here
ok 94 - ... we should get no warnings here
ok 95 - ... we at least have one driver installed
ok 96 - ... we should at least have ExampleP installed
ok 97 - ... we should at least have one driver
ok 98 - ... should be -1077531989
ok 99 - ... should be -1077531989
ok 100 - ... should be -1077531990
ok 101 # skip Seems like your Math::BigInt 1.89 has a bug
ok 102 # skip Seems like your Math::BigInt 1.89 has a bug
ok 103
ok 104
ok 105
ok 106
ok 107
ok 108
ok 109
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116
ok 117
ok 118
ok 119
ok 120
ok 121
ok 122
ok 123
ok 124 # skip developer tests
ok 125 # skip developer tests
ok 126 # skip developer tests
ok 127 # skip developer tests
ok 128 - ... DBI::dbi_debug's initial state is 0
ok 129 - ... DBI::dbi_debug is 15
ok 130 - ... DBI::dbi_debug is 0
ok
t/zvp_02dbidrv.t ...........
1..53
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - ... DBD::Test->driver called to getnew Driver handle
ok 5 - ... new Driver handle (DBI::dr=HASH(0x2e4b60)) created successfully
ok 6 - The object isa DBI::dr
ok 7 - ... got a Test Driver object back from DBI->install_driver
ok 8 - The object isa DBI::dr
ok 9 - ... checking the DBI::_get_imp_data function
ok 10 - ... Driver object passed to data_sources
ok 11 - The object isa DBI::dr
ok 12 - ... Driver object is not tied
ok 13 - ... got correct datasources from DBI->data_sources("Test")
ok 14 # skip Kids attribute not supported under DBI::PurePerl
ok 15 - ... got a database handle from calling $drh->connect
ok 16 - The object isa DBI::db
ok 17 # skip Kids attribute not supported under DBI::PurePerl
ok 18 - ... Driver object passed to data_sources
ok 19 - The object isa DBI::dr
ok 20 - ... Driver object is not tied
ok 21 - ... checking fetched datasources from Driver
ok 22 - ... got correct datasources from $dbh->data_sources()
ok 23 - ... Database object passed to do
ok 24 - The object isa DBI::db
ok 25 - ... Database object is not tied
ok 26 - ... got Driver object from Database object with Driver attribute
ok 27 - The object isa DBI::dr
ok 28 - ... Driver object is not tied
ok 29 - ... got Driver object from Database object by FETCH-ing Driver attribute
ok 30 - The object isa DBI::dr
ok 31 # skip running DBI::PurePerl
ok 32 - ... this will trigger more driver internal tests above in DBD::Test::db
ok 33 - ... checking Driver handle err set with set_err method
ok 34 - ... checking Database handle err set with set_err method
ok 35 - ... checking Database handle err set with Driver handle set_err method
ok 36 # skip Kids attribute not supported under DBI::PurePerl
ok 37 - ... $dbh->DESTROY should set $drh->err to 42
ok 38 - ... checking $DBI::err set with Driver handle set_err method
ok 39 - ... checking $DBI::errstr
ok 40 - ... checking $DBI::state
ok 41 - ... checking $DBI::state
ok 42 - ... checking $DBI::state
ok 43 # skip using DBI::PurePerl
ok 44 - ... FetchHashKeyName is NAME
ok 45 - ... FetchHashKeyName is now changed to NAME_lc
ok 46 - ... calling $drh->disconnect_all (not implemented but will fail silently)
ok 47 - has dbixs_revision
ok 48 - has integer dbixs_revision
ok 49 # skip using DBI::PurePerl
ok 50 # skip using DBI::PurePerl
ok 51 # skip using DBI::PurePerl
ok 52 # skip using DBI::PurePerl
ok 53 # skip using DBI::PurePerl
ok
t/zvp_03handle.t ...........
1..137
ok 1 - use DBI;
ok 2
ok 3 - The object isa DBI::dr
ok 4 # skip Kids attribute not supported under DBI::PurePerl
ok 5
ok 6
ok 7
ok 8 - The object isa DBI::db
ok 9 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 10 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 11 - The object isa DBI::st
ok 12 - ... execute ran successfully
ok 13 - ... we got the CachedKids hash
ok 14 - ... there is one CachedKid
ok 15 - ... our statment handle should be in the CachedKids
ok 16 - ... our first statment is Active
ok 17 - The object isa DBI::st
ok 18 - ... prepare_cached returned the same statement handle
ok 19 - ... we got warned about our first statement handle being still active
ok 20 - ... our first statment is no longer Active since we re-prepared it
ok 21 - The object isa DBI::st
ok 22 - ... prepare_cached returned a different statement handle now
ok 23 - ... there are two CachedKids
ok 24 - ... both statment handles should be in the CachedKids
ok 25 - ... executing first statement handle again
ok 26 - ... first statement handle is now active again
ok 27 - The object isa DBI::st
ok 28 - ... our fourth statement handle is not the same as our first
ok 29 - ... first statement handle is still active
ok 30 - ... there are two CachedKids
ok 31 - ... second and fourth statment handles should be in the CachedKids
ok 32 - ... first statement handle is no longer active
ok 33 - ... fourth statement handle executed properly
ok 34 - ... fourth statement handle is Active
ok 35 - The object isa DBI::st
ok 36 - ... we still only got one warning
ok 37 - ... fourth statement handle and fifth one match
ok 38 - ... fourth statement handle is not Active
ok 39 - ... fifth statement handle is not Active (shouldnt be its the same as fifth)
ok 40 - ... there are two CachedKids
ok 41 - ... second and fourth/fifth statment handles should be in the CachedKids
ok 42 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 43 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 44 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 45 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 46 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 47 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 48 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 49 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 50 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 51 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 52 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 53 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 54 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 55 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 56 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 57 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 58 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 59 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 60 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 61 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 62 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 63 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 64 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 65 - ping should be true before disconnect
ok 66 - ping should be false after disconnect
ok 67 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 68 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 69 # skip Kids attribute not supported under DBI::PurePerl
ok 70 # skip Kids attribute not supported under DBI::PurePerl
ok 71 # skip Kids attribute not supported under DBI::PurePerl
ok 72 # skip Kids attribute not supported under DBI::PurePerl
ok 73 # skip Kids attribute not supported under DBI::PurePerl
ok 74 # skip Kids attribute not supported under DBI::PurePerl
ok 75 # skip Kids attribute not supported under DBI::PurePerl
ok 76 # skip Kids attribute not supported under DBI::PurePerl
ok 77 # skip Kids attribute not supported under DBI::PurePerl
ok 78 # skip Kids attribute not supported under DBI::PurePerl
ok 79 # skip Kids attribute not supported under DBI::PurePerl
ok 80 # skip Kids attribute not supported under DBI::PurePerl
ok 81 # skip Kids attribute not supported under DBI::PurePerl
ok 82 # skip Kids attribute not supported under DBI::PurePerl
ok 83 # skip Kids attribute not supported under DBI::PurePerl
ok 84 # skip Kids attribute not supported under DBI::PurePerl
ok 85 # skip Kids attribute not supported under DBI::PurePerl
ok 86 # skip Kids attribute not supported under DBI::PurePerl
ok 87 # skip Kids attribute not supported under DBI::PurePerl
ok 88 # skip Kids attribute not supported under DBI::PurePerl
ok 89 # skip Kids attribute not supported under DBI::PurePerl
ok 90 # skip Kids attribute not supported under DBI::PurePerl
ok 91 # skip Kids attribute not supported under DBI::PurePerl
ok 92 # skip Kids attribute not supported under DBI::PurePerl
ok 93 # skip Kids attribute not supported under DBI::PurePerl
ok 94 # skip Kids attribute not supported under DBI::PurePerl
ok 95 - The object isa DBI::db
ok 96
ok 97
ok 98
ok 99 - we need weakrefs for take_imp_data to work safely with child handles
ok 100 - should have 3 entries (implementation detail)
ok 101 - should have 2 defined handles
ok 102 - ... we got some imp_data to test
ok 103 - ... test that our imp_data is greater than or equal to 80, this is reasonable
ok 104 - ... our Driver should have 0 Kid(s) after calling take_imp_data
ok 105 - sth should be reblessed
ok 106
warn: Can't call FETCH method on handle DBI::db=HASH(0x775af8) after take_imp_data()
ok 107 - ... our Driver should be undefined
warn: Can't call FETCH method on handle DBI::db=HASH(0x775af8) after take_imp_data()
ok 108 - ... our TraceLevel should be undefined
warn: Can't call disconnect method on handle DBI::db=HASH(0x775af8) after take_imp_data()
ok 109 - ... disconnect should return undef
warn: Can't call quote method on handle DBI::db=HASH(0x775af8) after take_imp_data()
ok 110 - ... quote should return undefined
ok 111 - ... we should have gotten 4 warnings
ok 112 - The object isa DBI::db
ok 113
ok 114 # skip Kids attribute not supported under DBI::PurePerl
ok 115 - The object isa DBI::dr
ok 116 # skip Kids attribute not supported under DBI::PurePerl
ok 117 - The object isa DBI::db
ok 118 - The object isa DBI::st
ok 119 - ... NUM_OF_PARAMS is 0
ok 120 - ... NUM_OF_FIELDS should be undef
ok 121 - ... Statement is "foo bar"
ok 122 - ... NAME is undefined
ok 123 - ... TYPE is undefined
ok 124 - ... SCALE is undefined
ok 125 - ... PRECISION is undefined
ok 126 - ... NULLABLE is undefined
ok 127 - ... RowsInCache is undefined
ok 128 - ... ParamValues is undefined
ok 129 - ... NAME_uc is undefined
ok 130 - ... NAME_lc is undefined
ok 131 - ... NAME_hash is undefined
ok 132 - ... NAME_uc_hash is undefined
ok 133 - ... NAME_lc_hash is undefined
ok 134 - ... $dbh can call "prepare"
ok 135 - ... $dbh cannot call "nonesuch"
ok 136 - ... $sth can call "execute"
ok 137 # skip Kids attribute not supported under DBI::PurePerl
ok
t/zvp_04mods.t .............
1..12
ok 1 - use DBI;
ok 2 - use DBI::Const::GetInfo::ANSI;
ok 3 - use DBI::Const::GetInfo::ODBC;
ok 4 - use DBI::Const::GetInfoType;
ok 5 - use DBI::Const::GetInfoReturn;
ok 6 - ... we have at least one key in the GetInfoType hash
ok 7 - ... the GetInfoType hash is constructed from the ANSI and ODBC hashes
ok 8 - ... we have at least one key in the GetInfoReturnType hash
ok 9 - ... the GetInfoReturnType hash is constructed from the ANSI and ODBC hashes
ok 10 - ... we have at least one key in the GetInfoReturnValues hash
ok 11 - DBI::Const::GetInfoReturn->can('Format')
ok 12 - DBI::Const::GetInfoReturn->can('Explain')
ok
t/zvp_05concathash.t .......
1..41
ok 1 - use DBI;
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9 - should work with nul bytes in kv_sep and pair_sep
ok 10 - should work with nul bytes in hash value (neat)
ok 11 - should work with nul bytes in hash value (not neat)
ok 12
ok 13
ok 14
ok 15 - test
ok 16 - test
ok 17 - Unknown sort order
ok 18 - Float Hash - Not Neat lexical
ok 19 - Numeric - Not Neat lexical
ok 20 - Mixed Hash - Not Neat lexical
ok 21 - Simple Hash - Not Neat lexical
ok 22 - Float Hash - Neat lexical
ok 23 - Numeric - Neat lexical
ok 24 - Mixed Hash - Neat lexical
ok 25 - Simple Hash - Neat lexical
ok 26 - Float Hash - Not Neat guess
ok 27 - Numeric - Not Neat guess
ok 28 - Mixed Hash - Not Neat guess
ok 29 - Simple Hash - Not Neat guess
ok 30 - Float Hash - Neat guess
ok 31 - Numeric - Neat guess
ok 32 - Mixed Hash - Neat guess
ok 33 - Simple Hash - Neat guess
ok 34 - Float Hash - Not Neat numeric
ok 35 - Numeric - Not Neat numeric
ok 36 - Mixed Hash - Not Neat numeric
ok 37 - Simple Hash - Not Neat numeric
ok 38 - Float Hash - Neat numeric
ok 39 - Numeric - Neat numeric
ok 40 - Mixed Hash - Neat numeric
ok 41 - Simple Hash - Neat numeric
ok
t/zvp_06attrs.t ............
1..145
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking Warn attribute for dbh
ok 4 - ... checking Active attribute for dbh
ok 5 - ... checking AutoCommit attribute for dbh
ok 6 - ... checking CompatMode attribute for dbh
ok 7 - ... checking InactiveDestory attribute for dbh
ok 8 - ... checking PrintError attribute for dbh
ok 9 - ... checking PrintWarn attribute for dbh
ok 10 - ... checking RaiseError attribute for dbh
ok 11 - ... checking ShowErrorStatement attribute for dbh
ok 12 - ... checking ChopBlanks attribute for dbh
ok 13 - ... checking LongTrunkOk attribute for dbh
ok 14 - ... checking TaintIn attribute for dbh
ok 15 - ... checking TaintOut attribute for dbh
ok 16 - ... checking Taint attribute for dbh
ok 17 - ... checking Executed attribute for dbh
ok 18 - ... checking ErrCount attribute for dbh
ok 19 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 20 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 21 - ... checking CachedKids attribute for dbh
ok 22 - ... checking HandleError attribute for dbh
ok 23 - ... checking Profile attribute for dbh
ok 24 - ... checking Statement attribute for dbh
ok 25 - ... checking RowCacheSize attribute for dbh
ok 26 - ... checking ReadOnly attribute for dbh
ok 27 - ... checking FetchHashKeyName attribute for dbh
ok 28 - ... checking Name attribute for dbh
ok 29 - ... checking TraceLevel attribute for dbh
ok 30 - ... checking LongReadLen attribute for dbh
ok 31 - should be able to FETCH_many
ok 32 - should see driver-private dbh attribute value
ok 33 - ... catching exception
ok 34 - ... $dbh->err is undefined
ok 35 - ... checking $dbh->errstr
ok 36 - ... checking $dbh->state
ok 37 - ... checking Executed attribute for dbh
ok 38 - ... checking Executed attribute for dbh (after reset)
ok 39 - ... checking ErrCount attribute for dbh (after error was generated)
ok 40 - The object isa DBI::dr
ok 41 - ... checking $dbh->err
ok 42 - ... checking ErrCount attribute for drh
ok 43 - ... checking Warn attribute for drh
ok 44 - ... checking Active attribute for drh
ok 45 - ... checking AutoCommit attribute for drh
ok 46 - ... checking CompatMode attribute for drh
ok 47 - ... checking InactiveDestory attribute for drh
ok 48 - ... checking PrintError attribute for drh
ok 49 - ... checking PrintWarn attribute for drh
ok 50 - ... checking RaiseError attribute for drh
ok 51 - ... checking ShowErrorStatement attribute for drh
ok 52 - ... checking ChopBlanks attribute for drh
ok 53 - ... checking LongTrunkOk attribute for drh
ok 54 - ... checking TaintIn attribute for drh
ok 55 - ... checking TaintOut attribute for drh
ok 56 - ... checking Taint attribute for drh
ok 57 # skip Executed attribute not supported under DBI::PurePerl
ok 58 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 59 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 60 - ... checking CachedKids attribute for drh
ok 61 - ... checking HandleError attribute for drh
ok 62 - ... checking Profile attribute for drh
ok 63 - ... checking ReadOnly attribute for drh
ok 64 - ... checking TraceLevel attribute for drh
ok 65 - ... checking LongReadLen attribute for drh
ok 66 - ... checking FetchHashKeyName attribute for drh
ok 67 - ... checking Name attribute for drh
ok 68 - The object isa DBI::st
ok 69 - ... checking Executed attribute for sth
ok 70 - ... checking Executed attribute for dbh
ok 71 - ... checking ErrCount attribute for sth
ok 72 - ... checking exception
ok 73 - ... checking $sth->errstr
ok 74 - ... checking $sth->state
ok 75 - ... checking Executed attribute for sth
ok 76 - ... checking Exceuted attribute for dbh
ok 77 - ... checking ErrCount attribute for sth
ok 78 - ... checking exception
ok 79 - ... checking ErrCount attribute for sth (after assignment)
ok 80 - ... checking ErrCount attribute for sth (after reset)
ok 81 - ... checking Warn attribute for sth
ok 82 - ... checking Active attribute for sth
ok 83 - ... checking CompatMode attribute for sth
ok 84 - ... checking InactiveDestroy attribute for sth
ok 85 - ... checking PrintError attribute for sth
ok 86 - ... checking PrintWarn attribute for sth
ok 87 - ... checking RaiseError attribute for sth
ok 88 - ... checking ShowErrorStatement attribute for sth
ok 89 - ... checking ChopBlanks attribute for sth
ok 90 - ... checking LongTrunkOk attribute for sth
ok 91 - ... checking TaintIn attribute for sth
ok 92 - ... checking TaintOut attribute for sth
ok 93 - ... checking Taint attribute for sth
ok 94 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 95 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 96 - ... checking CachedKids attribute for sth
ok 97 - ... checking HandleError attribute for sth
ok 98 - ... checking Profile attribute for sth
ok 99 - ... checking ReadOnly attribute for sth
ok 100 - ... checking TraceLevel attribute for sth
ok 101 - ... checking LongReadLen attribute for sth
ok 102 - ... checking FetchHashKeyName attribute for sth
ok 103 - ... checking CursorName attribute for sth
ok 104 - ... checking NUM_OF_FIELDS attribute for sth
ok 105 - ... checking NUM_OF_PARAMS attribute for sth
ok 106 - ... checking type of NAME attribute for sth
ok 107 - ... checking number of elements returned
ok 108 - ... checking values returned
ok 109 - ... checking type of NAME_lc attribute for sth
ok 110 - ... checking number of elements returned
ok 111 - ... checking values returned
ok 112 - ... checking type of NAME_uc attribute for sth
ok 113 - ... checking number of elements returned
ok 114 - ... checking values returned
ok 115 - ... checking type of NAME_hash attribute for sth
ok 116 - ... checking number of keys returned
ok 117 - ... checking values returned
ok 118 - ... checking values returned
ok 119 - ... checking type of NAME_lc_hash attribute for sth
ok 120 - ... checking number of keys returned
ok 121 - ... checking values returned
ok 122 - ... checking values returned
ok 123 - ... checking type of NAME_uc_hash attribute for sth
ok 124 - ... checking number of keys returned
ok 125 - ... checking values returned
ok 126 - ... checking values returned
ok 127 - ... checking type of TYPE attribute for sth
ok 128 - ... checking number of elements returned
ok 129 - ... checking values returned
ok 130 - ... checking type of NULLABLE attribute for sth
ok 131 - ... checking number of elements returned
ok 132 - ... checking values returned
ok 133 - ... checking type of PRECISION attribute for sth
ok 134 - ... checking number of elements returned
ok 135 - ... checking values returned
ok 136 - ... checking type of SCALE attribute for sth
ok 137 - ... checking number of elements returned
ok 138 - ... checking values returned
ok 139 - ... checking type of ParamValues attribute for sth
ok 140 - ... checking values returned
ok 141 - ... checking Statement attribute for sth
ok 142 - ... checking type of RowsInCache attribute for sth
ok 143 - should see driver-private sth attribute value
Checking inheritance
ok 144 - dbh ReadOnly value should be inherited from drh
ok 145 - sth ReadOnly value should be inherited from dbh
ok
t/zvp_07kids.t ............. skipped: $h->{Kids} attribute not supported for DBI::PurePerl
t/zvp_08keeperr.t ..........
1..69
ok 1 - use DBI;
ok 2 - ... checking error
ok 3 - ... checking error
Test HandleSetErr
ok 4 - The object isa DBI::db
ok 5 - ... $DBI::err is not defined
HandleSetErr called: h=DBI::db=HASH(0x351f20), err=, errstr=(got info), state=
ok 6 - ... $DBI::err is defined
ok 7 - ... $DBI::err is an empty string
ok 8 - ... $DBI::errstr is as we expected
ok 9 - ... $dbh->errstr matches $DBI::errstr
ok 10 - ... $warn{failed} is 0
ok 11 - ... $warn{warning} is 0
ok 12 - ... the @handlewarn array is (1, 0, 0)
HandleSetErr called: h=DBI::db=HASH(0x351f20), err=0, errstr=(got warn), state=AA001
warn: 'DBD::ExampleP::db set_err warning: (got info)\n(got warn) at ./t/08keeperr.t line 131\n'
ok 13 - ... $DBI::err is defined
ok 14 - ... $DBI::err is "0"
ok 15 - ... $DBI::errstr is as we expected
ok 16 - ... $dbh->errstr matches $DBI::errstr
ok 17 - ... $DBI::state is AA001
ok 18 - ... $warn{warning} is 1
ok 19 - ... the @handlewarn array is (1, 1, 0)
HandleSetErr called: h=DBI::db=HASH(0x351f20), err=, errstr=(got more info), state=
warn: 'DBD::ExampleP::db set_err warning: (got info)\n(got warn)\n(got more info) at ./t/08keeperr.t line 146\n'
ok 20 - ... $DBI::err is defined
ok 21 - ... $DBI::err is "0"
ok 22 - ... $dbh->err is "0"
ok 23 - ... $DBI::state is AA001
ok 24 - ... $DBI::errstr is as we expected
ok 25 - ... $dbh->errstr matches $DBI::errstr
ok 26 - ... $warn{warning} is 2
ok 27 - ... the @handlewarn array is (2, 1, 0)
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error) at ./t/08keeperr.t line 167\n'
ok 28 - ... $DBI::err is defined
ok 29 - ... $DBI::err is 42
ok 30 - ... $warn{warning} is 2
ok 31 - ... $dbh->errstr is as we expected
ok 32 - ... $DBI::state is AA002
ok 33 - ... the @handlewarn array is (2, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x351f20), err=, errstr=(got info), state=
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info) at ./t/08keeperr.t line 179\n'
ok 34 - ... $DBI::err is defined
ok 35 - ... $DBI::err is 42
ok 36 - ... $warn{warning} is 2
ok 37 - ... $dbh->errstr is as we expected
ok 38 - ... the @handlewarn array is (3, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x351f20), err=0, errstr=(got warn), state=
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) at ./t/08keeperr.t line 190\n'
ok 39 - ... $DBI::err is defined
ok 40 - ... $DBI::err is 42
ok 41 - ... $warn{warning} is 2
ok 42 - ... $dbh->errstr is as we expected
ok 43 - ... the @handlewarn array is (3, 2, 1)
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) [err was 42 now 4200] [state was AA002 now AA003]\n(got new error) at ./t/08keeperr.t line 201\n'
ok 44 - ... $DBI::err is defined
ok 45 - ... $DBI::err is 4200
ok 46 - ... $warn{warning} is 2
ok 47 - ... $dbh->errstr is as we expected
ok 48 - ... the @handlewarn array is (3, 2, 2)
ok 49 - ... $dbh->errstr is defined
ok 50 - ... $dbh->err is defined
ok 51 - ... $dbh->state is an empty string
warn: 'DBD::ExampleP::db set_err failed: foo at ./t/08keeperr.t line 226\n'
ok 52 - ... only returned one value
ok 53 - ... the first value is undefined
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar at ./t/08keeperr.t line 230\n'
ok 54 - ... $dbh->set_err returned undefiend
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz at ./t/08keeperr.t line 231\n'
ok 55 - ... $dbh->set_err returned undefiend
HandleSetErr called: h=DBI::db=HASH(0x351f20), err=0, errstr=warn, state=
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz\nwarn at ./t/08keeperr.t line 232\n'
ok 56 - ... $dbh->set_err returned undefiend
ok 57 - ... $dbh->errstr is as we expected
ok 58 - ... $warn{failed} is 4
ok 59 - ... the @handlewarn array is (0, 1, 3)
warn: 'DBD::ExampleP::db method failed: foo at ./t/08keeperr.t line 242\n'
ok 60 - ... only returned one value
ok 61 - ... the first value is undefined
warn: 'DBD::ExampleP::db method failed: foo at ./t/08keeperr.t line 246\n'
ok 62 - ... only returned one value
ok 63 - ... the first value is "42"
warn: 'DBD::ExampleP::db method failed: foo at ./t/08keeperr.t line 250\n'
ok 64 - ... returned no values
HandleSetErr called: h=DBI::db=HASH(0x351f20), err=, errstr=info, state=override
warn: 'DBD::ExampleP::db set_err failed: errstr99 at ./t/08keeperr.t line 257\n'
ok 65 - ... only returned one value
ok 66 - ... the first value is undefined
ok 67 - ... $dbh->err is 99
ok 68 - ... $dbh->errstr is as we expected
ok 69 - ... $dbh->state is as we expected
ok
t/zvp_09trace.t ............
1..67
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - trace file size = 2653
ok 4 - ... checking TraceLevel attribute
ok 5 - ... trace file successfully created
parse_trace_flag SQL
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
parse_trace_flag foo
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
parse_trace_flag bar
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
parse_trace_flag baz
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
parse_trace_flag boo
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
parse_trace_flag bop
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53
parse_trace_flag SQL foo bar baz boo bop
ok 54 - ...
ok 55 - ...
inherit
ok 56 - The object isa DBI::st
ok 57
ok 58
ok 59
test unknown parse_trace_flag
ok 60
ok 61
caught warn: DBI::db=HASH(0x844cb8)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at DBI::PurePerl DBI::common::parse_trace_flags line 49
ok 62
ok 63
caught warn: DBI::db=HASH(0x844cb8)->parse_trace_flags(nonesuch|SQL|nonesuch2) ignored unknown trace flags: 'nonesuch' 'nonesuch2' at DBI::PurePerl DBI::common::parse_trace_flags line 49
ok 64
ok 65
ok 66
ok 67
ok
t/zvp_10examp.t ............
1..210
ok 1 - connect should fail
ok 2 - ... we should have an exception here
ok 3 - ... $dbh2 should not be defined
ok 4
ok 5
ok 6 - ... these 2 handles are cached, so they are the same
ok 7
ok 8 - ... this handle was created with different parameters, so it is not the same
ok 9
ok 10 - Executed should be true
ok 11
ok 12 - should return same handle
ok 13 - Executed should be false because reset by connect attributes
ok 14 - The object isa DBI::dr
ok 15 - ... these are our cached kids
ok 16 - ... we have emptied out cache
ok 17
ok 18 - ... PrintError should be 0
ok 19 - ... FetchHashKey is NAME
ok 20 - ... checking the example driver_path
others
ok 21
ok 22 - ping should return true
ok 23 - prepare should fail
ok 24 - sth->err should be true
ok 25 - DBI::err should be true
ok 26 - $DBI::err should match $dbh->err
ok 27 - $DBI::errstr should contain error string
ok 28 - $DBI::errstr should match $dbh->errstr
ok 29
ok 30
ok 31
ok 32 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 33 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 34 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53 - errstr should contain error message
ok 54
ok 55 - errstr should contain error message
ok 56
ok 57
ok 58 - errstr should contain error message
ok 59
ok 60 - errstr should contain error message
ok 61
ok 62
ok 63
ok 64
ok 65
ok 66
ok 67
ok 68
fetchrow_hashref('NAME_uc')
ok 69
ok 70
ok 71
ok 72
ok 73
fetchrow_hashref('ParamValues')
ok 74
ok 75
FetchHashKeyName
ok 76
ok 77
ok 78
ok 79
ok 80
ok 81
fetchall_arrayref
ok 82
ok 83
ok 84
ok 85
ok 86
ok 87
fetchall_arrayref array slice
ok 88
ok 89
ok 90
ok 91
fetchall_arrayref hash slice
ok 92
ok 93
ok 94
ok 95
fetchall_arrayref hash
ok 96
ok 97
ok 98
ok 99 - '16877 1024 .' ne '16877 1024 .'
rows()
ok 100 - row count 44
ok 101 - 44 vs 44
ok 102 - 44 vs 44
fetchall_arrayref array slice and max rows
ok 103
ok 104
ok 105
selectrow_array
ok 106
ok 107
selectrow_hashref
ok 108
ok 109
ok 110
ok 111
selectall_arrayref
ok 112
ok 113
ok 114
ok 115
selectall_arrayref Slice array slice
ok 116
ok 117
ok 118 - ". 16877" eq ". 16877"
ok 119
selectall_arrayref Columns array slice
ok 120
ok 121
ok 122 - ". 16877" eq ". 16877"
ok 123
selectall_arrayref hash slice
ok 124
ok 125
ok 126
ok 127
ok 128
ok 129
ok 130
selectall_hashref
ok 131 - selectall_hashref result
ok 132 - selectall_hashref HASH: HASH
ok 133
ok 134 - 1024 eq 1024
selectall_hashref by column number
ok 135
ok 136 - 1024 eq 1024
selectcol_arrayref
ok 137
ok 138
ok 139
selectcol_arrayref column slice
ok 140
ok 141
ok 142
ok 143
others...
ok 144
ok 145
RaiseError & PrintError & ShowErrorStatement
ok 146
ok 147
ok 148
ok 149
ok 150
ok 151
ok 152
ok 153
ok 154
ok 155
ok 156
ok 157
ok 158
ok 159
ok 160
ok 161 - DBD::ExampleP::st execute failed: 2 values bound when 1 expected [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at DBI::PurePerl DBI::st::execute line 118.
#
ok 162 - DBD::ExampleP::st execute failed: 2 values bound when 1 expected [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at DBI::PurePerl DBI::st::execute line 118.
#
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168
HandleError
ok 169
ok 170
HandleError -> die
ok 171
ok 172 - HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x7a1ed8), rv=undef, \#=3] at ./t/10examp.t line 395.
#
HandleError -> 0 -> RaiseError
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x7a1ed8), rv=undef, #=3]
ok 173
ok 174 - DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 at DBI::PurePerl DBI::db::prepare line 116.
#
HandleError -> 1 -> return (original)undef
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x7a1ed8), rv=undef, #=3]
ok 175 -
ok 176
HandleError -> 2 -> return (modified)42
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x7a1ed8), rv=undef, #=3]
ok 177 -
ok 178
ok 179
ok 180 - The object isa DBI::st
ok 181
ok 182
ok 183
ok 184 - Remove dumpcsr.tst
ok 185 - Actually gone
table_info
ok 186
Local /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE subdirs: lib ex .. . blib t
ok 187
ok 188
ok 189
tables
ok 190 - Table count mismatch5 vs 5
ok 191 - "schema"."table" ne "schema"."table"
ok 192 - "sch-ema"."table" ne "sch-ema"."table"
ok 193 - "schema"."ta-ble" ne "schema"."ta-ble"
ok 194 - "sch ema"."table" ne "sch ema"."table"
ok 195 - "schema"."ta ble" ne "schema"."ta ble"
Testing the fake directories (0).
ok 196
ok 197
ok 198 - 0 rows instead of 0
ok 199
Testing the fake directories (100).
ok 200
ok 201
ok 202 - 100 rows instead of 100
ok 203 - 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
Testing the fake directories (200).
ok 204
ok 205
ok 206 - 200 rows instead of 200
ok 207 - 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
Testing $dbh->func().
ok 208
ok 209
ok 210 - ping should return false after disconnect
ok
t/zvp_11fetch.t ............
1..24
# fetchall_hashref(C1)
ok 1
ok 2
ok 3
ok 4
# fetchall_hashref(C2)
ok 5
ok 6
ok 7
ok 8
# fetchall_hashref([C2])
ok 9
ok 10
ok 11
ok 12
# fetchall_hashref([C1 C2])
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok
t/zvp_12quote.t ............
1..10
ok 1 - ... quoting strings with embedded single quotes
ok 2 - ... quoting number as SQL_VARCHAR
ok 3 - ... quoting number as SQL_INTEGER
ok 4 - ... quoting undef as NULL
ok 5 - ... properly quotes foo as "foo"
ok 6 - ... properly quotes f"o as "f""o"
ok 7 - ... properly quotes foo, bar as "foo"."bar"
ok 8 - ... properly quotes undef, undef, bar as "bar"
ok 9 - ... properly quotes foo, undef, bar as "foo"."bar"
ok 10 - ... now quotes it as "bar"@"foo" after flushing cache
ok
t/zvp_13taint.t ............ skipped: Taint attributes not supported with DBI::PurePerl
t/zvp_14utf8.t .............
1..16
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok
t/zvp_15array.t ............
1..55
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - The object isa DBI::st
ok 4 - ... we should have 0 rows
ok 5 - ... execute_array should return false
ok 6 - execute_array failure with RaiseError should have died
ok 7
ok 8 - ... we should have 2 rows
ok 9 - ... we should have 3 tuple_status
ok 10 - ... our rows are as expected
ok 11 - ... our tuple_status is as expected
ok 12 - ... bind_param_array should return true
ok 13 - ... execute_array should return true
ok 14 - ... we should have 3 rows
ok 15 - ... we should have 3 tuple_status
ok 16 - ... our rows are as expected
ok 17 - ... our tuple_status is as expected
ok 18 - ... execute_array should return true
ok 19 - ... we should have executed 3 rows
ok 20 - ... we should have affected 3 rows
ok 21 - ... execute_array should return true
ok 22 - ... execute_array should return 0 (but true)
ok 23 - ... we should have 0 rows
ok 24 - ... we should have 0 tuple_status
ok 25 - ... execute_array should return 1
ok 26 - ... we should have 1 rows
ok 27 - ... our rows are as expected
ok 28 - ... we should have 1 tuple_status
ok 29 - ... our tuple_status is as expected
ok 30 - ... execute_array should return 0
ok 31 - ... we should have 0 rows
ok 32 - ... we should have 0 tuple_status
ok 33 - The object isa DBI::st
ok 34 - ... execute_array should return true
ok 35 - ... execute_array should return 0 (but true)
ok 36 - ... we should have 0 rows
ok 37 - ... execute_array should return true
ok 38 - ... we should have 2 rows
ok 39 - ... we should have 2 tuple_status
ok 40 - ... rows should match
ok 41 - ... tuple_status should match
ok 42 - The object isa DBI::st
ok 43 - ... execute_array should return true
ok 44 - ... we should have 3 rows
ok 45 - ... we should have 3 tuple_status
ok 46 - ... rows should match
ok 47 - ... tuple status should match
ok 48 - ... execute_array should return undef
ok 49 - ... errstr is as expected
ok 50 - ... execute_array should return undef
ok 51 - ... errstr is as expected
ok 52 - ... execute_array should return undef
ok 53 - ... errstr is as expected
ok 54 - ... bind_param_array should return undef
ok 55 - ... errstr is as expected
ok
t/zvp_19fhtrace.t ..........
1..27
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking TraceLevel attribute
ok 4 - ... regular fh: trace file successfully created
ok 5 - ... regular fh: filehandle successfully set
ok 6 - ... regular fh: trace_msg
ok 7 - ... regular fh: file successfully changed
Next logline
ok 8 - ... regular fh: trace_msg after changing trace output
ok 9 - Tracefile removed
ok 10 - Tracefile FOO opened
ok 11 - Tracefile created
ok 12 - Regression test
ok 13 - Traced message
ok 14 - Regression test
ok 15 - ... layered fh: file is layered: *** Test our layer
#
#
ok 16 - ... layered fh: filehandle successfully set
ok 17 - ... layered fh: trace_msg: Layered logline
#
#
DBI::db=HASH(0x751e98) trace level set to 1 in DBI 1.611 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 18 - ... layered fh: close doesn't close: Layered logline
#
#
Next logline
ok 19 - ... layered fh: trace_msg after change trace output: Layered logline
#
#
ok 20 - ... scalar trace: file is layered: *** Test our layer
#
#
ok 21 - ... scalar trace: filehandle successfully set
ok 22 - ... scalar trace: *** Test our layer
# DBI::db=HASH(0x751e98) trace level set to 1 in DBI 1.611 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
DBI::db=HASH(0x751e98) trace level set to 1 in DBI 1.611 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 23 - ... scalar trace: close doesn't close: *** Test our layer
# DBI::db=HASH(0x751e98) trace level set to 1 in DBI 1.611 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
Next logline
ok 24 - ... scalar trace: after change trace output: *** Test our layer
# DBI::db=HASH(0x751e98) trace level set to 1 in DBI 1.611 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
ok 25 - ... logger: trace_msg
#
DBI::db=HASH(0x751e98) trace level set to 1 in DBI 1.611 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 26 - ... logger: close doesn't close
#
Next logline
ok 27 - ... logger: trace_msg after change trace output
#
ok
t/zvp_20meta.t .............
1..8
ok 1 - use DBI;
ok 2 - use DBI::DBD::Metadata;
ok 3 - The object isa DBI::db
ok 4
ok 5
ok 6
ok 7
ok 8
ok
t/zvp_30subclass.t .........
1..36
ok 1 - use DBI;
ok 2 - The object isa MyDBI::db
ok 3
ok 4 - The object isa MyDBI::db
ok 5
ok 6
ok 7 - The object isa MyDBI::st
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15 - The reference isa ARRAY
ok 16
ok 17
ok 18
ok 19
ok 20 - Clone A isa MyDBI::db
ok 21
ok 22
ok 23 - Clone B isa MyDBI::db
ok 24
ok 25
ok 26 - The object isa MyDBI::db
ok 27
ok 28 - installed method isa ARRAY
ok 29
ok 30
ok 31
ok 32
ok 33 - Failed connect \#1
ok 34
ok 35 - Failed connect \#2
ok 36
fetch 4 prepare 1
ok
t/zvp_35thrclone.t .........
1..20
ok 1 - use DBI;
ok 2 - ... assignment of neat_maxlen was successful
ok 3 - The object isa DBI::db
ok 4 - ... DBI::neat_maxlen still holding its value
ok 5 - The object isa DBI::db
ok 6 - ... new $dbh is not the same instance as $dbh_parent
ok 7
ok 8 - ... DBI::neat_maxlen still holding its value
ok 9 - The object isa DBI::db
ok 10 - ... new $dbh is not the same instance as $dbh_parent
ok 11
ok 12 - ... DBI::neat_maxlen still holding its value
ok 13 - The object isa DBI::db
ok 14 - ... new $dbh is not the same instance as $dbh_parent
ok 15
ok 16 - ... DBI::neat_maxlen still holding its value
ok 17 - The object isa DBI::db
ok 18 - ... new $dbh is not the same instance as $dbh_parent
ok 19
ok 20 - ... all tests have passed
ok
t/zvp_40profile.t .......... skipped: profiling not supported for DBI::PurePerl
t/zvp_41prof_dump.t ........ skipped: profiling not supported for DBI::PurePerl
t/zvp_42prof_data.t ........ skipped: profiling not supported for DBI::PurePerl
t/zvp_43prof_env.t ......... skipped: profiling not supported for DBI::PurePerl
t/zvp_50dbm.t ..............
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable
Test count: 1 x 3 x 14 = 42
1..42
--- Using SDBM_File () ---
DBD::DBM 0.04 using SDBM_File
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
DBI::PurePerl 2.013911
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 1
ok 2 - The object isa DBI::db
ok 3
ok 4
ok 5
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
INSERT INTO SDBM_File_fruit VALUES (3, NULL )
INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
INSERT INTO SDBM_File_fruit VALUES (?,?); #5,via placeholders
UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
SELECT * FROM SDBM_File_fruit
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
DBD::DBM 0.04 using SDBM_File + MLDBM + Data::Dumper
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
DBI::PurePerl 2.013911
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 15
ok 16 - The object isa DBI::db
ok 17
ok 18
ok 19
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
INSERT INTO SDBM_File_fruit VALUES (2,'apples' , 0 )
INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
INSERT INTO SDBM_File_fruit VALUES (?,?,?); #5,via placeholders,15
UPDATE SDBM_File_fruit SET qux='12' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dKey=4
SELECT dKey,qux FROM SDBM_File_fruit
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
DBD::DBM 0.04 using SDBM_File + MLDBM + Storable
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
DBI::PurePerl 2.013911
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 29
ok 30 - The object isa DBI::db
ok 31
ok 32
ok 33
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
INSERT INTO SDBM_File_fruit VALUES (2,'apples' , 0 )
INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
INSERT INTO SDBM_File_fruit VALUES (?,?,?); #5,via placeholders,15
UPDATE SDBM_File_fruit SET qux='12' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dKey=4
SELECT dKey,qux FROM SDBM_File_fruit
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
DROP TABLE SDBM_File_fruit
ok
t/zvp_60preparse.t ......... skipped: preparse not supported for DBI::PurePerl
t/zvp_65transact.t .........
1..10
begin_work...
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok
t/zvp_70callbacks.t ........ skipped: $h->{Callbacks} attribute not supported for DBI::PurePerl
t/zvp_72childhandles.t .....
1..16
ok 1
ok 2
ok 3
ok 4
ok 5 - All handles should be undef now
ok 6 - ChildHandles should be an array-ref if wekref is available
ok 7
drh DBI::dr=HASH(0x700900)
dbh DBI::db=HASH(0x740b90)
sth DBI::st=HASH(0x721750)
sth DBI::st=HASH(0x7145c0)
sth DBI::st=HASH(0x737378)
ok 8
ok 9
ok 10
ok 11
ok 12 - handles should be gone now
ok 13
ok 14
ok 15
ok 16
ok
t/zvp_80proxy.t ............ skipped: modules required for proxy are probably not installed (e.g., RPC/PlClient.pm)
t/zvp_85gofer.t ............
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0xa71988)
ok 20
ok 21
ok 22
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0xa63758)
ok 46
ok 47
ok 48
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0xa734c0)
ok 72
ok 73
ok 74
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
# =============
# Testing pipeone transport with pedantic policy
# dbi:Gofer:transport=pipeone;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 79 - should connect to dbi:Gofer:transport=pipeone;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 80
ok 81
ok 82
ok 83 - should detect prepare failure
ok 84
ok 85
ok 86
ok 87
ok 88
ok 89
ok 90 - go_response executed flag should be true
ok 91
ok 92
ok 93
ok 94
# Testing go_request_count and caching of simple values
ok 95
ok 96
ok 97
# use_remote=1 (policy=pedantic, transport=pipeone) HASH(0xab7258)
ok 98
ok 99
ok 100
ok 101 # skip caching of metadata methods returning sth not yet implemented
ok 102 # skip caching of metadata methods returning sth not yet implemented
ok 103
ok 104
# =============
# Testing pipeone transport with classic policy
# dbi:Gofer:transport=pipeone;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 105 - should connect to dbi:Gofer:transport=pipeone;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 106
ok 107
ok 108
ok 109 - The object isa DBI::st
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116 - go_response executed flag should be true
ok 117
ok 118
ok 119
ok 120
# Testing go_request_count and caching of simple values
ok 121
ok 122
ok 123
# use_remote=0 (policy=classic, transport=pipeone) HASH(0xa49b60)
ok 124
ok 125
ok 126
ok 127 # skip caching of metadata methods returning sth not yet implemented
ok 128 # skip caching of metadata methods returning sth not yet implemented
ok 129
ok 130
# =============
# Testing pipeone transport with rush policy
# dbi:Gofer:transport=pipeone;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 131 - should connect to dbi:Gofer:transport=pipeone;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 132
ok 133
ok 134
ok 135 - The object isa DBI::st
ok 136
ok 137
ok 138
ok 139
ok 140
ok 141
ok 142 - go_response executed flag should be true
ok 143
ok 144
ok 145
ok 146
# Testing go_request_count and caching of simple values
ok 147
ok 148
ok 149
# use_remote=0 (policy=rush, transport=pipeone) HASH(0xab6d98)
ok 150
ok 151
ok 152
ok 153 # skip caching of metadata methods returning sth not yet implemented
ok 154 # skip caching of metadata methods returning sth not yet implemented
ok 155
ok 156
# =============
# Testing stream transport with pedantic policy
# dbi:Gofer:transport=stream;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 157 - should connect to dbi:Gofer:transport=stream;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 158
ok 159
ok 160
ok 161 - should detect prepare failure
ok 162
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168 - go_response executed flag should be true
ok 169
ok 170
ok 171
ok 172
# Testing go_request_count and caching of simple values
ok 173
ok 174
ok 175
# use_remote=1 (policy=pedantic, transport=stream) HASH(0xadaee8)
ok 176
ok 177
ok 178
ok 179 # skip caching of metadata methods returning sth not yet implemented
ok 180 # skip caching of metadata methods returning sth not yet implemented
ok 181
ok 182
# =============
# Testing stream transport with classic policy
# dbi:Gofer:transport=stream;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 183 - should connect to dbi:Gofer:transport=stream;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 184
ok 185
ok 186
ok 187 - The object isa DBI::st
ok 188
ok 189
ok 190
ok 191
ok 192
ok 193
ok 194 - go_response executed flag should be true
ok 195
ok 196
ok 197
ok 198
# Testing go_request_count and caching of simple values
ok 199
ok 200
ok 201
# use_remote=0 (policy=classic, transport=stream) HASH(0xabef58)
ok 202
ok 203
ok 204
ok 205 # skip caching of metadata methods returning sth not yet implemented
ok 206 # skip caching of metadata methods returning sth not yet implemented
ok 207
ok 208
# =============
# Testing stream transport with rush policy
# dbi:Gofer:transport=stream;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 209 - should connect to dbi:Gofer:transport=stream;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 210
ok 211
ok 212
ok 213 - The object isa DBI::st
ok 214
ok 215
ok 216
ok 217
ok 218
ok 219
ok 220 - go_response executed flag should be true
ok 221
ok 222
ok 223
ok 224
# Testing go_request_count and caching of simple values
ok 225
ok 226
ok 227
# use_remote=0 (policy=rush, transport=stream) HASH(0xadae28)
ok 228
ok 229
ok 230
ok 231 # skip caching of metadata methods returning sth not yet implemented
ok 232 # skip caching of metadata methods returning sth not yet implemented
ok 233
ok 234
1..234
ok
t/zvp_86gofer_fail.t ....... skipped: requires Callbacks which are not supported with PurePerl
t/zvp_87gofer_cache.t ......
using DBI::Util::CacheMemory=HASH(0x735848) for dbi:Gofer:transport=null;policy=classic;dsn=dbi:ExampleP:
ok 1
ok 2
ok 3 - cache should be empty after clear
ok 4 - transmit_count should be 0
ok 5
ok 6 - cache should not be empty after select
ok 7
ok 8
ok 9
ok 10 - should make 1 round trip
ok 11 - transmit_count should be 0
ok 12
ok 13
ok 14 - should make 1 round trip
ok 15
ok 16
ok 17
using 1 for dbi:Gofer:transport=null;policy=classic;dsn=dbi:ExampleP:
ok 18
ok 19
ok 20 - cache should be empty after clear
ok 21 - transmit_count should be 0
ok 22
ok 23 - cache should not be empty after select
ok 24
ok 25
ok 26
ok 27 - should make 1 round trip
ok 28 - transmit_count should be 0
ok 29
ok 30
ok 31 - should make 1 round trip
ok 32
ok 33
ok 34
test per-sth go_cache
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
1..47
ok
t/zvp_90sql_type_cast.t ....
1..26
ok 1 - result, undef
ok 2 # skip DiscardString not supported in PurePerl
ok 3 # skip DiscardString not supported in PurePerl
ok 4 - result, invalid sql type
ok 5 - json invalid sql type
ok 6 - result, non numeric cast to int
ok 7 - json non numeric cast to int
ok 8 - result, non numeric cast to int (strict)
ok 9 - json non numeric cast to int (strict)
ok 10 - result, small int cast to int
ok 11 - json small int cast to int
ok 12 - result, 2 byte max signed int cast to int
ok 13 - json 2 byte max signed int cast to int
ok 14 - result, 2 byte max unsigned int cast to int
ok 15 - json 2 byte max unsigned int cast to int
ok 16 - result, 4 byte max signed int cast to int
ok 17 - json 4 byte max signed int cast to int
ok 18 - result, 4 byte max unsigned int cast to int
ok 19 - json 4 byte max unsigned int cast to int
ok 20 - result, small int cast to int (discard)
ok 21 # skip DiscardString not supported in PurePerl
ok 22 # skip DiscardString not supported in PurePerl
ok 23 - result, non numeric cast to numeric
ok 24 - json non numeric cast to numeric
ok 25 - result, non numeric cast to numeric (strict)
ok 26 - json non numeric cast to numeric (strict)
ok
t/zvxgp_01basics.t .........
1..130
ok 1 - use DBI;
ok 2 - ... testing sql_type
ok 3 - ... testing sql_type
ok 4 - ... testing sql_type
ok 5 - ... testing sql_type
ok 6 - ... testing sql_type
ok 7 - ... testing sql_type
ok 8 - ... testing sql_type
ok 9 - ... testing sql_type
ok 10 - ... testing sql_type
ok 11 - ... testing sql_type
ok 12 - ... testing sql_type
ok 13 - ... testing sql_type
ok 14 - ... testing sql_type
ok 15 - ... testing sql_type
ok 16 - ... testing sql_type
ok 17 - ... testing sql_type
ok 18 - ... testing sql_type
ok 19 - ... testing sql_type
ok 20 - ... testing sql_type
ok 21 - ... testing sql_type
ok 22 - ... testing sql_type
ok 23 - ... testing sql_type
ok 24 - ... testing sql_type
ok 25 - ... testing sql_type
ok 26 - ... testing sql_type
ok 27 - ... testing sql_type
ok 28 - ... testing sql_type
ok 29 - ... testing sql_type
ok 30 - ... testing sql_type
ok 31 - ... testing sql_type
ok 32 - ... testing sql_type
ok 33 - ... testing sql_type
ok 34 - ... testing sql_type
ok 35 - ... testing sql_type
ok 36 - ... testing sql_type
ok 37 - ... testing sql_type
ok 38 - ... testing sql_type
ok 39 - ... testing sql_type
ok 40 - ... testing sql_type
ok 41 - ... testing sql_type
ok 42 - ... testing sql_type
ok 43 - ... testing sql_type
ok 44 - ... testing sql_type
ok 45 - ... testing sql_type
ok 46 - ... testing sql_type
ok 47 - ... testing sql_type
ok 48 - ... testing sql_type
ok 49 - ... testing sql_type
ok 50 - ... testing sql_type
ok 51 - ... testing sql_type
ok 52 - ... testing sql_type
ok 53 - ... testing sql_type
ok 54 - ... testing sql_type
ok 55 - ... testing sql_type
ok 56 - ... testing sql_type
ok 57 - ... testing sql_type
ok 58 - ... testing sql_type
ok 59 - ... testing sql_type
ok 60 - ... testing sql_cursor_types
ok 61 - ... testing sql_cursor_types
ok 62 - ... testing sql_cursor_types
ok 63 - ... testing sql_cursor_types
ok 64 - ... testing sql_cursor_types
ok 65 - ... looks_like_number : undef -> undef
ok 66 - ... looks_like_number : "" -> undef (eg "don't know")
ok 67 - ... looks_like_number : "foo" -> defined false
ok 68 - ... looks_like_number : "foo" -> defined false
ok 69 - ... looks_like_number : 1 -> true
ok 70 - ... looks_like_number : "." -> false
ok 71 - ... looks_like_number : 1 -> true
ok 72 - ... looks_like_number : 1 -> true
ok 73 - ... 1000 initial state is 400
ok 74 - ... neat : 1 + 1 -> "2"
ok 75 - ... neat : 2 -> "'2'"
ok 76 - ... neat : undef -> "undef"
ok 77 - ... test array argument w/seperator and maxlen
ok 78 - ... test array argument w/out seperator or maxlen
ok 79 - The object isa DBI::dr
ok 80 - ... test debug
ok 81 - ... test DebugDispatch
ok 82 - ... test Warn
ok 83 - ... this should say Tim Bunce
ok 84 - ... the version should match DBI version
ok 85 - ... this should work and return 1
ok 86 - ... this should equal 1
ok 87 - ... CachedKids should be undef initially
ok 88 - ... CachedKids should be our ref
ok 89 - ... this should be zero
ok 90 - ... this should be zero
ok 91 - ... Active flag is true
ok 92 - ... we should get a warning here
ok 93 - ... we should get a warning here
ok 94 - ... we should get no warnings here
ok 95 - ... we at least have one driver installed
ok 96 - ... we should at least have ExampleP installed
ok 97 - ... we should at least have one driver
ok 98 - ... should be -1077531989
ok 99 - ... should be -1077531989
ok 100 - ... should be -1077531990
ok 101 # skip Seems like your Math::BigInt 1.89 has a bug
ok 102 # skip Seems like your Math::BigInt 1.89 has a bug
ok 103
ok 104
ok 105
ok 106
ok 107
ok 108
ok 109
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116
ok 117
ok 118
ok 119
ok 120
ok 121
ok 122
ok 123
ok 124 # skip developer tests
ok 125 # skip developer tests
ok 126 # skip developer tests
ok 127 # skip developer tests
ok 128 - ... DBI::dbi_debug's initial state is 0
ok 129 - ... DBI::dbi_debug is 15
ok 130 - ... DBI::dbi_debug is 0
ok
t/zvxgp_02dbidrv.t .........
1..53
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - ... DBD::Test->driver called to getnew Driver handle
ok 5 - ... new Driver handle (DBI::dr=HASH(0x2e5380)) created successfully
ok 6 - The object isa DBI::dr
ok 7 - ... got a Test Driver object back from DBI->install_driver
ok 8 - The object isa DBI::dr
ok 9 - ... checking the DBI::_get_imp_data function
ok 10 - ... Driver object passed to data_sources
ok 11 - The object isa DBI::dr
ok 12 - ... Driver object is not tied
ok 13 - ... got correct datasources from DBI->data_sources("Test")
ok 14 # skip Kids attribute not supported under DBI::PurePerl
ok 15 - ... got a database handle from calling $drh->connect
ok 16 - The object isa DBI::db
ok 17 # skip Kids attribute not supported under DBI::PurePerl
ok 18 - ... Driver object passed to data_sources
ok 19 - The object isa DBI::dr
ok 20 - ... Driver object is not tied
ok 21 - ... checking fetched datasources from Driver
ok 22 - ... got correct datasources from $dbh->data_sources()
ok 23 - ... Database object passed to do
ok 24 - The object isa DBI::db
ok 25 - ... Database object is not tied
ok 26 - ... got Driver object from Database object with Driver attribute
ok 27 - The object isa DBI::dr
ok 28 - ... Driver object is not tied
ok 29 - ... got Driver object from Database object by FETCH-ing Driver attribute
ok 30 - The object isa DBI::dr
ok 31 # skip running DBI::PurePerl
ok 32 - ... this will trigger more driver internal tests above in DBD::Test::db
ok 33 - ... checking Driver handle err set with set_err method
ok 34 - ... checking Database handle err set with set_err method
ok 35 - ... checking Database handle err set with Driver handle set_err method
ok 36 # skip Kids attribute not supported under DBI::PurePerl
ok 37 - ... $dbh->DESTROY should set $drh->err to 42
ok 38 - ... checking $DBI::err set with Driver handle set_err method
ok 39 - ... checking $DBI::errstr
ok 40 - ... checking $DBI::state
ok 41 - ... checking $DBI::state
ok 42 - ... checking $DBI::state
ok 43 # skip using DBI::PurePerl
ok 44 - ... FetchHashKeyName is NAME
ok 45 - ... FetchHashKeyName is now changed to NAME_lc
ok 46 - ... calling $drh->disconnect_all (not implemented but will fail silently)
ok 47 - has dbixs_revision
ok 48 - has integer dbixs_revision
ok 49 # skip using DBI::PurePerl
ok 50 # skip using DBI::PurePerl
ok 51 # skip using DBI::PurePerl
ok 52 # skip using DBI::PurePerl
ok 53 # skip using DBI::PurePerl
ok
t/zvxgp_03handle.t .........
1..137
ok 1 - use DBI;
ok 2
ok 3 - The object isa DBI::dr
ok 4 # skip Kids attribute not supported under DBI::PurePerl
ok 5
ok 6
ok 7
ok 8 - The object isa DBI::db
ok 9 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 10 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 11 - The object isa DBI::st
ok 12 - ... execute ran successfully
ok 13 - ... we got the CachedKids hash
ok 14 - ... there is one CachedKid
ok 15 - ... our statment handle should be in the CachedKids
ok 16 - ... our first statment is Active
ok 17 - The object isa DBI::st
ok 18 - ... prepare_cached returned the same statement handle
ok 19 - ... we got warned about our first statement handle being still active
ok 20 - ... our first statment is no longer Active since we re-prepared it
ok 21 - The object isa DBI::st
ok 22 - ... prepare_cached returned a different statement handle now
ok 23 - ... there are two CachedKids
ok 24 - ... both statment handles should be in the CachedKids
ok 25 - ... executing first statement handle again
ok 26 - ... first statement handle is now active again
ok 27 - The object isa DBI::st
ok 28 - ... our fourth statement handle is not the same as our first
ok 29 - ... first statement handle is still active
ok 30 - ... there are two CachedKids
ok 31 - ... second and fourth statment handles should be in the CachedKids
ok 32 - ... first statement handle is no longer active
ok 33 - ... fourth statement handle executed properly
ok 34 - ... fourth statement handle is Active
ok 35 - The object isa DBI::st
ok 36 - ... we still only got one warning
ok 37 - ... fourth statement handle and fifth one match
ok 38 - ... fourth statement handle is not Active
ok 39 - ... fifth statement handle is not Active (shouldnt be its the same as fifth)
ok 40 - ... there are two CachedKids
ok 41 - ... second and fourth/fifth statment handles should be in the CachedKids
ok 42 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 43 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 44 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 45 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 46 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 47 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 48 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 49 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 50 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 51 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 52 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 53 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 54 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 55 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 56 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 57 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 58 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 59 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 60 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 61 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 62 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 63 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 64 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 65 - ping should be true before disconnect
ok 66 - ping should be false after disconnect
ok 67 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 68 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 69 # skip Kids attribute not supported under DBI::PurePerl
ok 70 # skip Kids attribute not supported under DBI::PurePerl
ok 71 # skip Kids attribute not supported under DBI::PurePerl
ok 72 # skip Kids attribute not supported under DBI::PurePerl
ok 73 # skip Kids attribute not supported under DBI::PurePerl
ok 74 # skip Kids attribute not supported under DBI::PurePerl
ok 75 # skip Kids attribute not supported under DBI::PurePerl
ok 76 # skip Kids attribute not supported under DBI::PurePerl
ok 77 # skip Kids attribute not supported under DBI::PurePerl
ok 78 # skip Kids attribute not supported under DBI::PurePerl
ok 79 # skip Kids attribute not supported under DBI::PurePerl
ok 80 # skip Kids attribute not supported under DBI::PurePerl
ok 81 # skip Kids attribute not supported under DBI::PurePerl
ok 82 # skip Kids attribute not supported under DBI::PurePerl
ok 83 # skip Kids attribute not supported under DBI::PurePerl
ok 84 # skip Kids attribute not supported under DBI::PurePerl
ok 85 # skip Kids attribute not supported under DBI::PurePerl
ok 86 # skip Kids attribute not supported under DBI::PurePerl
ok 87 # skip Kids attribute not supported under DBI::PurePerl
ok 88 # skip Kids attribute not supported under DBI::PurePerl
ok 89 # skip Kids attribute not supported under DBI::PurePerl
ok 90 # skip Kids attribute not supported under DBI::PurePerl
ok 91 # skip Kids attribute not supported under DBI::PurePerl
ok 92 # skip Kids attribute not supported under DBI::PurePerl
ok 93 # skip Kids attribute not supported under DBI::PurePerl
ok 94 # skip Kids attribute not supported under DBI::PurePerl
ok 95 # skip take_imp_data test not supported under DBD::Gofer
ok 96 # skip take_imp_data test not supported under DBD::Gofer
ok 97 # skip take_imp_data test not supported under DBD::Gofer
ok 98 # skip take_imp_data test not supported under DBD::Gofer
ok 99 # skip take_imp_data test not supported under DBD::Gofer
ok 100 # skip take_imp_data test not supported under DBD::Gofer
ok 101 # skip take_imp_data test not supported under DBD::Gofer
ok 102 # skip take_imp_data test not supported under DBD::Gofer
ok 103 # skip take_imp_data test not supported under DBD::Gofer
ok 104 # skip take_imp_data test not supported under DBD::Gofer
ok 105 # skip take_imp_data test not supported under DBD::Gofer
ok 106 # skip take_imp_data test not supported under DBD::Gofer
ok 107 # skip take_imp_data test not supported under DBD::Gofer
ok 108 # skip take_imp_data test not supported under DBD::Gofer
ok 109 # skip take_imp_data test not supported under DBD::Gofer
ok 110 # skip take_imp_data test not supported under DBD::Gofer
ok 111 # skip take_imp_data test not supported under DBD::Gofer
ok 112 # skip take_imp_data test not supported under DBD::Gofer
ok 113 # skip take_imp_data test not supported under DBD::Gofer
ok 114 # skip Kids attribute not supported under DBI::PurePerl
ok 115 - The object isa DBI::dr
ok 116 # skip Kids attribute not supported under DBI::PurePerl
ok 117 - The object isa DBI::db
ok 118 - The object isa DBI::st
ok 119 - ... NUM_OF_PARAMS is 0
ok 120 - ... NUM_OF_FIELDS should be undef
ok 121 - ... Statement is "foo bar"
ok 122 - ... NAME is undefined
ok 123 - ... TYPE is undefined
ok 124 - ... SCALE is undefined
ok 125 - ... PRECISION is undefined
ok 126 - ... NULLABLE is undefined
ok 127 - ... RowsInCache is undefined
ok 128 - ... ParamValues is undefined
ok 129 - ... NAME_uc is undefined
ok 130 - ... NAME_lc is undefined
ok 131 - ... NAME_hash is undefined
ok 132 - ... NAME_uc_hash is undefined
ok 133 - ... NAME_lc_hash is undefined
ok 134 - ... $dbh can call "prepare"
ok 135 - ... $dbh cannot call "nonesuch"
ok 136 - ... $sth can call "execute"
ok 137 # skip Kids attribute not supported under DBI::PurePerl
ok
t/zvxgp_04mods.t ...........
1..12
ok 1 - use DBI;
ok 2 - use DBI::Const::GetInfo::ANSI;
ok 3 - use DBI::Const::GetInfo::ODBC;
ok 4 - use DBI::Const::GetInfoType;
ok 5 - use DBI::Const::GetInfoReturn;
ok 6 - ... we have at least one key in the GetInfoType hash
ok 7 - ... the GetInfoType hash is constructed from the ANSI and ODBC hashes
ok 8 - ... we have at least one key in the GetInfoReturnType hash
ok 9 - ... the GetInfoReturnType hash is constructed from the ANSI and ODBC hashes
ok 10 - ... we have at least one key in the GetInfoReturnValues hash
ok 11 - DBI::Const::GetInfoReturn->can('Format')
ok 12 - DBI::Const::GetInfoReturn->can('Explain')
ok
t/zvxgp_05concathash.t .....
1..41
ok 1 - use DBI;
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9 - should work with nul bytes in kv_sep and pair_sep
ok 10 - should work with nul bytes in hash value (neat)
ok 11 - should work with nul bytes in hash value (not neat)
ok 12
ok 13
ok 14
ok 15 - test
ok 16 - test
ok 17 - Unknown sort order
ok 18 - Float Hash - Not Neat lexical
ok 19 - Numeric - Not Neat lexical
ok 20 - Mixed Hash - Not Neat lexical
ok 21 - Simple Hash - Not Neat lexical
ok 22 - Float Hash - Neat lexical
ok 23 - Numeric - Neat lexical
ok 24 - Mixed Hash - Neat lexical
ok 25 - Simple Hash - Neat lexical
ok 26 - Float Hash - Not Neat guess
ok 27 - Numeric - Not Neat guess
ok 28 - Mixed Hash - Not Neat guess
ok 29 - Simple Hash - Not Neat guess
ok 30 - Float Hash - Neat guess
ok 31 - Numeric - Neat guess
ok 32 - Mixed Hash - Neat guess
ok 33 - Simple Hash - Neat guess
ok 34 - Float Hash - Not Neat numeric
ok 35 - Numeric - Not Neat numeric
ok 36 - Mixed Hash - Not Neat numeric
ok 37 - Simple Hash - Not Neat numeric
ok 38 - Float Hash - Neat numeric
ok 39 - Numeric - Neat numeric
ok 40 - Mixed Hash - Neat numeric
ok 41 - Simple Hash - Neat numeric
ok
t/zvxgp_06attrs.t ..........
1..145
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking Warn attribute for dbh
ok 4 - ... checking Active attribute for dbh
ok 5 - ... checking AutoCommit attribute for dbh
ok 6 - ... checking CompatMode attribute for dbh
ok 7 - ... checking InactiveDestory attribute for dbh
ok 8 - ... checking PrintError attribute for dbh
ok 9 - ... checking PrintWarn attribute for dbh
ok 10 - ... checking RaiseError attribute for dbh
ok 11 - ... checking ShowErrorStatement attribute for dbh
ok 12 - ... checking ChopBlanks attribute for dbh
ok 13 - ... checking LongTrunkOk attribute for dbh
ok 14 - ... checking TaintIn attribute for dbh
ok 15 - ... checking TaintOut attribute for dbh
ok 16 - ... checking Taint attribute for dbh
ok 17 - ... checking Executed attribute for dbh
ok 18 - ... checking ErrCount attribute for dbh
ok 19 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 20 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 21 - ... checking CachedKids attribute for dbh
ok 22 - ... checking HandleError attribute for dbh
ok 23 - ... checking Profile attribute for dbh
ok 24 - ... checking Statement attribute for dbh
ok 25 - ... checking RowCacheSize attribute for dbh
ok 26 - ... checking ReadOnly attribute for dbh
ok 27 - ... checking FetchHashKeyName attribute for dbh
ok 28
ok 29 - ... checking TraceLevel attribute for dbh
ok 30 - ... checking LongReadLen attribute for dbh
ok 31 - should be able to FETCH_many
ok 32 - should see driver-private dbh attribute value
ok 33 - ... catching exception
ok 34 - ... $dbh->err is undefined
ok 35 - ... checking $dbh->errstr
ok 36 - ... checking $dbh->state
ok 37 - ... checking Executed attribute for dbh
ok 38 - ... checking Executed attribute for dbh (after reset)
ok 39 - ... checking ErrCount attribute for dbh (after error was generated)
ok 40 - The object isa DBI::dr
ok 41 - ... checking $dbh->err
ok 42 - ... checking ErrCount attribute for drh
ok 43 - ... checking Warn attribute for drh
ok 44 - ... checking Active attribute for drh
ok 45 - ... checking AutoCommit attribute for drh
ok 46 - ... checking CompatMode attribute for drh
ok 47 - ... checking InactiveDestory attribute for drh
ok 48 - ... checking PrintError attribute for drh
ok 49 - ... checking PrintWarn attribute for drh
ok 50 - ... checking RaiseError attribute for drh
ok 51 - ... checking ShowErrorStatement attribute for drh
ok 52 - ... checking ChopBlanks attribute for drh
ok 53 - ... checking LongTrunkOk attribute for drh
ok 54 - ... checking TaintIn attribute for drh
ok 55 - ... checking TaintOut attribute for drh
ok 56 - ... checking Taint attribute for drh
ok 57 # skip Executed attribute not supported under DBI::PurePerl
ok 58 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 59 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 60 - ... checking CachedKids attribute for drh
ok 61 - ... checking HandleError attribute for drh
ok 62 - ... checking Profile attribute for drh
ok 63 - ... checking ReadOnly attribute for drh
ok 64 - ... checking TraceLevel attribute for drh
ok 65 - ... checking LongReadLen attribute for drh
ok 66 - ... checking FetchHashKeyName attribute for drh
ok 67
ok 68 - The object isa DBI::st
ok 69 - ... checking Executed attribute for sth
ok 70 - ... checking Executed attribute for dbh
ok 71 - ... checking ErrCount attribute for sth
ok 72 - ... checking exception
ok 73 - ... checking $sth->errstr
ok 74 - ... checking $sth->state
ok 75 - ... checking Executed attribute for sth
ok 76 - ... checking Exceuted attribute for dbh
ok 77 - ... checking ErrCount attribute for sth
ok 78 - ... checking exception
ok 79 - ... checking ErrCount attribute for sth (after assignment)
ok 80 - ... checking ErrCount attribute for sth (after reset)
ok 81 - ... checking Warn attribute for sth
ok 82 - ... checking Active attribute for sth
ok 83 - ... checking CompatMode attribute for sth
ok 84 - ... checking InactiveDestroy attribute for sth
ok 85 - ... checking PrintError attribute for sth
ok 86 - ... checking PrintWarn attribute for sth
ok 87 - ... checking RaiseError attribute for sth
ok 88 - ... checking ShowErrorStatement attribute for sth
ok 89 - ... checking ChopBlanks attribute for sth
ok 90 - ... checking LongTrunkOk attribute for sth
ok 91 - ... checking TaintIn attribute for sth
ok 92 - ... checking TaintOut attribute for sth
ok 93 - ... checking Taint attribute for sth
ok 94 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 95 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 96 - ... checking CachedKids attribute for sth
ok 97 - ... checking HandleError attribute for sth
ok 98 - ... checking Profile attribute for sth
ok 99 - ... checking ReadOnly attribute for sth
ok 100 - ... checking TraceLevel attribute for sth
ok 101 - ... checking LongReadLen attribute for sth
ok 102 - ... checking FetchHashKeyName attribute for sth
ok 103 - ... checking CursorName attribute for sth
ok 104 - ... checking NUM_OF_FIELDS attribute for sth
ok 105 - ... checking NUM_OF_PARAMS attribute for sth
ok 106 - ... checking type of NAME attribute for sth
ok 107 - ... checking number of elements returned
ok 108 - ... checking values returned
ok 109 - ... checking type of NAME_lc attribute for sth
ok 110 - ... checking number of elements returned
ok 111 - ... checking values returned
ok 112 - ... checking type of NAME_uc attribute for sth
ok 113 - ... checking number of elements returned
ok 114 - ... checking values returned
ok 115 - ... checking type of NAME_hash attribute for sth
ok 116 - ... checking number of keys returned
ok 117 - ... checking values returned
ok 118 - ... checking values returned
ok 119 - ... checking type of NAME_lc_hash attribute for sth
ok 120 - ... checking number of keys returned
ok 121 - ... checking values returned
ok 122 - ... checking values returned
ok 123 - ... checking type of NAME_uc_hash attribute for sth
ok 124 - ... checking number of keys returned
ok 125 - ... checking values returned
ok 126 - ... checking values returned
ok 127 - ... checking type of TYPE attribute for sth
ok 128 - ... checking number of elements returned
ok 129 - ... checking values returned
ok 130 - ... checking type of NULLABLE attribute for sth
ok 131 - ... checking number of elements returned
ok 132 - ... checking values returned
ok 133 - ... checking type of PRECISION attribute for sth
ok 134 - ... checking number of elements returned
ok 135 - ... checking values returned
ok 136 - ... checking type of SCALE attribute for sth
ok 137 - ... checking number of elements returned
ok 138 - ... checking values returned
ok 139 - ... checking type of ParamValues attribute for sth
ok 140 - ... checking values returned
ok 141 - ... checking Statement attribute for sth
ok 142 - ... checking type of RowsInCache attribute for sth
ok 143 - should see driver-private sth attribute value
Checking inheritance
ok 144 # skip drh->dbh->sth inheritance test skipped with DBI_AUTOPROXY
ok 145 # skip drh->dbh->sth inheritance test skipped with DBI_AUTOPROXY
ok
t/zvxgp_07kids.t ........... skipped: $h->{Kids} attribute not supported for DBI::PurePerl
t/zvxgp_08keeperr.t ........
1..69
ok 1 - use DBI;
ok 2 - ... checking error
ok 3 - ... checking error
Test HandleSetErr
ok 4 - The object isa DBI::db
ok 5 - ... $DBI::err is not defined
HandleSetErr called: h=DBI::db=HASH(0x7c0458), err=, errstr=(got info), state=
ok 6 - ... $DBI::err is defined
ok 7 - ... $DBI::err is an empty string
ok 8 - ... $DBI::errstr is as we expected
ok 9 - ... $dbh->errstr matches $DBI::errstr
ok 10 - ... $warn{failed} is 0
ok 11 - ... $warn{warning} is 0
ok 12 - ... the @handlewarn array is (1, 0, 0)
HandleSetErr called: h=DBI::db=HASH(0x7c0458), err=0, errstr=(got warn), state=AA001
warn: 'DBD::Gofer::db set_err warning: (got info)\n(got warn) at ./t/08keeperr.t line 131\n'
ok 13 - ... $DBI::err is defined
ok 14 - ... $DBI::err is "0"
ok 15 - ... $DBI::errstr is as we expected
ok 16 - ... $dbh->errstr matches $DBI::errstr
ok 17 - ... $DBI::state is AA001
ok 18 - ... $warn{warning} is 1
ok 19 - ... the @handlewarn array is (1, 1, 0)
HandleSetErr called: h=DBI::db=HASH(0x7c0458), err=, errstr=(got more info), state=
warn: 'DBD::Gofer::db set_err warning: (got info)\n(got warn)\n(got more info) at ./t/08keeperr.t line 146\n'
ok 20 - ... $DBI::err is defined
ok 21 - ... $DBI::err is "0"
ok 22 - ... $dbh->err is "0"
ok 23 - ... $DBI::state is AA001
ok 24 - ... $DBI::errstr is as we expected
ok 25 - ... $dbh->errstr matches $DBI::errstr
ok 26 - ... $warn{warning} is 2
ok 27 - ... the @handlewarn array is (2, 1, 0)
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error) at ./t/08keeperr.t line 167\n'
ok 28 - ... $DBI::err is defined
ok 29 - ... $DBI::err is 42
ok 30 - ... $warn{warning} is 2
ok 31 - ... $dbh->errstr is as we expected
ok 32 - ... $DBI::state is AA002
ok 33 - ... the @handlewarn array is (2, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x7c0458), err=, errstr=(got info), state=
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info) at ./t/08keeperr.t line 179\n'
ok 34 - ... $DBI::err is defined
ok 35 - ... $DBI::err is 42
ok 36 - ... $warn{warning} is 2
ok 37 - ... $dbh->errstr is as we expected
ok 38 - ... the @handlewarn array is (3, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x7c0458), err=0, errstr=(got warn), state=
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) at ./t/08keeperr.t line 190\n'
ok 39 - ... $DBI::err is defined
ok 40 - ... $DBI::err is 42
ok 41 - ... $warn{warning} is 2
ok 42 - ... $dbh->errstr is as we expected
ok 43 - ... the @handlewarn array is (3, 2, 1)
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) [err was 42 now 4200] [state was AA002 now AA003]\n(got new error) at ./t/08keeperr.t line 201\n'
ok 44 - ... $DBI::err is defined
ok 45 - ... $DBI::err is 4200
ok 46 - ... $warn{warning} is 2
ok 47 - ... $dbh->errstr is as we expected
ok 48 - ... the @handlewarn array is (3, 2, 2)
ok 49 - ... $dbh->errstr is defined
ok 50 - ... $dbh->err is defined
ok 51 - ... $dbh->state is an empty string
warn: 'DBD::Gofer::db set_err failed: foo at ./t/08keeperr.t line 226\n'
ok 52 - ... only returned one value
ok 53 - ... the first value is undefined
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar at ./t/08keeperr.t line 230\n'
ok 54 - ... $dbh->set_err returned undefiend
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz at ./t/08keeperr.t line 231\n'
ok 55 - ... $dbh->set_err returned undefiend
HandleSetErr called: h=DBI::db=HASH(0x7c0458), err=0, errstr=warn, state=
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz\nwarn at ./t/08keeperr.t line 232\n'
ok 56 - ... $dbh->set_err returned undefiend
ok 57 - ... $dbh->errstr is as we expected
ok 58 - ... $warn{failed} is 4
ok 59 - ... the @handlewarn array is (0, 1, 3)
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 242\n'
ok 60 - ... only returned one value
ok 61 - ... the first value is undefined
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 246\n'
ok 62 - ... only returned one value
ok 63 - ... the first value is "42"
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 250\n'
ok 64 - ... returned no values
HandleSetErr called: h=DBI::db=HASH(0x7c0458), err=, errstr=info, state=override
warn: 'DBD::Gofer::db set_err failed: errstr99 at ./t/08keeperr.t line 257\n'
ok 65 - ... only returned one value
ok 66 - ... the first value is undefined
ok 67 - ... $dbh->err is 99
ok 68 - ... $dbh->errstr is as we expected
ok 69 - ... $dbh->state is as we expected
ok
t/zvxgp_09trace.t ..........
1..67
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - trace file size = 11654
ok 4 - ... checking TraceLevel attribute
ok 5 - ... trace file successfully created
parse_trace_flag SQL
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
parse_trace_flag foo
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
parse_trace_flag bar
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
parse_trace_flag baz
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
parse_trace_flag boo
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
parse_trace_flag bop
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53
parse_trace_flag SQL foo bar baz boo bop
ok 54 - ...
ok 55 - ...
inherit
ok 56 - The object isa DBI::st
ok 57
ok 58
ok 59
test unknown parse_trace_flag
ok 60
ok 61
caught warn: DBI::db=HASH(0xa3d568)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at DBI::PurePerl DBI::common::parse_trace_flags line 49
ok 62
ok 63
caught warn: DBI::db=HASH(0x34a5e0)->parse_trace_flags(nonesuch|SQL|nonesuch2) ignored unknown trace flags: 'nonesuch' 'nonesuch2' at DBI::PurePerl DBI::common::parse_trace_flags line 49
ok 64
ok 65
ok 66
ok 67
ok
t/zvxgp_10examp.t ..........
1..210
ok 1 - connect should fail
ok 2 - ... we should have an exception here
ok 3 - ... $dbh2 should not be defined
ok 4
ok 5
ok 6 - ... these 2 handles are cached, so they are the same
ok 7
ok 8 - ... this handle was created with different parameters, so it is not the same
ok 9
ok 10 - Executed should be true
ok 11
ok 12 - should return same handle
ok 13 - Executed should be false because reset by connect attributes
ok 14 - The object isa DBI::dr
ok 15 - ... these are our cached kids
ok 16 - ... we have emptied out cache
ok 17
ok 18 - ... PrintError should be 0
ok 19 - ... FetchHashKey is NAME
ok 20 - ... checking the example driver_path
others
ok 21
ok 22 - ping should return true
ok 23 - prepare should fail
ok 24 - sth->err should be true
ok 25 - DBI::err should be true
ok 26 - $DBI::err should match $dbh->err
ok 27 - $DBI::errstr should contain error string
ok 28 - $DBI::errstr should match $dbh->errstr
ok 29
ok 30
ok 31
ok 32 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 33 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 34 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53 - errstr should contain error message
ok 54
ok 55 - errstr should contain error message
ok 56
ok 57
ok 58 - errstr should contain error message
ok 59
ok 60 - errstr should contain error message
ok 61
ok 62
ok 63
ok 64
ok 65
ok 66
ok 67
ok 68
fetchrow_hashref('NAME_uc')
ok 69
ok 70
ok 71
ok 72
ok 73
fetchrow_hashref('ParamValues')
ok 74
ok 75
FetchHashKeyName
ok 76
ok 77
ok 78
ok 79
ok 80
ok 81
fetchall_arrayref
ok 82
ok 83
ok 84
ok 85
ok 86
ok 87
fetchall_arrayref array slice
ok 88
ok 89
ok 90
ok 91
fetchall_arrayref hash slice
ok 92
ok 93
ok 94
ok 95
fetchall_arrayref hash
ok 96
ok 97
ok 98
ok 99 - '16877 1024 .' ne '16877 1024 .'
rows()
ok 100 - row count 44
ok 101 - 44 vs 44
ok 102 - 44 vs 44
fetchall_arrayref array slice and max rows
ok 103
ok 104
ok 105
selectrow_array
ok 106
ok 107
selectrow_hashref
ok 108
ok 109
ok 110
ok 111
selectall_arrayref
ok 112
ok 113
ok 114
ok 115
selectall_arrayref Slice array slice
ok 116
ok 117
ok 118 - ". 16877" eq ". 16877"
ok 119
selectall_arrayref Columns array slice
ok 120
ok 121
ok 122 - ". 16877" eq ". 16877"
ok 123
selectall_arrayref hash slice
ok 124
ok 125
ok 126
ok 127
ok 128
ok 129
ok 130
selectall_hashref
ok 131 - selectall_hashref result
ok 132 - selectall_hashref HASH: HASH
ok 133
ok 134 - 1024 eq 1024
selectall_hashref by column number
ok 135
ok 136 - 1024 eq 1024
selectcol_arrayref
ok 137
ok 138
ok 139
selectcol_arrayref column slice
ok 140
ok 141
ok 142
ok 143
others...
ok 144
ok 145
RaiseError & PrintError & ShowErrorStatement
ok 146
ok 147
ok 148
ok 149
ok 150
ok 151
ok 152
ok 153
ok 154
ok 155
ok 156
ok 157
ok 158
ok 159
ok 160
ok 161 - DBD::Gofer::st execute failed: 2 values bound when 1 expected; DBD::ExampleP::st execute failed at DBI::PurePerl DBI::st::execute line 118. [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at DBI::PurePerl DBI::st::execute line 118.
#
ok 162 - DBD::Gofer::st execute failed: 2 values bound when 1 expected; DBD::ExampleP::st execute failed at DBI::PurePerl DBI::st::execute line 118. [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at DBI::PurePerl DBI::st::execute line 118.
#
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168
HandleError
ok 169
ok 170
HandleError -> die
ok 171
ok 172 - HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. [h=DBI::db=HASH(0x810c50), rv=undef, \#=3] at ./t/10examp.t line 395.
#
HandleError -> 0 -> RaiseError
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. [h=DBI::db=HASH(0x810c50), rv=undef, #=3]
ok 173
ok 174 - DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. at DBI::PurePerl DBI::db::prepare line 116.
#
HandleError -> 1 -> return (original)undef
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. [h=DBI::db=HASH(0x810c50), rv=undef, #=3]
ok 175 -
ok 176
HandleError -> 2 -> return (modified)42
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. [h=DBI::db=HASH(0x810c50), rv=undef, #=3]
ok 177 -
ok 178
ok 179
ok 180 - The object isa DBI::st
ok 181
ok 182
ok 183
ok 184 - Remove dumpcsr.tst
ok 185 - Actually gone
table_info
ok 186
Local /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE subdirs: lib ex .. . blib t
ok 187
ok 188
ok 189
tables
ok 190 - Table count mismatch5 vs 5
ok 191 - "schema"."table" ne "schema"."table"
ok 192 - "sch-ema"."table" ne "sch-ema"."table"
ok 193 - "schema"."ta-ble" ne "schema"."ta-ble"
ok 194 - "sch ema"."table" ne "sch ema"."table"
ok 195 - "schema"."ta ble" ne "schema"."ta ble"
Testing the fake directories (0).
ok 196
ok 197
ok 198 - 0 rows instead of 0
ok 199
Testing the fake directories (100).
ok 200
ok 201
ok 202 - 100 rows instead of 100
ok 203 - 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
Testing the fake directories (200).
ok 204
ok 205
ok 206 - 200 rows instead of 200
ok 207 - 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
Testing $dbh->func().
ok 208
ok 209
ok 210 - ping should return false after disconnect
ok
t/zvxgp_11fetch.t ..........
1..24
# fetchall_hashref(C1)
ok 1
ok 2
ok 3
ok 4
# fetchall_hashref(C2)
ok 5
ok 6
ok 7
ok 8
# fetchall_hashref([C2])
ok 9
ok 10
ok 11
ok 12
# fetchall_hashref([C1 C2])
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok
t/zvxgp_12quote.t ..........
1..10
ok 1 - ... quoting strings with embedded single quotes
ok 2 - ... quoting number as SQL_VARCHAR
ok 3 - ... quoting number as SQL_INTEGER
ok 4 - ... quoting undef as NULL
ok 5 - ... properly quotes foo as "foo"
ok 6 - ... properly quotes f"o as "f""o"
ok 7 - ... properly quotes foo, bar as "foo"."bar"
ok 8 - ... properly quotes undef, undef, bar as "bar"
ok 9 - ... properly quotes foo, undef, bar as "foo"."bar"
ok 10 # skip Can't test alternate quote_identifier logic with DBI_AUTOPROXY
ok
t/zvxgp_13taint.t .......... skipped: Taint attributes not supported with DBI::PurePerl
t/zvxgp_14utf8.t ...........
1..16
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok
t/zvxgp_15array.t ..........
1..55
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - The object isa DBI::st
ok 4 - ... we should have 0 rows
ok 5 - ... execute_array should return false
ok 6 - execute_array failure with RaiseError should have died
ok 7
ok 8 - ... we should have 2 rows
ok 9 - ... we should have 3 tuple_status
ok 10 - ... our rows are as expected
ok 11 - ... our tuple_status is as expected
ok 12 - ... bind_param_array should return true
ok 13 - ... execute_array should return true
ok 14 - ... we should have 3 rows
ok 15 - ... we should have 3 tuple_status
ok 16 - ... our rows are as expected
ok 17 - ... our tuple_status is as expected
ok 18 - ... execute_array should return true
ok 19 - ... we should have executed 3 rows
ok 20 - ... we should have affected 3 rows
ok 21 - ... execute_array should return true
ok 22 - ... execute_array should return 0 (but true)
ok 23 - ... we should have 0 rows
ok 24 - ... we should have 0 tuple_status
ok 25 - ... execute_array should return 1
ok 26 - ... we should have 1 rows
ok 27 - ... our rows are as expected
ok 28 - ... we should have 1 tuple_status
ok 29 - ... our tuple_status is as expected
ok 30 - ... execute_array should return 0
ok 31 - ... we should have 0 rows
ok 32 - ... we should have 0 tuple_status
ok 33 - The object isa DBI::st
ok 34 - ... execute_array should return true
ok 35 - ... execute_array should return 0 (but true)
ok 36 - ... we should have 0 rows
ok 37 - ... execute_array should return true
ok 38 - ... we should have 2 rows
ok 39 - ... we should have 2 tuple_status
ok 40 - ... rows should match
ok 41 - ... tuple_status should match
ok 42 - The object isa DBI::st
ok 43 - ... execute_array should return true
ok 44 - ... we should have 3 rows
ok 45 - ... we should have 3 tuple_status
ok 46 - ... rows should match
ok 47 - ... tuple status should match
ok 48 - ... execute_array should return undef
ok 49 - ... errstr is as expected
ok 50 - ... execute_array should return undef
ok 51 - ... errstr is as expected
ok 52 - ... execute_array should return undef
ok 53 - ... errstr is as expected
ok 54 - ... bind_param_array should return undef
ok 55 - ... errstr is as expected
ok
t/zvxgp_19fhtrace.t ........
1..27
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking TraceLevel attribute
ok 4 - ... regular fh: trace file successfully created
ok 5 - ... regular fh: filehandle successfully set
ok 6 - ... regular fh: trace_msg
ok 7 - ... regular fh: file successfully changed
Next logline
ok 8 - ... regular fh: trace_msg after changing trace output
ok 9 - Tracefile removed
ok 10 - Tracefile FOO opened
ok 11 - Tracefile created
ok 12 - Regression test
ok 13 - Traced message
ok 14 - Regression test
ok 15 - ... layered fh: file is layered: *** Test our layer
#
#
ok 16 - ... layered fh: filehandle successfully set
ok 17 - ... layered fh: trace_msg: Layered logline
#
#
DBI::db=HASH(0x8ede58) trace level set to 1 in DBI 1.611 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 18 - ... layered fh: close doesn't close: Layered logline
#
#
Next logline
ok 19 - ... layered fh: trace_msg after change trace output: Layered logline
#
#
ok 20 - ... scalar trace: file is layered: *** Test our layer
#
#
ok 21 - ... scalar trace: filehandle successfully set
ok 22 - ... scalar trace: *** Test our layer
# DBI::db=HASH(0x8ede58) trace level set to 1 in DBI 1.611 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
DBI::db=HASH(0x8ede58) trace level set to 1 in DBI 1.611 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 23 - ... scalar trace: close doesn't close: *** Test our layer
# DBI::db=HASH(0x8ede58) trace level set to 1 in DBI 1.611 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
Next logline
ok 24 - ... scalar trace: after change trace output: *** Test our layer
# DBI::db=HASH(0x8ede58) trace level set to 1 in DBI 1.611 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
-----> execute_request
-> DBI->connect(dbi:ExampleP:dummy, , ****, HASH(0x3499f8))
<- connect= DBI::db=HASH(0x90e330)
_std_response_attribute_names for ExampleP dbh: ChopBlanks LongReadLen LongTruncOk ReadOnly Name example_driver_path
<----- execute_request
gofer receive_response
ok 25 - ... logger: trace_msg
#
DBI::db=HASH(0x8ede58) trace level set to 1 in DBI 1.611 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 26 - ... logger: close doesn't close
#
Next logline
ok 27 - ... logger: trace_msg after change trace output
#
ok
t/zvxgp_20meta.t ...........
1..8
ok 1 - use DBI;
ok 2 - use DBI::DBD::Metadata;
ok 3 - The object isa DBI::db
ok 4
ok 5
ok 6
ok 7
ok 8
ok
t/zvxgp_30subclass.t .......
1..36
ok 1 - use DBI;
ok 2 - The object isa MyDBI::db
ok 3
ok 4 - The object isa MyDBI::db
ok 5
ok 6
ok 7 - The object isa MyDBI::st
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15 - The reference isa ARRAY
ok 16
ok 17
ok 18
ok 19
ok 20 - Clone A isa MyDBI::db
ok 21
ok 22
ok 23 - Clone B isa MyDBI::db
ok 24
ok 25
ok 26 - The object isa MyDBI::db
ok 27
ok 28 - installed method isa ARRAY
ok 29
ok 30
ok 31
ok 32
ok 33 - Failed connect \#1
ok 34
ok 35 - Failed connect \#2
ok 36
fetch 4 prepare 1
ok
t/zvxgp_35thrclone.t .......
1..20
ok 1 - use DBI;
ok 2 - ... assignment of neat_maxlen was successful
ok 3 - The object isa DBI::db
ok 4 - ... DBI::neat_maxlen still holding its value
ok 5 - The object isa DBI::db
ok 6 - ... new $dbh is not the same instance as $dbh_parent
ok 7
ok 8 - ... DBI::neat_maxlen still holding its value
ok 9 - The object isa DBI::db
ok 10 - ... new $dbh is not the same instance as $dbh_parent
ok 11
ok 12 - ... DBI::neat_maxlen still holding its value
ok 13 - The object isa DBI::db
ok 14 - ... new $dbh is not the same instance as $dbh_parent
ok 15
ok 16 - ... DBI::neat_maxlen still holding its value
ok 17 - The object isa DBI::db
ok 18 - ... new $dbh is not the same instance as $dbh_parent
ok 19
ok 20 - ... all tests have passed
ok
t/zvxgp_40profile.t ........ skipped: profiling not supported for DBI::PurePerl
t/zvxgp_41prof_dump.t ...... skipped: profiling not supported for DBI::PurePerl
t/zvxgp_42prof_data.t ...... skipped: profiling not supported for DBI::PurePerl
t/zvxgp_43prof_env.t ....... skipped: profiling not supported for DBI::PurePerl
t/zvxgp_50dbm.t ............
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable
Test count: 1 x 3 x 14 = 42
1..42
--- Using SDBM_File () ---
DBD::DBM 0.04 using SDBM_File
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
DBI::PurePerl 2.013911
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 1
ok 2 - The object isa DBI::db
ok 3 # skip Can't set attributes after connect using DBD::Gofer
ok 4 # skip Can't set attributes after connect using DBD::Gofer
ok 5
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
INSERT INTO SDBM_File_fruit VALUES (3, NULL )
INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
INSERT INTO SDBM_File_fruit VALUES (?,?); #5,via placeholders
UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
SELECT * FROM SDBM_File_fruit
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
DBD::DBM 0.04 using SDBM_File + MLDBM + Data::Dumper
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
DBI::PurePerl 2.013911
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 15
ok 16 - The object isa DBI::db
ok 17 # skip Can't set attributes after connect using DBD::Gofer
ok 18 # skip Can't set attributes after connect using DBD::Gofer
ok 19
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
INSERT INTO SDBM_File_fruit VALUES (2,'apples' , 0 )
INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
INSERT INTO SDBM_File_fruit VALUES (?,?,?); #5,via placeholders,15
UPDATE SDBM_File_fruit SET qux='12' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dKey=4
SELECT dKey,qux FROM SDBM_File_fruit
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
DBD::DBM 0.04 using SDBM_File + MLDBM + Storable
DBD::File 0.38
DBI::SQL::Nano 1.009744
DBI 1.611
DBI::PurePerl 2.013911
OS solaris (2.8)
Perl 5.010000 (sun4-solaris-thread-multi)
ok 29
ok 30 - The object isa DBI::db
ok 31 # skip Can't set attributes after connect using DBD::Gofer
ok 32 # skip Can't set attributes after connect using DBD::Gofer
ok 33
DROP TABLE IF EXISTS SDBM_File_fruit
CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
INSERT INTO SDBM_File_fruit VALUES (2,'apples' , 0 )
INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
INSERT INTO SDBM_File_fruit VALUES (?,?,?); #5,via placeholders,15
UPDATE SDBM_File_fruit SET qux='12' WHERE dKey=2
DELETE FROM SDBM_File_fruit WHERE dKey=4
SELECT dKey,qux FROM SDBM_File_fruit
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
DROP TABLE SDBM_File_fruit
ok
t/zvxgp_60preparse.t ....... skipped: preparse not supported for DBI::PurePerl
t/zvxgp_65transact.t ....... skipped: Transactions not supported by DBD::Gofer
t/zvxgp_70callbacks.t ...... skipped: $h->{Callbacks} attribute not supported for DBI::PurePerl
t/zvxgp_72childhandles.t ...
1..16
ok 1
ok 2
ok 3
ok 4
ok 5 - All handles should be undef now
ok 6 - ChildHandles should be an array-ref if wekref is available
ok 7
drh DBI::dr=HASH(0x79e908)
dbh DBI::db=HASH(0x933568)
sth DBI::st=HASH(0x91ac50)
sth DBI::st=HASH(0x91c5d0)
sth DBI::st=HASH(0x24d6d8)
ok 8
ok 9
ok 10
ok 11
ok 12 - handles should be gone now
ok 13
ok 14
ok 15 # skip slow tests avoided when using DBD::Gofer
ok 16 # skip slow tests avoided when using DBD::Gofer
ok
t/zvxgp_80proxy.t .......... skipped: modules required for proxy are probably not installed (e.g., RPC/PlClient.pm)
t/zvxgp_85gofer.t ..........
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0xa78a18)
ok 20 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 21 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 22 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0xa84d78)
ok 46 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 47 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 48 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0xa78508)
ok 72 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 73 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 74 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
# =============
# Testing pipeone transport with pedantic policy
# dbi:Gofer:transport=pipeone;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 79 - should connect to dbi:Gofer:transport=pipeone;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 80
ok 81
ok 82
ok 83 - should detect prepare failure
ok 84
ok 85
ok 86
ok 87
ok 88
ok 89
ok 90 - go_response executed flag should be true
ok 91
ok 92
ok 93
ok 94
# Testing go_request_count and caching of simple values
ok 95
ok 96
ok 97
# use_remote=1 (policy=pedantic, transport=pipeone) HASH(0xac5a70)
ok 98 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 99 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 100 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 101 # skip caching of metadata methods returning sth not yet implemented
ok 102 # skip caching of metadata methods returning sth not yet implemented
ok 103
ok 104
# =============
# Testing pipeone transport with classic policy
# dbi:Gofer:transport=pipeone;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 105 - should connect to dbi:Gofer:transport=pipeone;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 106
ok 107
ok 108
ok 109 - The object isa DBI::st
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116 - go_response executed flag should be true
ok 117
ok 118
ok 119
ok 120
# Testing go_request_count and caching of simple values
ok 121
ok 122
ok 123
# use_remote=0 (policy=classic, transport=pipeone) HASH(0x8b9200)
ok 124 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 125 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 126 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 127 # skip caching of metadata methods returning sth not yet implemented
ok 128 # skip caching of metadata methods returning sth not yet implemented
ok 129
ok 130
# =============
# Testing pipeone transport with rush policy
# dbi:Gofer:transport=pipeone;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 131 - should connect to dbi:Gofer:transport=pipeone;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 132
ok 133
ok 134
ok 135 - The object isa DBI::st
ok 136
ok 137
ok 138
ok 139
ok 140
ok 141
ok 142 - go_response executed flag should be true
ok 143
ok 144
ok 145
ok 146
# Testing go_request_count and caching of simple values
ok 147
ok 148
ok 149
# use_remote=0 (policy=rush, transport=pipeone) HASH(0xad00d0)
ok 150 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 151 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 152 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 153 # skip caching of metadata methods returning sth not yet implemented
ok 154 # skip caching of metadata methods returning sth not yet implemented
ok 155
ok 156
# =============
# Testing stream transport with pedantic policy
# dbi:Gofer:transport=stream;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 157 - should connect to dbi:Gofer:transport=stream;policy=pedantic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 158
ok 159
ok 160
ok 161 - should detect prepare failure
ok 162
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168 - go_response executed flag should be true
ok 169
ok 170
ok 171
ok 172
# Testing go_request_count and caching of simple values
ok 173
ok 174
ok 175
# use_remote=1 (policy=pedantic, transport=stream) HASH(0x991048)
ok 176 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 177 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 178 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 179 # skip caching of metadata methods returning sth not yet implemented
ok 180 # skip caching of metadata methods returning sth not yet implemented
ok 181
ok 182
# =============
# Testing stream transport with classic policy
# dbi:Gofer:transport=stream;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 183 - should connect to dbi:Gofer:transport=stream;policy=classic;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 184
ok 185
ok 186
ok 187 - The object isa DBI::st
ok 188
ok 189
ok 190
ok 191
ok 192
ok 193
ok 194 - go_response executed flag should be true
ok 195
ok 196
ok 197
ok 198
# Testing go_request_count and caching of simple values
ok 199
ok 200
ok 201
# use_remote=0 (policy=classic, transport=stream) HASH(0xac8318)
ok 202 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 203 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 204 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 205 # skip caching of metadata methods returning sth not yet implemented
ok 206 # skip caching of metadata methods returning sth not yet implemented
ok 207
ok 208
# =============
# Testing stream transport with rush policy
# dbi:Gofer:transport=stream;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 209 - should connect to dbi:Gofer:transport=stream;policy=rush;perl=/export/home/fly1003/bin/perl -Mblib=/export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib;timeout=240;dsn=dbi:DBM:dbm_type=SDBM_File;lockfile=0
ok 210
ok 211
ok 212
ok 213 - The object isa DBI::st
ok 214
ok 215
ok 216
ok 217
ok 218
ok 219
ok 220 - go_response executed flag should be true
ok 221
ok 222
ok 223
ok 224
# Testing go_request_count and caching of simple values
ok 225
ok 226
ok 227
# use_remote=0 (policy=rush, transport=stream) HASH(0xad0da0)
ok 228 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 229 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 230 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 231 # skip caching of metadata methods returning sth not yet implemented
ok 232 # skip caching of metadata methods returning sth not yet implemented
ok 233
ok 234
1..234
ok
t/zvxgp_86gofer_fail.t ..... skipped: requires Callbacks which are not supported with PurePerl
t/zvxgp_87gofer_cache.t .... skipped: Gofer DBI_AUTOPROXY
t/zvxgp_90sql_type_cast.t ..
1..26
ok 1 - result, undef
ok 2 # skip DiscardString not supported in PurePerl
ok 3 # skip DiscardString not supported in PurePerl
ok 4 - result, invalid sql type
ok 5 - json invalid sql type
ok 6 - result, non numeric cast to int
ok 7 - json non numeric cast to int
ok 8 - result, non numeric cast to int (strict)
ok 9 - json non numeric cast to int (strict)
ok 10 - result, small int cast to int
ok 11 - json small int cast to int
ok 12 - result, 2 byte max signed int cast to int
ok 13 - json 2 byte max signed int cast to int
ok 14 - result, 2 byte max unsigned int cast to int
ok 15 - json 2 byte max unsigned int cast to int
ok 16 - result, 4 byte max signed int cast to int
ok 17 - json 4 byte max signed int cast to int
ok 18 - result, 4 byte max unsigned int cast to int
ok 19 - json 4 byte max unsigned int cast to int
ok 20 - result, small int cast to int (discard)
ok 21 # skip DiscardString not supported in PurePerl
ok 22 # skip DiscardString not supported in PurePerl
ok 23 - result, non numeric cast to numeric
ok 24 - json non numeric cast to numeric
ok 25 - result, non numeric cast to numeric (strict)
ok 26 - json non numeric cast to numeric (strict)
ok
All tests successful.
Files=134, Tests=6244, 192 wallclock secs ( 4.46 usr 1.20 sys + 170.36 cusr 14.93 csys = 190.95 CPU)
Result: PASS
PERL_DL_NONLAZY=1 /export/home/fly1003/bin/perl "-Iblib/lib" "-Iblib/arch" test.pl
test.pl
DBI test application $Revision: 12537 $
Switch: DBI 1.611 by Tim Bunce, 1.611
Available Drivers: AnyData, CSV, Chart, DBM, ExampleP, Excel, File, Gofer, LDAP, Log, MVS_FTPSQL, Mock, Multiplex, ODBC, Ovrimos, PO, PgLite, PgPP, Proxy, SQLRelay, SQLite, Sponge, Sprite, TSM, Template, TemplateSS, Wire10, XBase, iPod, mysql, mysqlPP
dbi:ExampleP:: testing 3 sets of 20 connections:
Connecting... 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
Disconnecting...
Connecting... 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
Disconnecting...
Connecting... 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
Disconnecting...
connect 20 and disconnect them, 3 times: 0.0141s / 60 = 0.0002s
Testing handle creation speed...
9950 NullP sth/s perl 5.010000 sun4-solaris-thread-multi (cc Forte -O) 0.000100s
test.pl done
TIMB/DBI-1.611.tar.gz
make test TEST_VERBOSE=1 -- OK
Tim Bunce <Tim.Bunce@pobox.com>
Database independent interface for Perl
>>> (cd /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE && tar cvf - DBI-1.611.ppd blib) | gzip -c >/export/home/fly1003/var/REPO/T/TI/TIMB/DBI-1.611.tar.gz
DBI-1.611.ppd
blib/
blib/lib/
blib/lib/DBI/
blib/lib/DBI/Changes.pm
blib/lib/DBI/Roadmap.pm
blib/lib/DBI/Gofer/
blib/lib/DBI/Gofer/Response.pm
blib/lib/DBI/Gofer/Transport/
blib/lib/DBI/Gofer/Transport/Base.pm
blib/lib/DBI/Gofer/Transport/stream.pm
blib/lib/DBI/Gofer/Transport/pipeone.pm
blib/lib/DBI/Gofer/Serializer/
blib/lib/DBI/Gofer/Serializer/DataDumper.pm
blib/lib/DBI/Gofer/Serializer/Storable.pm
blib/lib/DBI/Gofer/Serializer/Base.pm
blib/lib/DBI/Gofer/Request.pm
blib/lib/DBI/Gofer/Execute.pm
blib/lib/DBI/Util/
blib/lib/DBI/Util/_accessor.pm
blib/lib/DBI/Util/CacheMemory.pm
blib/lib/DBI/Const/
blib/lib/DBI/Const/GetInfoType.pm
blib/lib/DBI/Const/GetInfo/
blib/lib/DBI/Const/GetInfo/ODBC.pm
blib/lib/DBI/Const/GetInfo/ANSI.pm
blib/lib/DBI/Const/GetInfoReturn.pm
blib/lib/DBI/DBD/
blib/lib/DBI/DBD/Metadata.pm
blib/lib/DBI/ProfileDumper/
blib/lib/DBI/ProfileDumper/Apache.pm
blib/lib/DBI/ProfileSubs.pm
blib/lib/DBI/FAQ.pm
blib/lib/DBI/SQL/
blib/lib/DBI/SQL/Nano.pm
blib/lib/DBI/W32ODBC.pm
blib/lib/DBI/Profile.pm
blib/lib/DBI/ProfileDumper.pm
blib/lib/DBI/ProxyServer.pm
blib/lib/DBI/DBD.pm
blib/lib/DBI/PurePerl.pm
blib/lib/DBI/ProfileData.pm
blib/lib/DBD/
blib/lib/DBD/Proxy.pm
blib/lib/DBD/DBM.pm
blib/lib/DBD/Gofer/
blib/lib/DBD/Gofer/Transport/
blib/lib/DBD/Gofer/Transport/pipeone.pm
blib/lib/DBD/Gofer/Transport/Base.pm
blib/lib/DBD/Gofer/Transport/stream.pm
blib/lib/DBD/Gofer/Transport/null.pm
blib/lib/DBD/Gofer/Policy/
blib/lib/DBD/Gofer/Policy/rush.pm
blib/lib/DBD/Gofer/Policy/classic.pm
blib/lib/DBD/Gofer/Policy/Base.pm
blib/lib/DBD/Gofer/Policy/pedantic.pm
blib/lib/DBD/File.pm
blib/lib/DBD/NullP.pm
blib/lib/DBD/Gofer.pm
blib/lib/DBD/Sponge.pm
blib/lib/DBD/ExampleP.pm
blib/lib/Roadmap.pod
blib/lib/dbixs_rev.pl
blib/lib/DBI.pm
blib/lib/Bundle/
blib/lib/Bundle/DBI.pm
blib/lib/TASKS.pod
blib/lib/Win32/
blib/lib/Win32/DBIODBC.pm
blib/arch/
blib/arch/auto/
blib/arch/auto/DBI/
blib/arch/auto/DBI/Driver_xst.h
blib/arch/auto/DBI/DBIXS.h
blib/arch/auto/DBI/Driver.xst
blib/arch/auto/DBI/dbi_sql.h
blib/arch/auto/DBI/dbivport.h
blib/arch/auto/DBI/dbd_xsh.h
blib/arch/auto/DBI/dbixs_rev.h
blib/arch/auto/DBI/dbipport.h
blib/arch/auto/DBI/DBI.so
blib/arch/auto/DBI/DBI.bs
blib/script/
blib/script/dbiprof
blib/script/dbiproxy
blib/script/dbilogstrip
blib/man1/
blib/man1/dbiprof.1
blib/man1/dbiproxy.1
blib/man1/dbilogstrip.1
blib/man3/
blib/man3/DBI::Gofer::Response.3
blib/man3/DBD::Proxy.3
blib/man3/DBI::Gofer::Transport::Base.3
blib/man3/DBD::DBM.3
blib/man3/DBI::Gofer::Serializer::DataDumper.3
blib/man3/DBI::Const::GetInfoType.3
blib/man3/Roadmap.3
blib/man3/DBI::DBD::Metadata.3
blib/man3/DBI::Const::GetInfo::ODBC.3
blib/man3/DBD::Gofer::Transport::pipeone.3
blib/man3/DBI::ProfileDumper::Apache.3
blib/man3/DBD::File.3
blib/man3/DBI::Util::CacheMemory.3
blib/man3/DBI::ProfileSubs.3
blib/man3/DBI.3
blib/man3/DBD::Gofer.3
blib/man3/DBD::Gofer::Transport::Base.3
blib/man3/DBI::FAQ.3
blib/man3/DBD::Gofer::Policy::rush.3
blib/man3/DBI::SQL::Nano.3
blib/man3/DBI::Gofer::Request.3
blib/man3/DBI::Const::GetInfo::ANSI.3
blib/man3/DBD::Gofer::Transport::stream.3
blib/man3/DBD::Gofer::Policy::classic.3
blib/man3/DBI::Gofer::Transport::stream.3
blib/man3/DBI::Gofer::Serializer::Storable.3
blib/man3/DBD::Gofer::Policy::Base.3
blib/man3/DBI::Const::GetInfoReturn.3
blib/man3/DBD::Sponge.3
blib/man3/DBI::W32ODBC.3
blib/man3/DBD::Gofer::Policy::pedantic.3
blib/man3/DBI::Gofer::Transport::pipeone.3
blib/man3/DBD::Gofer::Transport::null.3
blib/man3/Bundle::DBI.3
blib/man3/TASKS.3
blib/man3/DBI::Profile.3
blib/man3/DBI::ProfileDumper.3
blib/man3/DBI::Gofer::Serializer::Base.3
blib/man3/DBI::ProxyServer.3
blib/man3/DBI::Gofer::Execute.3
blib/man3/DBI::DBD.3
blib/man3/Win32::DBIODBC.3
blib/man3/DBI::PurePerl.3
blib/man3/DBI::ProfileData.3
>>> mv /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/DBI-1.611.ppd /export/home/fly1003/var/REPO/T/TI/TIMB
Running test for module 'DBI'
Running make for T/TI/TIMB/DBI-1.611.tar.gz
Prepending /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/arch /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/lib to PERL5LIB for 'get'
Has already been unwrapped into directory /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE
Prepending /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/arch /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/lib to PERL5LIB for 'make'
Has already been made
Prepending /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/arch /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/lib to PERL5LIB for 'test'
Running make test
Has already been tested successfully
Running make for H/HM/HMBRAND/DBD-CSV-0.29.tgz
Prepending /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/arch /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/lib to PERL5LIB for 'get'
Has already been unwrapped into directory /export/home/fly1003/var/cpan/build/DBD-CSV-0.29-ge6GeB
Prepending /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/arch /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/lib to PERL5LIB for 'make'
CPAN.pm: Going to build H/HM/HMBRAND/DBD-CSV-0.29.tgz
>>> make
cp lib/Bundle/DBD/CSV.pm blib/lib/Bundle/DBD/CSV.pm
cp lib/DBD/CSV.pm blib/lib/DBD/CSV.pm
Manifying blib/man3/Bundle::DBD::CSV.3
Manifying blib/man3/DBD::CSV.3
HMBRAND/DBD-CSV-0.29.tgz
make -- OK
Prepending /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/arch /export/home/fly1003/var/cpan/build/DBI-1.611-NHGNhE/blib/lib to PERL5LIB for 'test'
Running make test
>>> make test TEST_VERBOSE=1
PERL_DL_NONLAZY=1 /export/home/fly1003/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t
t/00_meta.t .........
1..2
ok 1 - META.yml contains valid YAML
ok 2 - META.yml meets the designated specification
ok
t/00_pod.t ..........
1..2
ok 1 - POD test for blib/lib/DBD/CSV.pm
ok 2 - POD test for blib/lib/Bundle/DBD/CSV.pm
ok
t/00_pod_cov.t ......
1..1
ok 1 - DBD::CSV is covered
ok
t/10_base.t .........
1..8
ok 1 - use DBI;
ok 2 - use SQL::Statement;
ok 3 - SQL::Statement::Version 1.26
ok 4 - DBI->internal
ok 5 - Driver class
ok 6 - Install driver
ok 7 - Driver class installed
ok 8 - Driver version 0.29
ok
t/11_dsnlist.t ......
1..15
ok 1 - use DBI;
ok 2 - Driver is CSV
#
ok 3 - Connect
ok 4 - ping
ok 5 - data_sources
ok 6 - more than one
ok 7 - disconnect
ok 8 - use . as f_dir
ok 9 - disconnect
ok 10 - use example as f_dir
ok 11 - disconnect
ok 12 - use lib as f_dir
ok 13 - disconnect
ok 14 - use t as f_dir
ok 15 - disconnect
ok
t/20_createdrop.t ...
1..9
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - file exists
ok 7 - drop table
ok 8 - disconnect
ok 9 - file removed
ok
t/30_insertfetch.t ..
1..25
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - file exists
ok 7 - insert
ok 8 - file grew
ok 9 - prepare
ok 10 - handle type
ok 11 - execute
ok 12 - fetch
ok 13 - returned a list
ok 14 - no error
ok 15 - content
ok 16 - finish
ok 17 - delete
ok 18 - prepare
ok 19 - handle type
ok 20 - execute
ok 21 - fetch
ok 22 - error
ok 23 - finish
ok 24 - drop
ok 25 - disconnect
ok
t/40_numrows.t ......
1..25
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - insert
ok 7 - prepare
ok 8 - execute
ok 9 - numrows
ok 10 - true rows
ok 11 - finish
ok 12 - insert
ok 13 - prepare
ok 14 - execute
ok 15 - rows
ok 16 - true rows
ok 17 - finish
ok 18 - insert
ok 19 - prepare
ok 20 - execute
ok 21 - rows
ok 22 - true rows
ok 23 - finish
ok 24 - drop
ok 25 - disconnect
ok
t/41_nulls.t ........
1..29
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - insert
ok 7 - prepare
ok 8 - execute
ok 9 - fetch
ok 10 - default content
ok 11 - finish
ok 12 - connect csv_null
ok 13 - prepare
ok 14 - execute
ok 15 - fetch
ok 16 - NULL content
ok 17 - finish
ok 18 - drop table
ok 19 - disconnect
ok 20 - connect csv_null
ok 21 - create table
ok 22 - insert just 2
ok 23 - prepare
ok 24 - execute
ok 25 - fetch
ok 26 - content
ok 27 - finish
ok 28 - drop table
ok 29 - disconnect
ok
t/42_bindparam.t ....
1..48
ok 1 - use DBI;
ok 2 - connect
ok 3 - Allow NULL
ok 4 - find new test table
ok 5 - table definition
ok 6 - create table
ok 7 - prepare
ok 8 - execute insert 1
ok 9 - execute insert 2
ok 10 - execute insert 3
ok 11 - bind 4 int
ok 12 - bind str
ok 13 - execute
ok 14 - bind 5 int
ok 15 - bind NULL
ok 16 - execute
ok 17 - finish
ok 18 - disconnect
ok 19 - connect
ok 20 - prepare
ok 21 - execute
ok 22 - bind_columns
ok 23 - execute
ok 24 - fetch
ok 25 - id 1
ok 26 - name 1
ok 27 - fetch
ok 28 - id 2
ok 29 - name 2
ok 30 - fetch
ok 31 - id 3
ok 32 - name 3
ok 33 - fetch
ok 34 - id 4
ok 35 - name 4
ok 36 - fetch
ok 37 - id 5
ok 38 - name 5
ok 39 - finish
ok 40 - prepare update
ok 41 - update
ok 42 - finish
ok 43 - prepare update
ok 44 - update
ok 45 - update
ok 46 - finish
ok 47 - drop table
ok 48 - disconnect
ok
t/43_blobs.t ........
1..15
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - create blob
ok 7 - quote blob
ok 8 - insert
ok 9 - prepare
ok 10 - execute
ok 11 - fetch
ok 12 - content
ok 13 - finish
ok 14 - drop table
ok 15 - disconnect
ok
t/44_listfields.t ...
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - prepare
ok 7 - execute
ok 8 - NUM_OF_FIELDS
ok 9 - NUM_OF_PARAMS
ok 10 - NAME_lc
ok 11 - NAME_uc
ok 12 - NAME_lc_hash
ok 13 - PRECISION 1
ok 14 - PRECISION 2
ok 15 - NULLABLE 1
ok 16 - NULLABLE 2
ok 17 - finish
ok 18 - drop table
ok 19 - disconnect
1..19
ok
t/48_utf8.t .........
1..36
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4
ok 5 - New csv
ok 6 - Open CSV
ok 7 - CSV print header
ok 8 - CSV row 1
ok 9 - CSV row 2
ok 10 - CSV row 3
ok 11 - CSV row 4
ok 12 - close
ok 13 - prepare
ok 14 - execute
ok 15 - fetch 1
ok 16 - unencoded content 1
ok 17 - fetch 2
ok 18 - unencoded content 2
ok 19 - fetch 3
ok 20 - unencoded content 3
ok 21 - fetch 4
ok 22 - unencoded content 4
ok 23 - finish
ok 24 - prepare
ok 25 - execute
ok 26 - fetch 1
ok 27 - encoded content 1
ok 28 - fetch 2
ok 29 - encoded content 2
ok 30 - fetch 3
ok 31 - encoded content 3
ok 32 - fetch 4
ok 33 - encoded content 4
ok 34 - finish
ok 35 - drop table
ok 36 - disconnect
ok
t/50_chopblanks.t ...
1..38
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - prepare ins
ok 7 - prepare sel
ok 8 - insert 1
ok 9 - ChopBlanks 0
ok 10 - execute
ok 11 - fetch
ok 12 - content
ok 13 - ChopBlanks 1
ok 14 - execute
ok 15 - fetch
ok 16 - content
ok 17 - insert 2
ok 18 - ChopBlanks 0
ok 19 - execute
ok 20 - fetch
ok 21 - content
ok 22 - ChopBlanks 1
ok 23 - execute
ok 24 - fetch
ok 25 - content
ok 26 - insert 3
ok 27 - ChopBlanks 0
ok 28 - execute
ok 29 - fetch
ok 30 - content
ok 31 - ChopBlanks 1
ok 32 - execute
ok 33 - fetch
ok 34 - content
ok 35 - finish sti
ok 36 - finish sth
ok 37 - drop table
ok 38 - disconnect
ok
t/51_commit.t .......
1..24
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - AutoCommit on
ok 7 - disable
ok 8 - AutoCommit still on
ok 9 - insert 1
ok 10 - 1 row
ok 11 - disconnect
ok 12 - connect
ok 13 - still 1 row
ok 14 - insert 2
ok 15 - AutoCommit on
ok 16 - commit
ok 17 - warning
ok 18 - insert 3
ok 19 - AutoCommit on
ok 20 - rollback
ok 21 - warning
ok 22 - err
ok 23 - drop table
ok 24 - disconnect
ok
t/60_misc.t .........
1..40
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - quote
ok 7 - prepare
ok 8 - fetch w/o execute
ok 9 - one error
ok 10 - error message
ok 11 - execute
ok 12 - fetch no rows
ok 13 - finish
ok 14 - prepare ins
ok 15 - insert 1
ok 16 - insert 2
ok 17 - insert 3
ok 18 - insert 4
ok 19 - insert 5
ok 20 - insert 6
ok 21 - insert 7
ok 22 - insert 8
ok 23 - insert 9
ok 24 - finish
ok 25 - prepare sel
ok 26 - execute 1
ok 27 - execute 2
ok 28 - fetchrow_array
ok 29 - content
ok 30 - fetchrow_arrayref
ok 31 - content
ok 32 - fetchrow_hashref
ok 33 - content
ok 34 - fetchall_hashref
ok 35 - content
ok 36 - execute
ok 37 - fetchall_arrayref
ok 38 - content
ok 39 - drop table
ok 40 - disconnect
ok
t/70_csv.t ..........
1..67
ok 1 - use DBI;
ok 2 - connect
ok 3 - default dir
ok 4 - set f_dir
ok 5 - find new test table
ok 6 - does not exist
ok 7 - find new test table
ok 8 - does not exist
ok 9 - find new test table
ok 10 - does not exist
ok 11 - different 1 2
ok 12 - different 1 3
ok 13 - different 2 3
ok 14 - table definition
ok 15 - create table 1
ok 16 - does exists
ok 17 - drop table
ok 18 - does not exist
ok 19 - disconnect
ok 20 - connect
ok 21 - create table
ok 22 - does exists
ok 23 - insert 1
ok 24 - insert 2
ok 25 - prepare
ok 26 - execute
ok 27 - fetch 1
ok 28 - content
ok 29 - fetch 2
ok 30 - content
ok 31 - finish
ok 32 - drop table
ok 33 - does not exist
ok 34 - disconnect
ok 35 - connect
ok 36 - set table/file
ok 37 - create table
ok 38 - does exists
ok 39 - drop table
ok 40 - disconnect
ok 41 - connect with attr
ok 42 - dbd_verbose set
ok 43 - f_ext set
ok 44 - sep_char set
ok 45 - blank_is_undef set
ok 46 - create table
ok 47 - does exists
ok 48 - prepare
ok 49 - not enough values
ok 50 - error message
ok 51 - prepare
ok 52 - too many values
ok 53 - error message
ok 54 - insert 0
ok 55 - insert 1
ok 56 - insert 2
ok 57 - insert 3
ok 58 - insert 4
ok 59 - insert 5
ok 60 - insert 6
ok 61 - insert 7
ok 62 - insert 8
ok 63 - insert 9
ok 64 - drop table
ok 65 - does not exist
ok 66 - does not exist
ok 67 - disconnect
ok
t/71_csv-ext.t ......
1..35
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - does not exist
ok 5 - table definition
ok 6 - create table
ok 7 - does exists
ok 8 - table definition
ok 9 - create table .csv
ok 10 - does exists
ok 11 - table definition
ok 12 - create table .foo
ok 13 - does exists
ok 14 - table definition
ok 15 - create table .txt
ok 16 - does exists
ok 17 - tables
ok 18 - for all ext
ok 19 - disconnect
ok 20 - connect (f_ext => .csv)
ok 21 - tables
ok 22 - for all ext
ok 23 - disconnect
ok 24 - connect (f_ext => .csv/r)
ok 25 - tables
ok 26 - just one
ok 27 - disconnect
ok 28 - connect
ok 29 - tables
ok 30 - drop table testaa
ok 31 - drop table testaa.csv
ok 32 - drop table testaa.foo
ok 33 - drop table testaa.txt
ok 34 - disconnect
ok 35 - no files left
ok
t/72_csv-schema.t ...
1..12
ok 1 - use DBI;
ok 2 - connect
ok 3 - find new test table
ok 4 - table definition
ok 5 - create table
ok 6 - tables
ok 7 - disconnect
ok 8 - connect (f_schema => undef)
ok 9 - tables
ok 10 - drop table
ok 11 - disconnect
ok 12 - no files left
ok
t/73_csv-case.t .....
ok 1 - use DBI;
ok 2 - connect
ok 3 - foo does not exist
ok 4 - ignore missing tables
ok 5 - table definition
ok 6 - create table
ok 7 - does exists
ok 8 - select from foo
ok 9 - execute
ok 10 - select from foO
ok 11 - execute
ok 12 - select from fOo
ok 13 - execute
ok 14 - select from fOO
ok 15 - execute
ok 16 - select from Foo
ok 17 - execute
ok 18 - select from FoO
ok 19 - execute
ok 20 - select from FOo
ok 21 - execute
ok 22 - select from FOO
ok 23 - execute
ok 24 - disconnect
ok 25 - connect
ok 26 - ignore missing tables
ok 27 - prepare "foo"
ok 28 - execute ok
ok 29 - prepare "foO"
ok 30 - table name 'foO' should not match 'foo' # TODO Filesystem has to be case-aware
ok 31 - prepare "fOo"
ok 32 - table name 'fOo' should not match 'foo' # TODO Filesystem has to be case-aware
ok 33 - prepare "fOO"
ok 34 - table name 'fOO' should not match 'foo' # TODO Filesystem has to be case-aware
ok 35 - prepare "Foo"
ok 36 - table name 'Foo' should not match 'foo' # TODO Filesystem has to be case-aware
ok 37 - prepare "FoO"
ok 38 - table name 'FoO' should not match 'foo' # TODO Filesystem has to be case-aware
ok 39 - prepare "FOo"
ok 40 - table name 'FOo' should not match 'foo' # TODO Filesystem has to be case-aware
ok 41 - prepare "FOO"
ok 42 - table name 'FOO' should not match 'foo' # TODO Filesystem has to be case-aware
ok 43 - drop table
ok 44 - disconnect
1..44
ok
t/80_rt.t ...........
ok 1 - RT-18477 - use of prepare/execute with placeholders fails
ok 2 - connect
ok 3 - prepare
ok 4 - execute
ok 5 - prepare
ok 6 - execute
ok 7 - fetch
ok 8 - content
ok 9 - finish
ok 10 - drop table
ok 11 - disconnect
ok 12 - RT-20550 - Using "Primary key" leads to error
ok 13 - connect
ok 14 - prepare
ok 15 - drop table
ok 16 - disconnect
ok 17 - RT-33764 - $! is not an indicator of failure
ok 18 - connect
ok 19 - prepare
ok 20 - execute
ok 21 - error message
ok 22 - fetch
ok 23 - error message
ok 24 - finish
ok 25 - drop table
ok 26 - disconnect
ok 27 - RT-43010 - treatment of nulls scrambles joins
ok 28 - connect
ok 29 - table def
ok 30 - create table
ok 31 - table def
ok 32 - create table
ok 33 - insert 1
ok 34 - insert 2
ok 35 - join 1 2
ok 36 - content
ok 37 - drop table
ok 38 - drop table
ok 39 - disconnect
ok 40 - RT-44583 - DBD::CSV cannot read CSV files with dots on the first line
ok 41 - connect
ok 42 - prepare
ok 43 - execute
ok 44 - field names
ok 45 - prepare
ok 46 - execute
ok 47 - fetch
ok 48 - content
ok 49 - finish
ok 50 - connect
ok 51 - prepare
ok 52 - field names
ok 53 - finish
ok 54 - drop table
ok 55 - disconnect
ok 56 - RT-46627 - DBD::File is damaged now
ok 57 - connect
ok 58 - create
ok 59 - prepare ins
ok 60 - insert 1
ok 61 - insert 2
ok 62 - finish
ok 63 - insert 3
ok 64 - prepare upd
ok 65 - update
ok 66 - update
ok 67 - finish
ok 68 - Field names
ok 69 - Record 1
ok 70 - Record 2
ok 71 - Record 3
ok 72 - EOF
ok 73 - drop
ok 74 - disconnect
ok 75 - RT-51090 - Report a bug in DBD-CSV
ok 76 - connect
ok 77 - prepare
ok 78 - set types (4 -1 2)
ok 79 - execute
ok 80 - get types (1 0 2)
ok 81 - drop
ok 82 - disconnect
1..82
ok
All tests successful.
Test Summary Report
-------------------
t/73_csv-case.t (Wstat: 0 Tests: 44 Failed: 0)
TODO passed: 30, 32, 34, 36, 38, 40, 42
Files=21, Tests=576, 12 wallclock secs ( 0.45 usr 0.14 sys + 11.37 cusr 1.00 csys = 12.96 CPU)
Result: PASS
HMBRAND/DBD-CSV-0.29.tgz
make test TEST_VERBOSE=1 -- OK
DISTNAME-VERSION 'DBD::CSV-0.29' found in META.yml is bogus, ignoring at /export/home/fly1003/lib/Fly/MakePPD.pm line 131.
H.Merijn Brand <h.m.brand@xs4all.nl>
DBI driver for CSV files
>>> (cd /export/home/fly1003/var/cpan/build/DBD-CSV-0.29-ge6GeB && tar cvf - DBD-CSV-0.29.ppd blib) | gzip -c >/export/home/fly1003/var/REPO/H/HM/HMBRAND/DBD-CSV-0.29.tar.gz
DBD-CSV-0.29.ppd
blib/
blib/lib/
blib/lib/DBD/
blib/lib/DBD/CSV.pm
blib/lib/Bundle/
blib/lib/Bundle/DBD/
blib/lib/Bundle/DBD/CSV.pm
blib/man3/
blib/man3/Bundle::DBD::CSV.3
blib/man3/DBD::CSV.3
>>> mv /export/home/fly1003/var/cpan/build/DBD-CSV-0.29-ge6GeB/DBD-CSV-0.29.ppd /export/home/fly1003/var/REPO/H/HM/HMBRAND
Finished 2010-05-05T05:30:55