DBD-Oracle-1.91_4: t/90-segv-threads.t seems to hang only using Strawberry Perl 5.14.4

[twata1]

Hello,

I will report this because it may provide a hint for solving some other issue in the future.

The output of the test using Strawberry Perl 5.14.4 (64-bit) was as follows.

t/00-compile.t ............ ok
t/00-report-prereqs.t ..... #
# Versions for all modules listed in MYMETA.json (including optional ones):
#
# === Configure Requires ===
#
#     Module               Want     Have
#     ------------------- ----- --------
#     DBI                 1.623    1.623
#     ExtUtils::MakeMaker   any     6.64
#     perl                5.006 5.014004
#
# === Configure Suggests ===
#
#     Module      Want    Have
#     -------- ------- -------
#     JSON::PP 2.27300 2.27200
#
# === Build Requires ===
#
#     Module               Want  Have
#     ------------------- ----- -----
#     Config                any undef
#     DBI                 1.623 1.623
#     ExtUtils::MakeMaker   any  6.64
#
# === Test Requires ===
#
#     Module               Want     Have
#     ------------------- ----- --------
#     B                     any     1.29
#     Carp                  any     1.26
#     DBI                 1.623    1.623
#     Data::Dumper          any    2.143
#     Devel::Peek           any     1.07
#     Encode                any     2.49
#     ExtUtils::MakeMaker   any     6.64
#     File::Spec            any     3.40
#     FindBin               any     1.50
#     IO::Handle            any     1.31
#     IPC::Open3            any   1.0901
#     Math::BigInt          any    1.997
#     POSIX                 any     1.24
#     Symbol                any     1.07
#     Test::More            any     0.98
#     Test::NoWarnings      any     1.04
#     Thread::Queue         any     3.02
#     Thread::Semaphore     any     2.12
#     Time::HiRes           any   1.9725
#     bytes                 any     1.04
#     lib                   any     0.63
#     perl                5.008 5.014004
#     strict                any     1.04
#     threads               any     1.86
#     threads::shared      1.51     1.59
#     utf8                  any     1.09
#     vars                  any     1.02
#     warnings              any     1.12
#
# === Test Recommends ===
#
#     Module         Want     Have
#     ---------- -------- --------
#     CPAN::Meta 2.120900 2.120921
#
# === Runtime Requires ===
#
#     Module            Want     Have
#     ---------------- ----- --------
#     DBI              1.623    1.623
#     Data::Dumper       any    2.143
#     DynaLoader         any     1.13
#     Exporter           any     5.67
#     Test::NoWarnings     1     1.04
#     Test::Simple       0.9     0.98
#     perl             5.008 5.014004
#     strict             any     1.04
#     warnings           any     1.12
#
t/00-report-prereqs.t ..... ok
t/00dbdoracletestlib.t .... ok
t/01base.t ................ ok
t/02versions.t ............ ok
t/05base.t ................ ok
t/10general.t ............. ok
t/12impdata.t ............. ok
t/14threads.t ............. ok
t/15nls.t ................. ok
t/15threads.t ............. ok
t/16cached.t .............. ok
t/16drcp.t ................ ok
t/202sv_setvpn_mg.t ....... ok
t/20select.t .............. ok
t/21nchar.t ............... ok
t/22cset.t ................ ok
t/22nchar_al32utf8.t ...... ok
t/22nchar_utf8.t .......... ok
t/23wide_db.t ............. ok
t/23wide_db_8bit.t ........ ok
t/23wide_db_al32utf8.t .... ok
t/24implicit_utf8.t ....... ok
t/25plsql.t ............... 1/86
#   Failed test 'expected return length'
#   at t/25plsql.t line 232.
#          got: '5'
#     expected: '200'
t/25plsql.t ............... 72/86 # Looks like you failed 1 test of 86.
t/25plsql.t ............... Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/86 subtests
        (less 4 skipped subtests: 81 okay)
t/26exe_array.t ........... ok
t/28array_bind.t .......... ok
t/30long.t ................ ok
t/31lob.t ................. ok
t/31lob_extended.t ........ ok
t/32xmltype.t ............. ok
t/34pres_lobs.t ........... ok
t/36lob_leak.t ............ ok
t/38taf.t ................. ok
t/39attr.t ................ ok
t/40ph_type.t ............. ok
t/50cursor.t .............. Can't determine open_cursors from v$parameter, so using default
t/50cursor.t .............. ok
t/51scroll.t .............. ok
t/55nested.t .............. ok
t/56embbeded.t ............ ok
t/58object.t .............. ok
t/60reauth.t .............. ok
t/70meta.t ................ ok
t/80ora_charset.t ......... ok
t/86bind_col_sticky.t ..... SV = PV(0x2292068) at 0x28607a0
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x28d5798 "2"\0
  CUR = 1
  LEN = 16
SV = PV(0x2291e58) at 0x2860bd8
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x28d5828 "2"\0
  CUR = 1
  LEN = 16
t/86bind_col_sticky.t ..... ok
t/90-segv-threads.t ....... 1/? Thread 1 terminated abnormally: Can't call method "dequeue_nb" on unblessed reference at t/90-segv
-threads.t line 376.
Thread 2 terminated abnormally: Can't call method "dequeue_nb" on unblessed reference at t/90-segv-threads.t line 376.
(hangs)

Thank you,

[djzort]

I appreciate the report, though im keen to understand if this report is different to #191

This is new:

t/25plsql.t ............... 1/86
#   Failed test 'expected return length'
#   at t/25plsql.t line 232.
#          got: '5'
#     expected: '200'

[twata1]

Please refer to #216 regarding the failure of t/25plsql.t.

Thank you,

[djzort]

@twata1 can you grab the candidate branch and try just the failing test again?

git clone...
git checkout cand-v1.91
dzil build
... 
etc

[twata1]

Sorry, I've never used the dzil command before.
Additionally, I tried installing Dist::Zilla on Strawberry perl 5.14.4, but it's difficult.
The result was as follows.

Results of using Strawberry Perl 5.14.4

C:\home\headlight4\DBD-Oracle>dmake test
C:\strawberry-perl-5.14.4.1-64bit-portable\perl\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib\lib', 'blib\a
h')" t/*.t
t/00dbdoracletestlib.t .... ok
t/01base.t ................ ok
t/02versions.t ............ ok
t/05base.t ................ ok
t/10general.t ............. ok
t/12impdata.t ............. ok
t/14threads.t ............. ok
t/15nls.t ................. ok
t/15threads.t ............. ok
t/16cached.t .............. ok
t/16drcp.t ................ ok
t/202sv_setvpn_mg.t ....... ok
t/20select.t .............. ok
t/21nchar.t ............... ok
t/22cset.t ................ ok
t/22nchar_al32utf8.t ...... ok
t/22nchar_utf8.t .......... ok
t/23wide_db.t ............. ok
t/23wide_db_8bit.t ........ ok
t/23wide_db_al32utf8.t .... ok
t/24implicit_utf8.t ....... ok
t/25plsql.t ............... ok
t/26exe_array.t ........... ok
t/28array_bind.t .......... ok
t/30long.t ................ ok
t/31lob.t ................. ok
t/31lob_extended.t ........ ok
t/32xmltype.t ............. ok
t/34pres_lobs.t ........... ok
t/36lob_leak.t ............ ok
t/38taf.t ................. ok
t/39attr.t ................ ok
t/40ph_type.t ............. ok
t/50cursor.t .............. Can't determine open_cursors from v$parameter, so using default
t/50cursor.t .............. ok
t/51scroll.t .............. ok
t/55nested.t .............. ok
t/56embbeded.t ............ ok
t/58object.t .............. ok
t/60reauth.t .............. ok
t/70meta.t ................ ok
t/80ora_charset.t ......... ok
t/86bind_col_sticky.t ..... SV = PV(0x2239ef8) at 0x2c64090
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x2d36df8 "2"\0
  CUR = 1
  LEN = 16
SV = PV(0x223a388) at 0x2c65418
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x2d375d8 "2"\0
  CUR = 1
  LEN = 16
t/86bind_col_sticky.t ..... ok
t/90-segv-threads.t ....... 1/? Thread 1 terminated abnormally: Can't call method "dequeue_nb" on unblessed reference at t/90-se
-threads.t line 376.
Thread 2 terminated abnormally: Can't call method "dequeue_nb" on unblessed reference at t/90-segv-threads.t line 376.
(hangs)

Thank you,

[twata1]

Results of t\90-segv-threads.t using Strawberry Perl 5.14.4

C:\home\headlight4\DBD-Oracle>prove -blv t\90-segv-threads.t
t\90-segv-threads.t ..
# + --------------------------------------------- +
#  Threads + DB->ping stress testing
# + --------------------------------------------- +
ok 1 - isa DB::Queue
ok 2 - ! q->isEnabled
Thread 1 terminated abnormally: Can't call method "dequeue_nb" on unblessed reference at t\90-segv-threads.t line 376.
Thread 2 terminated abnormally: Can't call method "dequeue_nb" on unblessed reference at t\90-segv-threads.t line 376.
ok 3 -   q->enable(X)
ok 4 -   q->isEnabled
ok 5 -   q->ping
(hangs)

[djzort]

@twata1 please try this branch: https://github.com/perl5-dbi/DBD-Oracle/tree/b215

It skips these tests on non-linux and sets minimum version for Thread::Queue (See 626c4ea)

[twata1]

@djzort

please try this branch: https://github.com/perl5-dbi/DBD-Oracle/tree/b215

First attempt:

Results of using Strawberry Perl 5.14.4

C:\home\headlight4\DBD-Oracle>dmake test
"C:\strawberry-perl-5.14.4.1-64bit-portable\perl\bin\perl.exe" -MExtUtils::Command::MM -e cp_nonempty -- Oracle.bs blib\arch\auto\
DBD\Oracle\Oracle.bs 644
"C:\strawberry-perl-5.14.4.1-64bit-portable\perl\bin\perl.exe" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harn
ess::Switches; test_harness(0, 'blib\lib', 'blib\arch')" t/*.t
t/00dbdoracletestlib.t .... ok
t/01base.t ................ ok
t/02versions.t ............ ok
t/05base.t ................ ok
t/10general.t ............. ok
t/12impdata.t ............. ok
t/14threads.t ............. ok
t/15nls.t ................. ok
t/15threads.t ............. ok
t/16cached.t .............. ok
t/16drcp.t ................ ok
t/202sv_setvpn_mg.t ....... ok
t/20select.t .............. ok
t/21nchar.t ............... ok
t/22cset.t ................ ok
t/22nchar_al32utf8.t ...... ok
t/22nchar_utf8.t .......... ok
t/23wide_db.t ............. ok
t/23wide_db_8bit.t ........ ok
t/23wide_db_al32utf8.t .... ok
t/24implicit_utf8.t ....... ok
t/25plsql.t ............... ok
t/26exe_array.t ........... ok
t/28array_bind.t .......... ok
t/30long.t ................ ok
t/31lob.t ................. ok
t/31lob_extended.t ........ ok
t/32xmltype.t ............. ok
t/34pres_lobs.t ........... ok
t/36lob_leak.t ............ ok
t/38taf.t ................. ok
t/39attr.t ................ ok
t/40ph_type.t ............. ok
t/50cursor.t .............. Can't determine open_cursors from v$parameter, so using default
t/50cursor.t .............. ok
t/51scroll.t .............. ok
t/55nested.t .............. ok
t/56embbeded.t ............ ok
t/58object.t .............. ok
t/60reauth.t .............. ok
t/70meta.t ................ ok
t/80ora_charset.t ......... ok
t/86bind_col_sticky.t ..... SV = PV(0x23a44b8) at 0x2df9f30
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x2ebe968 "2"\0
  CUR = 1
  LEN = 16
SV = PV(0x23a7378) at 0x2dfd2d8
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x2ebf3b8 "2"\0
  CUR = 1
  LEN = 16
t/86bind_col_sticky.t ..... ok
t/90-segv-threads.t ....... Thread::Queue version 3.07 required--this is only version 3.02 at t/90-segv-threads.t line 25.
BEGIN failed--compilation aborted at t/90-segv-threads.t line 25.
t/90-segv-threads.t ....... Dubious, test returned 255 (wstat 65280, 0xff00)
No subtests run
t/91-segv-fork.t .......... No such signal: SIGUSR1 at t/91-segv-fork.t line 147.
 at t/91-segv-fork.t line 158.
BEGIN failed--compilation aborted at t/91-segv-fork.t line 158.
t/91-segv-fork.t .......... Dubious, test returned 2 (wstat 512, 0x200)
No subtests run
t/92-segv-fork.t .......... skipped: 92-segv-fork.t: skipping - test only runs on Linux (running on MSWin32)
t/rt13865.t ............... ok
t/rt74753-utf8-encoded.t .. ok
t/rt85886.t ............... ok

Test Summary Report
-------------------
t/90-segv-threads.t     (Wstat: 65280 (exited 255) Tests: 0 Failed: 0)
  Non-zero exit status: 255
  Parse errors: No plan found in TAP output
t/91-segv-fork.t        (Wstat: 512 (exited 2) Tests: 0 Failed: 0)
  Non-zero exit status: 2
  Parse errors: No plan found in TAP output
Files=48, Tests=1461, 54 wallclock secs ( 0.31 usr +  0.09 sys =  0.41 CPU)
Result: FAIL
Failed 2/48 test programs. 0/1461 subtests failed.
dmake:  Error code 255, while making 'test_dynamic'

C:\home\headlight4\DBD-Oracle>

Second attempt (with Thread::Queue version 3.13):

Results of using Strawberry Perl 5.14.4

C:\home\headlight4\DBD-Oracle>dmake test
"C:\strawberry-perl-5.14.4.1-64bit-portable\perl\bin\perl.exe" -MExtUtils::Command::MM -e cp_nonempty -- Oracle.bs blib\arch\auto\
DBD\Oracle\Oracle.bs 644
"C:\strawberry-perl-5.14.4.1-64bit-portable\perl\bin\perl.exe" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harn
ess::Switches; test_harness(0, 'blib\lib', 'blib\arch')" t/*.t
t/00dbdoracletestlib.t .... ok
t/01base.t ................ ok
t/02versions.t ............ ok
t/05base.t ................ ok
t/10general.t ............. ok
t/12impdata.t ............. ok
t/14threads.t ............. ok
t/15nls.t ................. ok
t/15threads.t ............. ok
t/16cached.t .............. ok
t/16drcp.t ................ ok
t/202sv_setvpn_mg.t ....... ok
t/20select.t .............. ok
t/21nchar.t ............... ok
t/22cset.t ................ ok
t/22nchar_al32utf8.t ...... ok
t/22nchar_utf8.t .......... ok
t/23wide_db.t ............. ok
t/23wide_db_8bit.t ........ ok
t/23wide_db_al32utf8.t .... ok
t/24implicit_utf8.t ....... ok
t/25plsql.t ............... ok
t/26exe_array.t ........... ok
t/28array_bind.t .......... ok
t/30long.t ................ ok
t/31lob.t ................. ok
t/31lob_extended.t ........ ok
t/32xmltype.t ............. ok
t/34pres_lobs.t ........... ok
t/36lob_leak.t ............ ok
t/38taf.t ................. ok
t/39attr.t ................ ok
t/40ph_type.t ............. ok
t/50cursor.t .............. Can't determine open_cursors from v$parameter, so using default
t/50cursor.t .............. ok
t/51scroll.t .............. ok
t/55nested.t .............. ok
t/56embbeded.t ............ ok
t/58object.t .............. ok
t/60reauth.t .............. ok
t/70meta.t ................ ok
t/80ora_charset.t ......... ok
t/86bind_col_sticky.t ..... SV = PV(0x22f36a8) at 0x2d4af40
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x2e07a08 "2"\0
  CUR = 1
  LEN = 16
SV = PV(0x22f6568) at 0x2d4d2d8
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x2e08848 "2"\0
  CUR = 1
  LEN = 16
t/86bind_col_sticky.t ..... ok
t/90-segv-threads.t ....... skipped: 90-segv-threads.t: skipping - test only runs on Linux (running on MSWin32)
t/91-segv-fork.t .......... No such signal: SIGUSR1 at t/91-segv-fork.t line 147.
 at t/91-segv-fork.t line 158.
BEGIN failed--compilation aborted at t/91-segv-fork.t line 158.
t/91-segv-fork.t .......... Dubious, test returned 2 (wstat 512, 0x200)
No subtests run
t/92-segv-fork.t .......... skipped: 92-segv-fork.t: skipping - test only runs on Linux (running on MSWin32)
t/rt13865.t ............... ok
t/rt74753-utf8-encoded.t .. ok
t/rt85886.t ............... ok

Test Summary Report
-------------------
t/91-segv-fork.t        (Wstat: 512 (exited 2) Tests: 0 Failed: 0)
  Non-zero exit status: 2
  Parse errors: No plan found in TAP output
Files=48, Tests=1461, 46 wallclock secs ( 0.30 usr +  0.06 sys =  0.36 CPU)
Result: FAIL
Failed 1/48 test programs. 0/1461 subtests failed.
dmake:  Error code 255, while making 'test_dynamic'

C:\home\headlight4\DBD-Oracle>

Thank you,

[djzort]

t/90-segv-threads.t ....... Thread::Queue version 3.07 required--this is only version 3.02 at t/90-segv-threads.t line 25.

This is to be expected from the use Thread::Queue 3.07;

If you're on the branch and use dzil to build it, the cpanfile will be written out with this new minimum requirement.

i.e.

dzil build
grep Thread cpanfile
  requires "Thread::Queue" => "3.07";
...

With the cpanfile in place - you can have cpanm update dependencies with:

cpanm --installdeps .

That is, assuming cpanm works the same on windows.