Re: Please Test: AutoInactiveDestroy
This is beyond my knowledge, alas. Anyone have any ideas? Maybe the failure John Scoles got can provide some clues? http://www.nntp.perl.org/group/perl.dbi.dev/2010/07/msg6159.html Paging Windows experts and Mssr. Bunce! Thanks, David On Jul 27, 2010, at 1:25 PM, Cosimo Streppone wrote: In data 26 luglio 2010 alle ore 23:11:42, David E. Wheeler da...@kineticode.com ha scritto: [...] AutoInactiveDestroy. We need to make sure that it doesn't die an ugly death on systems without fork (and on Win32, where it's emulated). It seems to die an ugly death for me. I'm experiencing the same failures as Martin. DBI SVN updated to r14289. Test output === (It segfaults at test 19) d:\dev\src\dbi-svnprove -vb t/zvp_16destroy.t t/zvp_16destroy.t .. 1..20 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 - Install test driver ok 5 - Connect to test driver ok 6 - Should start active ok 7 - Should be active in DESTROY ok 8 - Create with ActiveDestroy ok 9 - InactiveDestroy should be set ok 10 - Should start active ok 11 - Should not be active in DESTROY ok 12 - Create with AutoInactiveDestroy ok 13 - InactiveDestroy should be set ok 14 - Should start active ok 15 - Should be active in DESTROY ok 16 - Create with AutoInactiveDestroy again ok 17 - InactiveDestroy should be set ok 18 - Should start active Dubious, test returned 5 (wstat 1280, 0x500) Failed 2/20 subtests Test Summary Report --- t/zvp_16destroy.t (Wstat: 1280 Tests: 18 Failed: 0) Non-zero exit status: 5 Parse errors: Bad plan. You planned 20 tests but ran 18. Files=1, Tests=18, 3 wallclock secs ( 0.08 usr + 0.05 sys = 0.12 CPU) Result: FAIL Perl binary (Windows Vista 32 bit) == This is perl, v5.10.0 built for MSWin32-x86-multi-thread. Summary of my perl5 (revision 5 version 10 subversion 0) configuration: Platform: osname=MSWin32, osvers=4.0, archname=MSWin32-x86-multi-thread uname='' config_args='undef' hint=recommended, useposix=true, d_sigaction=undef useithreads=define, usemultiplicity=define useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef use64bitint=undef, use64bitall=undef, uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cl', ccflags ='-nologo -GF -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -D_CRT_SECU RE_NO_DEPRECATE -D_CRT_NONSTDC_NO_DEPRECATE -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO', optimize='-MD -Zi -DNDEBUG -O1', cppflags='-DWIN32' ccversion='15.00.21022.08', gccversion='', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234 d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='__int64', lseeksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='link', ldflags ='-nologo -nodefaultlib -debug -opt:ref,icf -libpath:c:\dev\perl510\lib\CORE -machine:x86' libpth=c:\dev\msvc9\vc\lib libs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib perllibs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32. lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib libc=msvcrt.lib, so=dll, useshrplib=true, libperl=perl510.lib gnulibc_version='' Dynamic Linking: dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -debug -opt:ref,icf -libpath:c:\dev\perl510\lib\CORE -mach ine:x86' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY PERL_DONT_CREATE_GVSV PERL_IMPLICIT_CONTEXT PERL_IMPLICIT_SYS PERL_MALLOC_WRAP PL_OP_SLAB_ALLOC USE_ITHREADS USE_LARGE_FILES USE_PERLIO Built under MSWin32 Compiled at Jan 30 2008 08:15:22 @INC: c:/dev/perl510/lib c:/dev/perl510/site/lib . -- Cosimo
Re: Please Test: AutoInactiveDestroy
David E. Wheeler wrote:
Fellow DBIers,
With a bit of help from me, Tim added a new feature to the DBI yesterday:
AutoInactiveDestroy. I wrote the test for it. The test, however, forks. We need
to make sure that it doesn't die an ugly death on systems without fork (and on
Win32, where it's emulated). If you have such a system, would you minding
checking out the repository and building and testing DBI?
Which test is it exactly??
svn co http://svn.perl.org/modules/dbi/trunk
Thanks!
David
Ok here you go
Windblows XP home SP3
Visual C++ 2003
here is the output from the nmake test
t/01basics.t ... ok
t/02dbidrv.t ... ok
t/03handle.t ... ok
t/04mods.t . ok
t/05concathash.t ... ok
t/06attrs.t ok
t/07kids.t . ok
t/08keeperr.t .. ok
t/09trace.t ok
t/10examp.t ok
t/11fetch.t ok
t/12quote.t ok
t/13taint.t ok
t/14utf8.t . ok
t/15array.t ok
t/16destroy.t .. 1/20 Test has no driver CLONE() function so
is unsafe threade
d
t/16destroy.t .. ok
t/19fhtrace.t .. ok
t/20meta.t . ok
t/30subclass.t . ok
t/35thrclone.t . ok
t/40profile.t .. ok
t/41prof_dump.t ok
t/42prof_data.t ok
t/43prof_env.t . ok
t/49dbd_file.t . ok
t/50dbm_simple.t ... ok
t/51dbm_file.t . ok
t/52dbm_complex.t .. skipped: Not running with SQL::Statement
t/60preparse.t . ok
t/65transact.t . ok
t/70callbacks.t ok
t/72childhandles.t . ok
t/80proxy.t skipped: modules required for proxy are
probably not installe
d (e.g., RPC/PlClient.pm)
t/85gofer.t ok
t/86gofer_fail.t ... ok
t/87gofer_cache.t .. ok
t/90sql_type_cast.t ok
t/pod-cm.t . skipped: Pod::Spell::CommonMistakes
required for testing POD
spelling
t/pod-coverage.t ... skipped: Currently FAILS FOR MANY MODULES!
t/pod.t ok
t/zvg_01basics.t ... ok
t/zvg_02dbidrv.t ... ok
t/zvg_03handle.t ... ok
t/zvg_04mods.t . ok
t/zvg_05concathash.t ... ok
t/zvg_06attrs.t ok
t/zvg_07kids.t . ok
t/zvg_08keeperr.t .. ok
t/zvg_09trace.t ok
t/zvg_10examp.t ok
t/zvg_11fetch.t ok
t/zvg_12quote.t ok
t/zvg_13taint.t skipped: Taint attribute tests not
functional with DBI_AUTOPR
OXY
t/zvg_14utf8.t . ok
t/zvg_15array.t ok
t/zvg_16destroy.t .. 1/20 Test has no driver CLONE() function so
is unsafe threaded
t/zvg_16destroy.t .. ok
t/zvg_19fhtrace.t .. ok
t/zvg_20meta.t . ok
t/zvg_30subclass.t . ok
t/zvg_35thrclone.t . ok
t/zvg_40profile.t .. ok
t/zvg_41prof_dump.t ok
t/zvg_42prof_data.t ok
t/zvg_43prof_env.t . ok
t/zvg_49dbd_file.t . ok
t/zvg_50dbm_simple.t ... ok
t/zvg_51dbm_file.t . ok
t/zvg_52dbm_complex.t .. skipped: Not running with SQL::Statement
t/zvg_60preparse.t . ok
t/zvg_65transact.t . skipped: Transactions not supported by
DBD::Gofer
t/zvg_70callbacks.t ok
t/zvg_72childhandles.t . ok
t/zvg_80proxy.t skipped: modules required for proxy are
probably not installe
d (e.g., RPC/PlClient.pm)
t/zvg_85gofer.t 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 ok
t/zvn_49dbd_file.t . ok
t/zvn_50dbm_simple.t ... ok
t/zvn_51dbm_file.t . ok
t/zvn_52dbm_complex.t .. skipped: Not running with SQL::Statement
t/zvn_85gofer.t ok
t/zvp_01basics.t ... ok
t/zvp_02dbidrv.t ... ok
t/zvp_03handle.t ... ok
t/zvp_04mods.t . ok
t/zvp_05concathash.t ... ok
t/zvp_06attrs.t ok
t/zvp_07kids.t . skipped: $h-{Kids} attribute not supported
for DBI::PurePerl
t/zvp_08keeperr.t .. ok
t/zvp_09trace.t ok
t/zvp_10examp.t ok
t/zvp_11fetch.t ok
t/zvp_12quote.t ok
t/zvp_13taint.t skipped: Taint attributes not supported
with DBI::PurePerl
t/zvp_14utf8.t . ok
t/zvp_15array.t ok
t/zvp_16destroy.t .. 1/20 Test has no driver CLONE() function so
is unsafe threaded
t/zvp_16destroy.t .. Failed 2/20 subtests
t/zvp_19fhtrace.t .. ok
t/zvp_20meta.t . ok
t/zvp_30subclass.t . ok
t/zvp_35thrclone.t . ok
t/zvp_40profile.t .. skipped: profiling not supported for
DBI::PurePerl
t/zvp_41prof_dump.t skipped: profiling not supported
Re: Please Test: AutoInactiveDestroy
On Jul 27, 2010, at 5:01 AM, John Scoles wrote: Which test is it exactly?? t/16destroy.t Ok here you go Windblows XP home SP3 Visual C++ 2003 here is the output from the nmake test Thanks! t/01basics.t ... ok t/02dbidrv.t ... ok t/03handle.t ... ok t/04mods.t . ok t/05concathash.t ... ok t/06attrs.t ok t/07kids.t . ok t/08keeperr.t .. ok t/09trace.t ok t/10examp.t ok t/11fetch.t ok t/12quote.t ok t/13taint.t ok t/14utf8.t . ok t/15array.t ok t/16destroy.t .. 1/20 Test has no driver CLONE() function so is unsafe threade d Tim, is that something we should add to that test driver? t/zvp_16destroy.t .. 1/20 Test has no driver CLONE() function so is unsafe threaded t/zvp_16destroy.t .. Failed 2/20 subtests Hrm, can you run that one verbose, please? Thanks, David
Re: Please Test: AutoInactiveDestroy
David E. Wheeler wrote:
ok here you go with Debug set to 15
t/zvp_16destroy.t .. DBI 1.613 (PurePerl) dispatch trace
level set to 15
C:\dbi\trunk\blib\lib/DBI/PurePerl.pm version 2.014285
t/zvp_16destroy.t .. 1/20 - DBI-install_driver(Test) for
MSWin32 perl=5.0100
01 pid=5848 ruid=0 euid=0
install_driver: DBD::Test version undef loaded from dummy
New DBI::dr (for DBD::Test::dr, parent=, id=77)
_setup_handle(DBI::dr=HASH(0x18df5d4) DBD::Test::dr 77)
- install_driver= DBI::dr=HASH(0x18df5d4)
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a45834)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a45834), id=)
_setup_handle(DBI::db=HASH(0x1a2942c) DBD::Test::db
DBI::dr=HASH(0x1a45834) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1a2987c)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 42
STORE in DBD::Test::db ('DBI::db=HASH(0x1a2987c)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 43
connect= 'DBI::db=HASH(0x1a2942c)' at ./t/16destroy.t line 91
FETCH in DBD::Test::db ('DBI::db=HASH(0x1a2987c)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
DESTROY in DBD::Test::db ('DBI::db=HASH(0x1a2987c)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x1a2987c)' 'Active') []
FETCH= 1 at ./t/16destroy.t line 80
DESTROY= 1 at ./t/16destroy.t line 93
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a45834)'
'dbi:ExampleP:dummy' '' '' 'HASH
(0x1a2942c)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a45834), id=)
_setup_handle(DBI::db=HASH(0x1fba8b4) DBD::Test::db
DBI::dr=HASH(0x1a45834) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1b00984)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 42
STORE in DBD::Test::db ('DBI::db=HASH(0x1b00984)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 43
STORE in DBD::Test::db ('DBI::db=HASH(0x1b00984)'
'InactiveDestroy' 1) []
STORE= 1 at ./t/16destroy.t line 44
connect= 'DBI::db=HASH(0x1fba8b4)' at ./t/16destroy.t line 100
FETCH in DBD::Test::db ('DBI::db=HASH(0x1b00984)'
'InactiveDestroy') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
FETCH in DBD::Test::db ('DBI::db=HASH(0x1b00984)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
DESTROY in DBD::Test::db ('DBI::db=HASH(0x1b00984)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x1b00984)' 'Active') []
FETCH= 0 at ./t/16destroy.t line 80
DESTROY= 1 at ./t/16destroy.t line 100
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a45834)'
'dbi:ExampleP:dummy' '' '' 'HASH
(0x1fba8b4)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a45834), id=)
_setup_handle(DBI::db=HASH(0x1fdff44) DBD::Test::db
DBI::dr=HASH(0x1a45834) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 42
STORE in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 43
STORE in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)'
'AutoInactiveDestroy' 1) []
STORE= 1 at ./t/16destroy.t line 44
connect= 'DBI::db=HASH(0x1fdff44)' at ./t/16destroy.t line 109
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)'
'AutoInactiveDestroy') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
DESTROY in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)' 'Active') []
FETCH= 1 at ./t/16destroy.t line 80
DESTROY= 1 at ./t/16destroy.t line 109
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a45834)'
'dbi:ExampleP:dummy' '' '' 'HASH
(0x1fdff44)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a45834), id=)
_setup_handle(DBI::db=HASH(0x1a457c4) DBD::Test::db
DBI::dr=HASH(0x1a45834) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1fe0234)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 42
STORE in DBD::Test::db ('DBI::db=HASH(0x1fe0234)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 43
STORE in DBD::Test::db ('DBI::db=HASH(0x1fe0234)'
'AutoInactiveDestroy' 1) []
STORE= 1 at ./t/16destroy.t line 44
connect= 'DBI::db=HASH(0x1a457c4)' at ./t/16destroy.t line 118
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe0234)'
'AutoInactiveDestroy') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe0234)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
CLONE DBI for new thread
Test has no driver CLONE() function so is unsafe threaded
DESTROY in DBD::Test::db ('DBI::db=HASH(0x202027c)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x202027c)' 'Active') []
FETCH= 0 at ./t/16destroy.t line 77
-- DBI::END ($@: , $!: )
DESTROY in DBD::Test::db ('DBI::db=HASH(0x202027c)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x202027c)' 'Active') []
FETCH= 0 at
Re: Please Test: AutoInactiveDestroy
On Jul 27, 2010, at 9:42 AM, Martin J. Evans wrote: Test has no driver CLONE() function so is unsafe threaded FAILED tests 19-20 Failed 2/20 tests, 90.00% okay Failed Test Stat Wstat Total Fail List of Failed --- t\zvp_16destroy.t 202 19-20 Failed 1/1 test scripts. 2/20 subtests failed. Files=1, Tests=20, 1 wallclock secs ( 0.00 cusr + 0.00 csys = 0.00 CPU) Failed 1/1 test programs. 2/20 subtests failed. C:\perlbuild_xxx\dbi_trunk As a wild guess, I've just added a CLONE() function in r14289. Would you mind trying again? I'm around on #dbi (as mje) tomorrow if that helps. Might be around this evening also but I'm not I've got a Windows machine available tonight. As am I. I'm theory. Best, David
Re: Please Test: AutoInactiveDestroy
David E. Wheeler wrote: now we are getting t/zvp_16destroy.t(Wstat: 0 Tests: 18 Failed: 0) Parse errors: Bad plan. You planned 20 tests but ran 18. t/zvxgp_16destroy.t (Wstat: 0 Tests: 18 Failed: 0) Parse errors: Bad plan. You planned 20 tests but ran 18. Files=171, Tests=6280, 223 wallclock secs ( 3.73 usr + 0.70 sys = 4.44 CPU) Result: FAIL Failed 2/171 test programs. 0/6280 subtests failed. NMAKE : U1077: Stop. On Jul 27, 2010, at 9:42 AM, Martin J. Evans wrote: Test has no driver CLONE() function so is unsafe threaded FAILED tests 19-20 Failed 2/20 tests, 90.00% okay Failed Test Stat Wstat Total Fail List of Failed --- t\zvp_16destroy.t 202 19-20 Failed 1/1 test scripts. 2/20 subtests failed. Files=1, Tests=20, 1 wallclock secs ( 0.00 cusr + 0.00 csys = 0.00 CPU) Failed 1/1 test programs. 2/20 subtests failed. C:\perlbuild_xxx\dbi_trunk As a wild guess, I've just added a CLONE() function in r14289. Would you mind trying again? I'm around on #dbi (as mje) tomorrow if that helps. Might be around this evening also but I'm not I've got a Windows machine available tonight. As am I. I'm theory. Best, David
Re: Please Test: AutoInactiveDestroy
On Jul 27, 2010, at 11:17 AM, John Scoles wrote: David E. Wheeler wrote: now we are getting t/zvp_16destroy.t(Wstat: 0 Tests: 18 Failed: 0) Parse errors: Bad plan. You planned 20 tests but ran 18. t/zvxgp_16destroy.t (Wstat: 0 Tests: 18 Failed: 0) Parse errors: Bad plan. You planned 20 tests but ran 18. Files=171, Tests=6280, 223 wallclock secs ( 3.73 usr + 0.70 sys = 4.44 CPU) Result: FAIL Failed 2/171 test programs. 0/6280 subtests failed. NMAKE : U1077: Stop. Verbose? Best, David
Re: Please Test: AutoInactiveDestroy
David E. Wheeler wrote:
Ah what do you want that for It will just mess up your email ;)
t/zvp_16destroy.t .. 1/20 - DBI-install_driver(Test) for
MSWin32 perl=5.0100
01 pid=2200 ruid=0 euid=0
install_driver: DBD::Test version undef loaded from dummy
New DBI::dr (for DBD::Test::dr, parent=, id=77)
_setup_handle(DBI::dr=HASH(0x18df61c) DBD::Test::dr 77)
- install_driver= DBI::dr=HASH(0x18df61c)
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
_setup_handle(DBI::db=HASH(0x19428b4) DBD::Test::db
DBI::dr=HASH(0x1a459b4) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 44
STORE in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 45
connect= 'DBI::db=HASH(0x19428b4)' at ./t/16destroy.t line 93
FETCH in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
DESTROY in DBD::Test::db ('DBI::db=HASH(0x1938f7c)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'Active') []
FETCH= 1 at ./t/16destroy.t line 82
DESTROY= 1 at ./t/16destroy.t line 95
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)'
'dbi:ExampleP:dummy' '' '' 'HASH
(0x19428b4)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
_setup_handle(DBI::db=HASH(0x1fbaab4) DBD::Test::db
DBI::dr=HASH(0x1a459b4) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 44
STORE in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 45
STORE in DBD::Test::db ('DBI::db=HASH(0x1b009a4)'
'InactiveDestroy' 1) []
STORE= 1 at ./t/16destroy.t line 46
connect= 'DBI::db=HASH(0x1fbaab4)' at ./t/16destroy.t line 102
FETCH in DBD::Test::db ('DBI::db=HASH(0x1b009a4)'
'InactiveDestroy') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
FETCH in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
DESTROY in DBD::Test::db ('DBI::db=HASH(0x1b009a4)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'Active') []
FETCH= 0 at ./t/16destroy.t line 82
DESTROY= 1 at ./t/16destroy.t line 102
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)'
'dbi:ExampleP:dummy' '' '' 'HASH
(0x1fbaab4)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
_setup_handle(DBI::db=HASH(0x1fe004c) DBD::Test::db
DBI::dr=HASH(0x1a459b4) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 44
STORE in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 45
STORE in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)'
'AutoInactiveDestroy' 1) []
STORE= 1 at ./t/16destroy.t line 46
connect= 'DBI::db=HASH(0x1fe004c)' at ./t/16destroy.t line 111
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)'
'AutoInactiveDestroy') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
DESTROY in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'Active') []
FETCH= 1 at ./t/16destroy.t line 82
DESTROY= 1 at ./t/16destroy.t line 111
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)'
'dbi:ExampleP:dummy' '' '' 'HASH
(0x1fe004c)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
_setup_handle(DBI::db=HASH(0x1a45934) DBD::Test::db
DBI::dr=HASH(0x1a459b4) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 44
STORE in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 45
STORE in DBD::Test::db ('DBI::db=HASH(0x1fe033c)'
'AutoInactiveDestroy' 1) []
STORE= 1 at ./t/16destroy.t line 46
connect= 'DBI::db=HASH(0x1a45934)' at ./t/16destroy.t line 120
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe033c)'
'AutoInactiveDestroy') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
CLONE DBI for new thread
DESTROY in DBD::Test::db ('DBI::db=HASH(0x202058c)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x202058c)' 'Active') []
FETCH= 0 at ./t/16destroy.t line 79
-- DBI::END ($@: , $!: )
DESTROY in DBD::Test::db ('DBI::db=HASH(0x202058c)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x202058c)' 'Active') []
FETCH= 0 at ./t/16destroy.t line 79
On Jul 27, 2010, at 11:17 AM, John Scoles wrote:
David E. Wheeler wrote:
now we are getting
t/zvp_16destroy.t(Wstat: 0 Tests: 18 Failed:
Re: Please Test: AutoInactiveDestroy
Okay, something funky with threads on Win32 I guess. Any ideas, Tim? 'Cause I'm
fresh out.
Best,
David
On Jul 27, 2010, at 11:52 AM, John Scoles wrote:
Ah what do you want that for It will just mess up your email ;)
t/zvp_16destroy.t .. 1/20 - DBI-install_driver(Test) for
MSWin32 perl=5.0100
01 pid=2200 ruid=0 euid=0
install_driver: DBD::Test version undef loaded from dummy
New DBI::dr (for DBD::Test::dr, parent=, id=77)
_setup_handle(DBI::dr=HASH(0x18df61c) DBD::Test::dr 77)
- install_driver= DBI::dr=HASH(0x18df61c)
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
_setup_handle(DBI::db=HASH(0x19428b4) DBD::Test::db
DBI::dr=HASH(0x1a459b4) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 44
STORE in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 45
connect= 'DBI::db=HASH(0x19428b4)' at ./t/16destroy.t line 93
FETCH in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
DESTROY in DBD::Test::db ('DBI::db=HASH(0x1938f7c)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'Active') []
FETCH= 1 at ./t/16destroy.t line 82
DESTROY= 1 at ./t/16destroy.t line 95
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)' 'dbi:ExampleP:dummy'
'' '' 'HASH
(0x19428b4)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
_setup_handle(DBI::db=HASH(0x1fbaab4) DBD::Test::db
DBI::dr=HASH(0x1a459b4) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 44
STORE in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 45
STORE in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'InactiveDestroy' 1) []
STORE= 1 at ./t/16destroy.t line 46
connect= 'DBI::db=HASH(0x1fbaab4)' at ./t/16destroy.t line 102
FETCH in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'InactiveDestroy') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
FETCH in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
DESTROY in DBD::Test::db ('DBI::db=HASH(0x1b009a4)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'Active') []
FETCH= 0 at ./t/16destroy.t line 82
DESTROY= 1 at ./t/16destroy.t line 102
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)' 'dbi:ExampleP:dummy'
'' '' 'HASH
(0x1fbaab4)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
_setup_handle(DBI::db=HASH(0x1fe004c) DBD::Test::db
DBI::dr=HASH(0x1a459b4) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 44
STORE in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 45
STORE in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'AutoInactiveDestroy'
1) []
STORE= 1 at ./t/16destroy.t line 46
connect= 'DBI::db=HASH(0x1fe004c)' at ./t/16destroy.t line 111
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'AutoInactiveDestroy')
[]
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
DESTROY in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'Active') []
FETCH= 1 at ./t/16destroy.t line 82
DESTROY= 1 at ./t/16destroy.t line 111
connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)' 'dbi:ExampleP:dummy'
'' '' 'HASH
(0x1fe004c)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
_setup_handle(DBI::db=HASH(0x1a45934) DBD::Test::db
DBI::dr=HASH(0x1a459b4) )
STORE in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'Active' 1) []
STORE= 1 at ./t/16destroy.t line 44
STORE in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'AutoCommit' 1) []
STORE= 1 at ./t/16destroy.t line 45
STORE in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'AutoInactiveDestroy'
1) []
STORE= 1 at ./t/16destroy.t line 46
connect= 'DBI::db=HASH(0x1a45934)' at ./t/16destroy.t line 120
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'AutoInactiveDestroy')
[]
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'Active') []
FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
CLONE DBI for new thread
DESTROY in DBD::Test::db ('DBI::db=HASH(0x202058c)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x202058c)' 'Active') []
FETCH= 0 at ./t/16destroy.t line 79
-- DBI::END ($@: , $!: )
DESTROY in DBD::Test::db ('DBI::db=HASH(0x202058c)') []
FETCH in DBD::Test::db ('DBI::db=HASH(0x202058c)' 'Active') []
FETCH= 0 at ./t/16destroy.t line 79
On Jul 27, 2010, at
Re: Please Test: AutoInactiveDestroy
David E. Wheeler wrote: On Jul 27, 2010, at 9:42 AM, Martin J. Evans wrote: Test has no driver CLONE() function so is unsafe threaded FAILED tests 19-20 Failed 2/20 tests, 90.00% okay Failed Test Stat Wstat Total Fail List of Failed --- t\zvp_16destroy.t 202 19-20 Failed 1/1 test scripts. 2/20 subtests failed. Files=1, Tests=20, 1 wallclock secs ( 0.00 cusr + 0.00 csys = 0.00 CPU) Failed 1/1 test programs. 2/20 subtests failed. C:\perlbuild_xxx\dbi_trunk As a wild guess, I've just added a CLONE() function in r14289. Would you mind trying again? I'm around on #dbi (as mje) tomorrow if that helps. Might be around this evening also but I'm not I've got a Windows machine available tonight. As am I. I'm theory. Best, David My windows machine at home behaves rather differently - might have to wait until tomorrow (I'm getting a number of segfaults so I'm guessing I have other problems). By all means pester me tomorrow on #dbi if you need more. Martin
Re: Please Test: AutoInactiveDestroy
Martin J. Evans wrote: David E. Wheeler wrote: On Jul 27, 2010, at 9:42 AM, Martin J. Evans wrote: Test has no driver CLONE() function so is unsafe threaded FAILED tests 19-20 Failed 2/20 tests, 90.00% okay Failed Test Stat Wstat Total Fail List of Failed --- t\zvp_16destroy.t 202 19-20 Failed 1/1 test scripts. 2/20 subtests failed. Files=1, Tests=20, 1 wallclock secs ( 0.00 cusr + 0.00 csys = 0.00 CPU) Failed 1/1 test programs. 2/20 subtests failed. C:\perlbuild_xxx\dbi_trunk As a wild guess, I've just added a CLONE() function in r14289. Would you mind trying again? I'm around on #dbi (as mje) tomorrow if that helps. Might be around this evening also but I'm not I've got a Windows machine available tonight. As am I. I'm theory. Best, David My windows machine at home behaves rather differently - might have to wait until tomorrow (I'm getting a number of segfaults so I'm guessing I have other problems). By all means pester me tomorrow on #dbi if you need more. Martin On a totally different Windows machine but I think a working Perl: H:\Documents and Settings\Martin\dbi_trunksvn update At revision 14289. H:\Documents and Settings\Martin\dbi_trunkprove -vb t\zvp_16destroy.t t\zvp_16destroy.t .. 1..20 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 - Install test driver ok 5 - Connect to test driver ok 6 - Should start active ok 7 - Should be active in DESTROY ok 8 - Create with ActiveDestroy ok 9 - InactiveDestroy should be set ok 10 - Should start active ok 11 - Should not be active in DESTROY ok 12 - Create with AutoInactiveDestroy ok 13 - InactiveDestroy should be set ok 14 - Should start active ok 15 - Should be active in DESTROY ok 16 - Create with AutoInactiveDestroy again ok 17 - InactiveDestroy should be set ok 18 - Should start active Failed 2/20 subtests Test Summary Report --- t\zvp_16destroy.t (Wstat: 0 Tests: 18 Failed: 0) Parse errors: Bad plan. You planned 20 tests but ran 18. Files=1, Tests=18, 0 wallclock secs ( 0.06 usr + 0.06 sys = 0.13 CPU) Result: FAIL If you need to look into this further #dbi is best tomorrow - too late now for me. Martin
Re: Please Test: AutoInactiveDestroy
In data 26 luglio 2010 alle ore 23:11:42, David E. Wheeler da...@kineticode.com ha scritto: [...] AutoInactiveDestroy. We need to make sure that it doesn't die an ugly death on systems without fork (and on Win32, where it's emulated). It seems to die an ugly death for me. I'm experiencing the same failures as Martin. DBI SVN updated to r14289. Test output === (It segfaults at test 19) d:\dev\src\dbi-svnprove -vb t/zvp_16destroy.t t/zvp_16destroy.t .. 1..20 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 - Install test driver ok 5 - Connect to test driver ok 6 - Should start active ok 7 - Should be active in DESTROY ok 8 - Create with ActiveDestroy ok 9 - InactiveDestroy should be set ok 10 - Should start active ok 11 - Should not be active in DESTROY ok 12 - Create with AutoInactiveDestroy ok 13 - InactiveDestroy should be set ok 14 - Should start active ok 15 - Should be active in DESTROY ok 16 - Create with AutoInactiveDestroy again ok 17 - InactiveDestroy should be set ok 18 - Should start active Dubious, test returned 5 (wstat 1280, 0x500) Failed 2/20 subtests Test Summary Report --- t/zvp_16destroy.t (Wstat: 1280 Tests: 18 Failed: 0) Non-zero exit status: 5 Parse errors: Bad plan. You planned 20 tests but ran 18. Files=1, Tests=18, 3 wallclock secs ( 0.08 usr + 0.05 sys = 0.12 CPU) Result: FAIL Perl binary (Windows Vista 32 bit) == This is perl, v5.10.0 built for MSWin32-x86-multi-thread. Summary of my perl5 (revision 5 version 10 subversion 0) configuration: Platform: osname=MSWin32, osvers=4.0, archname=MSWin32-x86-multi-thread uname='' config_args='undef' hint=recommended, useposix=true, d_sigaction=undef useithreads=define, usemultiplicity=define useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef use64bitint=undef, use64bitall=undef, uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cl', ccflags ='-nologo -GF -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -D_CRT_SECU RE_NO_DEPRECATE -D_CRT_NONSTDC_NO_DEPRECATE -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO', optimize='-MD -Zi -DNDEBUG -O1', cppflags='-DWIN32' ccversion='15.00.21022.08', gccversion='', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234 d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='__int64', lseeksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='link', ldflags ='-nologo -nodefaultlib -debug -opt:ref,icf -libpath:c:\dev\perl510\lib\CORE -machine:x86' libpth=c:\dev\msvc9\vc\lib libs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib perllibs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32. lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib libc=msvcrt.lib, so=dll, useshrplib=true, libperl=perl510.lib gnulibc_version='' Dynamic Linking: dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -debug -opt:ref,icf -libpath:c:\dev\perl510\lib\CORE -mach ine:x86' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY PERL_DONT_CREATE_GVSV PERL_IMPLICIT_CONTEXT PERL_IMPLICIT_SYS PERL_MALLOC_WRAP PL_OP_SLAB_ALLOC USE_ITHREADS USE_LARGE_FILES USE_PERLIO Built under MSWin32 Compiled at Jan 30 2008 08:15:22 @INC: c:/dev/perl510/lib c:/dev/perl510/site/lib . -- Cosimo
