Enbugger v2.016 Perl 5 v5.26.1 amd64-freebsd
- Status
- Fail
- From
- Slaven Rezić (SREZIC)
- Dist
-
Enbugger v2.016
- Platform
- Perl 5 v5.26.1 amd64-freebsd
- Date
- 2019-05-15 21:35:46
- ID
- 668aeea0-7759-11e9-bce5-ce4b1f24ea8f
This distribution has been tested as part of the CPAN Testers
project, supporting the Perl programming language. See
http://wiki.cpantesters.org/ for more information or email
questions to cpan-testers-discuss@perl.org
--
Dear Joshua ben Jore,
This is a computer-generated report for Enbugger-2.016
on perl 5.26.1, created by CPAN-Reporter-1.2018.
Thank you for uploading your work to CPAN. However, there was a problem
testing your distribution.
If you think this report is invalid, please consult the CPAN Testers Wiki
for suggestions on how to avoid getting FAIL reports for missing library
or binary dependencies, unsupported operating systems, and so on:
http://wiki.cpantesters.org/wiki/CPANAuthorNotes
Sections of this report:
* Tester comments
* Program output
* Prerequisites
* Environment and other context
------------------------------
TESTER COMMENTS
------------------------------
Additional comments from tester:
none provided
------------------------------
PROGRAM OUTPUT
------------------------------
Output from '/usr/bin/make test':
"/usr/perl5.26.1p/bin/perl" -MExtUtils::Command::MM -e 'cp_nonempty' -- Enbugger.bs blib/arch/auto/Enbugger/Enbugger.bs 644
PERL_DL_NONLAZY=1 "/usr/perl5.26.1p/bin/perl" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/10load.t .............. ok
#!perl
# COPYRIGHT AND LICENCE
#
# Copyright (C) 2007,2008 WhitePages.com, Inc. with primary
# development by Joshua ben Jore.
#
# This program is distributed WITHOUT ANY WARRANTY, including but not
# limited to the implied warranties of merchantability or fitness for
# a particular purpose.
#
# The program is free software. You may distribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation (either version 2 or any later version)
# and the Perl Artistic License as published by OâÂÂReilly Media, Inc.
# Please open the files named gpl-2.0.txt and Artistic for a copy of
# these licenses.
use strict;
use warnings;
use Getopt::Long qw( GetOptions );
use vars qw( $Ok );
use lib qw( ./t/ );
BEGIN {
require 'reset_perms.pl';
=head1 DESCRIPTION
This test attempts to run the perl5db debugger, gives it some
commands, then tests that the commands occurred. In general the idea
is that depending on how the Enbugger.xs code is modifying COP nodes,
it could have either removed instrumentation from code that should be
instrumented or done the reverse and instrumented the debugger itself.
The output of this program can be read by another program and used in
a test.
=head1 OPTIONS
=over
=item --noimport
Enbugger will be loaded without calling C<< ->import >>.
=item --import ELT
Adds an item to the C<< ->import >> argument list.
=item --help
Runs perldoc on this program.
=item --load_perl5db
After loading Enbugger, C<< Enbugger->load_perl5db >> will also be called.
=back
=cut
$ENV{PERLDB_OPTS} = 'noTTY';
# Option parsing.
my $import = 1;
my @import = ();
my $loadPerl5Db = 0;
my $onError = 0;
GetOptions(
help => sub { exec {'perldoc'} 'perldoc', $0 },
noimport => sub { $import = 0 },
'import=s' => \@import,
load_perl5db => \ $loadPerl5Db,
onerror => \ $onError,
)
or exec {'perldoc'} 'perldoc', $0;
# Promote some options into constants.
require constant;
constant->import( LoadPerl5Db => !! $loadPerl5Db );
# The test is whether the debugger runs and is controlled by my
# test commands here.
{
no warnings 'once';
push @DB::typeahead, '$main::Ok = 1', 'c', 'q';
}
# All our output will go to *OUT. If this program was given a
# parameter, we accept it as file that we should write our output too.
{
my ( $file ) = shift @ARGV;
if ( defined $file ) {
open OUT, '>', $file
or die "Can't open $file for writing: $!";
}
else {
*OUT = *STDOUT;
}
# OUTPUT is HOT.
select *OUT;
$| = 1;
# Things written to STDERR should also go to our single *OUT.
no warnings 'once';
*STDERR = $DB::OUT = $DB::LINEINFO = *OUT;
}
# Look to see if the debugger is on. Before I go and load
# Enbugger, I figure I can at least count on being able to examine
# $^P to see if we were started with the -d debugger flag.
constant->import( UnderTheDebugger => !! $^P );
# Load Enbugger and completely knacker our process. This little
# snippet used to just be a static `use Enbugger;' but I moved it
# up here when it became obvious that I wanted to optionally avoid
# importing anything.
if ( $onError ) {
require Enbugger::OnError;
Enbugger::OnError->import;
}
else {
require Enbugger;
if ( $import ) {
Enbugger->import( @import );
}
}
# Now dropping into normal run-time.
}
# Load the perl5db debugger if the user asked for us to do it
# manually. Normally the ->stop method call will also do this for us.
if ( LoadPerl5Db ) {
Enbugger->load_perl5db;
}
# Trigger a breakpoint.
#
# At this point, I already supplied some commands to the debugger so
# it should go set our $ok variable and then continue on
# automatically.
Enbugger->stop unless $Ok;
# Check that the debugger was stopped and it processed the commands
# requested of it.
$Ok = 'undef' if not defined $Ok;
print "\$ok = $Ok.\n";
## Local Variables:
## mode: cperl
## mode: auto-fill
## cperl-indent-level: 4
## tab-width: 8
## End:
main::(t/11load.pl:159): $Ok = 'undef' if not defined $Ok;
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
at /usr/perl5.26.1p/lib/site_perl/5.26.1/amd64-freebsd/Term/ReadLine/Gnu.pm line 845.
Term::ReadLine::Gnu::AU::AUTOLOAD(Term::ReadLine=HASH(0x436224b0)) called at /usr/perl5.26.1p/lib/site_perl/5.26.1/amd64-freebsd/Term/ReadLine/Gnu.pm line 287
Term::ReadLine::Gnu::new("Term::ReadLine", "perldb", GLOB(0x43625978), GLOB(0x43625978)) called at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868
DB::setterm() called at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 1848
DB::_DB__read_next_cmd(undef) called at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 2786
DB::DB called at t/11load.pl line 159
Failed to run /usr/perl5.26.1p/bin/perl -Mblib t/11load.pl /var/tmp/cpansmoker-1023/2019051604/h5p5IYJorK: signal: 11 at t/Test/Enbugger.pm line 104.
# Looks like your test exited with 255 before it could output anything.
t/11load.t ..............
Dubious, test returned 255 (wstat 65280, 0xff00)
Failed 12/12 subtests
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
at /usr/perl5.26.1p/lib/site_perl/5.26.1/amd64-freebsd/Term/ReadLine/Gnu.pm line 845.
Term::ReadLine::Gnu::AU::AUTOLOAD(Term::ReadLine=HASH(0x459c4570)) called at /usr/perl5.26.1p/lib/site_perl/5.26.1/amd64-freebsd/Term/ReadLine/Gnu.pm line 287
Term::ReadLine::Gnu::new("Term::ReadLine", "perldb", GLOB(0x441a8858), GLOB(0x440f82d0)) called at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868
DB::setterm() called at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 1848
DB::_DB__read_next_cmd(undef) called at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 2786
DB::DB() called at /home/cpansand/.cpan/build/2019051604/Enbugger-2.016-2/blib/lib/Enbugger/OnError.pm line 107
Enbugger::OnError::ExceptionHandler("An exception.\x{a}") called at t/20error.t line 42
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
t/20error.t .............
Dubious, test returned 22 (wstat 5632, 0x1600)
Failed 1/1 subtests
t/21error.t ............. ok
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
at t/22signal.t line 50.
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
END failed--call queue aborted.
at t/22signal.t line 0.
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
END failed--call queue aborted.
at t/22signal.t line 0.
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
END failed--call queue aborted.
at t/22signal.t line 0.
t/22signal.t ............
Dubious, test returned 22 (wstat 5632, 0x1600)
Failed 1/1 subtests
#!perl
# COPYRIGHT AND LICENCE
#
# Copyright (C) 2014 Joshua ben Jore.
#
# This program is distributed WITHOUT ANY WARRANTY, including but not
# limited to the implied warranties of merchantability or fitness for
# a particular purpose.
#
# The program is free software. You may distribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation (either version 2 or any later version)
# and the Perl Artistic License as published by OâÂÂReilly Media, Inc.
# Please open the files named gpl-2.0.txt and Artistic for a copy of
# these licenses.
use strict;
use warnings;
use Getopt::Long qw( GetOptions );
use vars qw( $Caught $Value );
use lib qw( ./t );
BEGIN {
require 'reset_perms.pl';
=head1 DESCRIPTION
This test attempts to run the perl5db debugger, break on a line, then
tests that the break occurred where expected. This tests both that
%{"_<30break.pl"} with L magic and @{"_<30break.pl"} with dual-var
strings has been created.
The output of this program can be read by another program and used in
a test.
=head1 OPTIONS
=over
=item --noimport
Enbugger will be loaded without calling C<< ->import >>.
=item --import ELT
Adds an item to the C<< ->import >> argument list.
=item --help
Runs perldoc on this program.
=item --load_perl5db
After loading Enbugger, C<< Enbugger->load_perl5db >> will also be called.
=back
=cut
$ENV{PERLDB_OPTS} = 'noTTY';
# Option parsing.
my $import = 1;
my @import = ();
my $loadPerl5Db = 0;
GetOptions(
help => sub { exec {'perldoc'} 'perldoc', $0 },
noimport => sub { $import = 0 },
'import=s' => \@import,
load_perl5db => \ $loadPerl5Db,
)
or exec {'perldoc'} 'perldoc', $0;
# Promote some options into constants.
require constant;
constant->import( LoadPerl5Db => !! $loadPerl5Db );
# The test is whether the debugger runs and is controlled by my
# test commands here.
{
no warnings 'once';
@DB::typeahead = (
'l 1-200',
'b 146',
'c',
'$main::Caught = $main::Value',
'c',
'q'
);
}
# All our output will go to *OUT. If this program was given a
# parameter, we accept it as file that we should write our output too.
{
my ( $file ) = shift @ARGV;
if ( defined $file ) {
open OUT, '>', $file
or die "Can't open $file for writing: $!";
}
else {
*OUT = *STDOUT;
}
# OUTPUT is HOT.
select *OUT;
$| = 1;
# Things written to STDERR should also go to our single *OUT.
no warnings 'once';
*STDERR = $DB::OUT = $DB::LINEINFO = *OUT;
}
# Look to see if the debugger is on. Before I go and load
# Enbugger, I figure I can at least count on being able to examine
# $^P to see if we were started with the -d debugger flag.
constant->import( UnderTheDebugger => !! $^P );
# Load Enbugger and completely knacker our process. This little
# snippet used to just be a static `use Enbugger;' but I moved it
# up here when it became obvious that I wanted to optionally avoid
# importing anything.
require Enbugger;
if ( $import ) {
Enbugger->import( @import );
}
}
# Commands executed here:
# > l 1-200
# > b 146
# > c
Enbugger->stop;
$Value = 0;
$Value = 1;
$Value = 2;
$Value = 3;
# Commands executed here when the breakpoint works.
# > $main::Caught = $main::Value
# > c
$Value = 4;
$Value = 5;
$Value = 6;
$Value = 7;
$Value = 8;
$Value = 9;
$Value = 0;
$Caught = 'undef' if ! defined $Caught;
print "\$Caught = $main::Caught.\n";
# Commands executed here:
# > q
main::(t/30break.pl:138): $Value = 0;
Cannot do `initialize' in Term::ReadLine::Gnu at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868.
at /usr/perl5.26.1p/lib/site_perl/5.26.1/amd64-freebsd/Term/ReadLine/Gnu.pm line 845.
Term::ReadLine::Gnu::AU::AUTOLOAD(Term::ReadLine=HASH(0x43651de0)) called at /usr/perl5.26.1p/lib/site_perl/5.26.1/amd64-freebsd/Term/ReadLine/Gnu.pm line 287
Term::ReadLine::Gnu::new("Term::ReadLine", "perldb", GLOB(0x43685948), GLOB(0x43685948)) called at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 6868
DB::setterm() called at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 1848
DB::_DB__read_next_cmd(undef) called at /usr/perl5.26.1p/lib/5.26.1/perl5db.pl line 2786
DB::DB called at t/30break.pl line 138
Failed to run /usr/perl5.26.1p/bin/perl -Mblib t/30break.pl /var/tmp/cpansmoker-1023/2019051604/TtLetqYBn8: exit: 25 at t/Test/Enbugger.pm line 104.
# Looks like your test exited with 25 before it could output anything.
t/30break.t .............
Dubious, test returned 25 (wstat 6400, 0x1900)
Failed 24/24 subtests
# report_file: t/nytprof.out
# report_dir: t/nytprof
# nytprofcsv: /usr/perl5.26.1p/bin/nytprofcsv
t/nytprof.t ............. ok
t/release-pod-syntax.t .. skipped: these tests are for release candidate testing
t/trepantest.t .......... skipped: Skipped because Devel::Trepan isn't installed
Test Summary Report
-------------------
t/11load.t (Wstat: 65280 Tests: 0 Failed: 0)
Non-zero exit status: 255
Parse errors: Bad plan. You planned 12 tests but ran 0.
t/20error.t (Wstat: 5632 Tests: 0 Failed: 0)
Non-zero exit status: 22
Parse errors: Bad plan. You planned 1 tests but ran 0.
t/22signal.t (Wstat: 5632 Tests: 0 Failed: 0)
Non-zero exit status: 22
Parse errors: Bad plan. You planned 1 tests but ran 0.
t/30break.t (Wstat: 6400 Tests: 0 Failed: 0)
Non-zero exit status: 25
Parse errors: Bad plan. You planned 24 tests but ran 0.
Files=9, Tests=17, 6 wallclock secs ( 0.06 usr 0.02 sys + 4.84 cusr 1.07 csys = 5.99 CPU)
Result: FAIL
Failed 4/9 test programs. 0/17 subtests failed.
*** Error code 255
Stop.
make: stopped in /home/cpansand/.cpan/build/2019051604/Enbugger-2.016-2
------------------------------
PREREQUISITES
------------------------------
Prerequisite modules loaded:
requires:
Module Need Have
------------------- ---- --------
B::Utils 0.25 0.27
Test::More 0 1.302162
build_requires:
Module Need Have
------------------- ---- --------
ExtUtils::MakeMaker 0 7.34
configure_requires:
Module Need Have
------------------- ---- --------
B::Utils 0.22 0.27
ExtUtils::CBuilder 0 0.280231
Test::More 0 1.302162
------------------------------
ENVIRONMENT AND OTHER CONTEXT
------------------------------
Environment variables:
PATH = /usr/local/bin:/usr/bin:/bin:/usr/local/sbin:/usr/sbin:/sbin:/home/cpansand/bin/freebsd11.2:/home/cpansand/bin/sh:/home/cpansand/bin:/usr/games:/home/cpansand/devel:/home/eserte/src/srezic-misc/scripts
PERL5LIB =
PERL5OPT =
PERL5_CPANPLUS_IS_RUNNING = 19928
PERL5_CPAN_IS_RUNNING = 19928
PERL5_CPAN_IS_RUNNING_IN_RECURSION = 19294,19928
PERLDOC = -MPod::Perldoc::ToTextOverstrike
PERL_BATCH = yes
PERL_CANARY_STABILITY_NOPROMPT = 1
PERL_CPAN_REPORTER_CONFIG = /var/tmp/cpansmoker-1023/2019051604/cpanreporter_000_config.ini
PERL_EXTUTILS_AUTOINSTALL = --defaultdeps
PERL_USE_UNSAFE_INC = 1
SHELL = /usr/local/bin/zsh
TERM = screen
TMPDIR = /var/tmp/cpansmoker-1023/2019051604
Perl special variables (and OS-specific diagnostics, for MSWin32):
$^X = /usr/perl5.26.1p/bin/perl
$UID/$EUID = 1023 / 1023
$GID = 1023 1023
$EGID = 1023 1023
Perl module toolchain versions installed:
Module Have
------------------- --------
CPAN 2.18
CPAN::Meta 2.150010
Cwd 3.75
ExtUtils::CBuilder 0.280231
ExtUtils::Command 7.34
ExtUtils::Install 2.06
ExtUtils::MakeMaker 7.34
ExtUtils::Manifest 1.70
ExtUtils::ParseXS 3.35
File::Spec 3.75
JSON 4.02
JSON::PP 4.02
Module::Build 0.4224
Module::Signature 0.81
Parse::CPAN::Meta 2.150010
Test::Harness 3.42
Test::More 1.302162
YAML 1.26
YAML::Syck 1.30
version 0.9917
--
Summary of my perl5 (revision 5 version 26 subversion 1) configuration:
Platform:
osname=freebsd
osvers=11.1-stable
archname=amd64-freebsd
uname='freebsd ali3.bbbike.org 11.1-stable freebsd 11.1-stable #1 21e3b2eb0af(stable11): thu oct 19 19:30:51 utc 2017 root@ali3.bbbike.org:usrobjhomeprojectsfreebsdsysgeneric amd64 '
config_args='-ds -e -Dprefix=/usr/perl5.26.1p -Dcf_email=srezic@cpan.org -Doptimize=-O2 -pipe'
hint=recommended
useposix=true
d_sigaction=define
useithreads=undef
usemultiplicity=undef
use64bitint=define
use64bitall=define
uselongdouble=undef
usemymalloc=n
default_inc_excludes_dot=define
bincompat5005=undef
Compiler:
cc='cc'
ccflags ='-DHAS_FPSETMASK -DHAS_FLOATINGPOINT_H -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include -D_FORTIFY_SOURCE=2'
optimize='-O2 -pipe'
cppflags='-DHAS_FPSETMASK -DHAS_FLOATINGPOINT_H -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include'
ccversion=''
gccversion='4.2.1 Compatible FreeBSD Clang 5.0.0 (tags/RELEASE_500/final 312559)'
gccosandvers=''
intsize=4
longsize=8
ptrsize=8
doublesize=8
byteorder=12345678
doublekind=3
d_longlong=define
longlongsize=8
d_longdbl=define
longdblsize=16
longdblkind=3
ivtype='long'
ivsize=8
nvtype='double'
nvsize=8
Off_t='off_t'
lseeksize=8
alignbytes=8
prototype=define
Linker and Libraries:
ld='cc'
ldflags ='-pthread -Wl,-E -fstack-protector-strong -L/usr/local/lib'
libpth=/usr/lib /usr/local/lib /usr/lib/clang/5.0.0/lib /usr/lib
libs=-lpthread -lgdbm -lm -lcrypt -lutil -lc
perllibs=-lpthread -lm -lcrypt -lutil -lc
libc=
so=so
useshrplib=false
libperl=libperl.a
gnulibc_version=''
Dynamic Linking:
dlsrc=dl_dlopen.xs
dlext=so
d_dlsymun=undef
ccdlflags=' '
cccdlflags='-DPIC -fPIC'
lddlflags='-shared -L/usr/local/lib -fstack-protector-strong'
Characteristics of this binary (from libperl):
Compile-time options:
HAS_TIMES
PERLIO_LAYERS
PERL_COPY_ON_WRITE
PERL_DONT_CREATE_GVSV
PERL_MALLOC_WRAP
PERL_OP_PARENT
PERL_PRESERVE_IVUV
USE_64_BIT_ALL
USE_64_BIT_INT
USE_LARGE_FILES
USE_LOCALE
USE_LOCALE_COLLATE
USE_LOCALE_CTYPE
USE_LOCALE_NUMERIC
USE_LOCALE_TIME
USE_PERLIO
USE_PERL_ATOF
Built under freebsd
Compiled at Oct 31 2017 01:02:57
%ENV:
PERL5LIB=""
PERL5OPT=""
PERL5_CPANPLUS_IS_RUNNING="19928"
PERL5_CPAN_IS_RUNNING="19928"
PERL5_CPAN_IS_RUNNING_IN_RECURSION="19294,19928"
PERLDOC="-MPod::Perldoc::ToTextOverstrike"
PERL_BATCH="yes"
PERL_CANARY_STABILITY_NOPROMPT="1"
PERL_CPAN_REPORTER_CONFIG="/var/tmp/cpansmoker-1023/2019051604/cpanreporter_000_config.ini"
PERL_EXTUTILS_AUTOINSTALL="--defaultdeps"
PERL_USE_UNSAFE_INC="1"
@INC:
/usr/perl5.26.1p/lib/site_perl/5.26.1/amd64-freebsd
/usr/perl5.26.1p/lib/site_perl/5.26.1
/usr/perl5.26.1p/lib/5.26.1/amd64-freebsd
/usr/perl5.26.1p/lib/5.26.1
.