This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perl5.git
3 years agoperldelta for b79cd7dfef
Steve Hay [Fri, 24 Aug 2018 14:52:17 +0000 (15:52 +0100)]
perldelta for b79cd7dfef

3 years agoTidy up Windows makefiles' handling of CCTYPE=SDK2003SP1
Steve Hay [Fri, 24 Aug 2018 14:38:01 +0000 (15:38 +0100)]
Tidy up Windows makefiles' handling of CCTYPE=SDK2003SP1

As noted in the comments at the top of each makefile, and again in the
README.win32, we only intended to support the 64-bit compiler, which was
the earliest MSVC x64 compiler available since neither VC6 nor VC7 had one.

3 years agoFix Windows build with CCTYPE=SDK2003SP1
Steve Hay [Fri, 24 Aug 2018 13:55:45 +0000 (14:55 +0100)]
Fix Windows build with CCTYPE=SDK2003SP1

The Platform SDK 2003 SP1 x64 compiler has _MSC_VER 1400 like MSVC80, but
doesn't define _configthreadlocale() in the /MD (MSVCRT.DLL) version of
the CRT used by perl. (Compare C:\Program Files\Microsoft Platform SDK for
Windows Server 2003 R2\src\crt\setlocal.c with C:\Program Files (x86)\
Microsoft Visual Studio 8\VC\crt\src\setlocal.c. The latter always defines
_configthreadlocale(), but the former only does so when _MT is defined.)

3 years agoPATCH: [perl #133468] Silence compiler warning
Karl Williamson [Thu, 23 Aug 2018 23:36:50 +0000 (17:36 -0600)]
PATCH: [perl #133468] Silence compiler warning

This inline function is no longer called from re_comp.c, so doesn't need
to be compiled there, as don't the surrounding functions

3 years agoRemove duplicate of commented-out test.
James E Keenan [Thu, 23 Aug 2018 15:01:33 +0000 (11:01 -0400)]
Remove duplicate of commented-out test.

3 years agoperldelta for Locale::Codes removal
Karl Williamson [Thu, 23 Aug 2018 15:00:13 +0000 (09:00 -0600)]
perldelta for Locale::Codes removal

3 years ago__Storable__.pm: Bump version to 3.13
Karl Williamson [Thu, 23 Aug 2018 14:59:31 +0000 (08:59 -0600)]
__Storable__.pm: Bump version to 3.13

3 years agofix Storable rethrowing refs when Log::Agent is installed
Graham Knop [Mon, 7 May 2018 11:50:53 +0000 (13:50 +0200)]
fix Storable rethrowing refs when Log::Agent is installed

Storable rethrows errors from its hooks, STORABLE_freeze, STORABLE_thaw,
and STORABLE_attach.  If those errors are refs, they should be preserved
in their original form.  Tests were added to ensure this in 06f586d.
However, when Log::Agent is installed, Storable uses it rather than just
calling Carp::croak.  Log::Agent's logcroak function always stringifies
the errors it gets when it throws them.  This causes test failures in
many cases when the dual life dist is installed from CPAN.

This is a bug in Log::Agent, but since it is long standing behavior in a
non-core module, it's reasonable to work around it in Storable.

A simple workaround is to trap the error thrown by Log::Agent, and throw
the original arguments given to our logcroak.

3 years agoFix Devel::PPPort with Visual Studio by quoting $0:
Sawyer X [Wed, 8 Aug 2018 16:34:30 +0000 (19:34 +0300)]
Fix Devel::PPPort with Visual Studio by quoting $0:

The following was raised by A. Sinan Unur on p5p:

    Recent versions of Devel::PPPort on Windows with Visual Studio built
    `perl` fail tests in t\mess.t because $0 is interpolated into regex
    patterns without the use of quotemeta[1].

    In this case, $0 contains `\` as directory separators.

    This is necessary, because nmake tries to interpret part of a filename
    as a command line argument if it contains `/` characters.

    An easy fix is to use \Q$0\E instead of plain $0 in patterns.

    Here's a test report:

    http://www.cpantesters.org/cpan/report/e484fd2f-6c51-1014-9811-fe131a8368d1

    HTH,

    -- Sinan

    [1]: https://www.nu42.com/2014/11/youve-gotta-quotemeta.html

Link: http://nntp.perl.org/group/perl.perl5.porters/250734
3 years agoMake porting tests pass after Locale::Codes removal
James E Keenan [Sun, 19 Aug 2018 03:08:34 +0000 (23:08 -0400)]
Make porting tests pass after Locale::Codes removal

And remove references to it.  This consists of:

1. Run ./perl -Ilib regen/lib_cleanup.pl.

2. Add links to Locale::Codes for podcheck

    This distribution is now removed from the core, so podcheck can't
    determine if they are valid or not without being told to do so.
    This was accomplished by:

    perl porting/podcheck.t --add_link Locale::Language
    perl porting/podcheck.t --add_link Locale::Country

3.  t/TEST: Remove Locale::Codes reference as it is no longer in core

4.  Porting/corelist-perldelta.pl: Remove Locale::Codes, as it is no
    longer in core

3 years agoRemove Locale-Codes from Perl 5 core distribution.
Sullivan Beck [Sun, 19 Aug 2018 02:12:56 +0000 (22:12 -0400)]
Remove Locale-Codes from Perl 5 core distribution.

For: RT 133458

3 years agoperlobj: Recommend perlreftut over perlref
Karl Williamson [Wed, 22 Aug 2018 02:54:48 +0000 (20:54 -0600)]
perlobj: Recommend perlreftut over perlref

This change was recommended by Ovid in 2018 TPCig

3 years agoregcomp.c: Silence compiler warning
Karl Williamson [Wed, 15 Aug 2018 22:26:00 +0000 (16:26 -0600)]
regcomp.c: Silence compiler warning

This may actually be a problem at times.  We need to cast to a boolean.

3 years agoUpdate epigraphs with v5.29.2
Chris 'BinGOs' Williams [Mon, 20 Aug 2018 21:54:54 +0000 (22:54 +0100)]
Update epigraphs with v5.29.2

3 years agoUpdate Module::CoreList for 5.29.3
Chris 'BinGOs' Williams [Mon, 20 Aug 2018 21:42:59 +0000 (22:42 +0100)]
Update Module::CoreList for 5.29.3

3 years agoBump the perl version in various places for 5.29.3
Chris 'BinGOs' Williams [Mon, 20 Aug 2018 21:38:31 +0000 (22:38 +0100)]
Bump the perl version in various places for 5.29.3

3 years agonew perldelta for 5.29.3
Chris 'BinGOs' Williams [Mon, 20 Aug 2018 21:23:53 +0000 (22:23 +0100)]
new perldelta for 5.29.3

3 years agoMerge branch 'release-5.29.2' into blead
Chris 'BinGOs' Williams [Mon, 20 Aug 2018 21:16:25 +0000 (22:16 +0100)]
Merge branch 'release-5.29.2' into blead

3 years agoFix missing space in perlguts C<< >> POD directive
Dagfinn Ilmari Mannsåker [Mon, 20 Aug 2018 19:52:16 +0000 (20:52 +0100)]
Fix missing space in perlguts C<< >> POD directive

3 years agoadd new release to perlhist v5.29.2
Chris 'BinGOs' Williams [Mon, 20 Aug 2018 19:11:35 +0000 (20:11 +0100)]
add new release to perlhist

3 years agoUpdate Module-CoreList for v5.29.2
Chris 'BinGOs' Williams [Mon, 20 Aug 2018 19:06:57 +0000 (20:06 +0100)]
Update Module-CoreList for v5.29.2

3 years agoFinalise perldelta
Chris 'BinGOs' Williams [Mon, 20 Aug 2018 19:01:06 +0000 (20:01 +0100)]
Finalise perldelta

3 years agoMake sv_setsv_flags accept an inversion list src
Karl Williamson [Wed, 15 Aug 2018 21:22:03 +0000 (15:22 -0600)]
Make sv_setsv_flags accept an inversion list src

Inversion lists are a type of SV, but aren't really convertible to other
types, nor has there been a need to.  But it makes things more
convenient for a future commit to allow one to just clobber whatever is
in an SV and replace it with an inversion list.

Even after this commit, there are restrictions to what the SV can have
that gets clobbered.  But this is a step towards more generality

3 years agoAllow invlist_clone to accept a destination SV
Karl Williamson [Wed, 15 Aug 2018 21:14:53 +0000 (15:14 -0600)]
Allow invlist_clone to accept a destination SV

This will allow it to clone into an existing SV instead of always
creating a new one.

3 years agoMake static function non-static
Karl Williamson [Wed, 15 Aug 2018 21:07:20 +0000 (15:07 -0600)]
Make static function non-static

This is in preparation for it to be called from outside this file

3 years agoregcomp.c: Add second parameter to static function
Karl Williamson [Wed, 15 Aug 2018 20:32:31 +0000 (14:32 -0600)]
regcomp.c: Add second parameter to static function

This parameter can only be NULL until a future commit

3 years agoregcomp.c: Extract code into separate function
Karl Williamson [Wed, 15 Aug 2018 20:02:57 +0000 (14:02 -0600)]
regcomp.c: Extract code into separate function

This is in preparation for it to be called from a second place

3 years agoregcomp.c: Replace code with fcn that does the same thing
Karl Williamson [Wed, 15 Aug 2018 19:49:55 +0000 (13:49 -0600)]
regcomp.c: Replace code with fcn that does the same thing

This makes one less place that has to know certain details.  Since the
function is inline, there should be no change in the compiled code

3 years agoutf8.h: Update outmoded comment
Karl Williamson [Mon, 20 Aug 2018 04:36:32 +0000 (22:36 -0600)]
utf8.h: Update outmoded comment

3 years agoutf8.c: Rename macro and move to utf8.h, and use it in regcomp.c
Karl Williamson [Mon, 20 Aug 2018 04:35:29 +0000 (22:35 -0600)]
utf8.c: Rename macro and move to utf8.h, and use it in regcomp.c

This hides an internal detail

3 years agoinvlist_inline.h: Two symbols no longer needed in utf8.c
Karl Williamson [Mon, 20 Aug 2018 04:05:04 +0000 (22:05 -0600)]
invlist_inline.h: Two symbols no longer needed in utf8.c

This is because the code using them has been moved to regcomp.c
in cef721997e14497f2fbc4be17ab736ad7ddfda29

3 years agoAdd inline function to hide implementation details
Karl Williamson [Mon, 20 Aug 2018 04:01:09 +0000 (22:01 -0600)]
Add inline function to hide implementation details

3 years agot/re/regexp_unicode_prop.t: Add tests for run-time
Karl Williamson [Mon, 6 Aug 2018 23:12:08 +0000 (17:12 -0600)]
t/re/regexp_unicode_prop.t: Add tests for run-time

User-defined \p{} properties can be referred to in a regex pattern
compilation before their definition is encountered.  This is supposed to
work, and their definitions get compiled when needed at run-time.  But
there was only one test that this worked.  This commit restructures
things so that every user-defined property is compiled into a pattern
before its definition is known, and also into another pattern after its
definition is known.

This removes the need to special case the earlier single one that did
this test.

3 years agot/re/regexp_unicode_prop.t: Reorder a few tests
Karl Williamson [Mon, 6 Aug 2018 22:57:20 +0000 (16:57 -0600)]
t/re/regexp_unicode_prop.t: Reorder a few tests

This is based on knowledge of how the code works, to stress it a little
more.

3 years agot/re/regexp_unicode_prop.t: Avoid a TEST crash if failure
Karl Williamson [Mon, 6 Aug 2018 22:53:23 +0000 (16:53 -0600)]
t/re/regexp_unicode_prop.t: Avoid a TEST crash if failure

This changes the logic to not do a 'like' unless we know that the
operand is a valid pattern.

3 years agot/re/regexp_unicode_prop.t: Add check no warnings generated
Karl Williamson [Mon, 6 Aug 2018 22:47:59 +0000 (16:47 -0600)]
t/re/regexp_unicode_prop.t: Add check no warnings generated

3 years agot/re/regexp_unicode_prop.t: Extract code into a function
Karl Williamson [Mon, 6 Aug 2018 22:46:37 +0000 (16:46 -0600)]
t/re/regexp_unicode_prop.t: Extract code into a function

This is in preparation for it to be called from a 2nd place

3 years agot/re/regexp_unicode_prop.t: White-space only
Karl Williamson [Mon, 6 Aug 2018 22:37:32 +0000 (16:37 -0600)]
t/re/regexp_unicode_prop.t: White-space only

Indent some lines that a future commit will surround with a block,
and outdent others where a block will be removed

3 years agoregcomp.c: Use isFOO_A instead of isFOO
Karl Williamson [Tue, 31 Jul 2018 04:11:52 +0000 (22:11 -0600)]
regcomp.c: Use isFOO_A instead of isFOO

They evaluate to the same thing, but this change emphasizes that only
ASCII characters can pass.

3 years agoregcomp.c: Change parameter name
Karl Williamson [Tue, 31 Jul 2018 03:26:32 +0000 (21:26 -0600)]
regcomp.c: Change parameter name

This makes it clearer what variable this length is for

3 years agoinline.h: Use 'do {} while' instead of 'while {}'
Karl Williamson [Mon, 9 Jul 2018 21:59:16 +0000 (15:59 -0600)]
inline.h: Use 'do {} while' instead of 'while {}'

3 years agot/re/regexp_unicode_prop.t: Make sure returns true
Karl Williamson [Wed, 15 Aug 2018 19:55:43 +0000 (13:55 -0600)]
t/re/regexp_unicode_prop.t: Make sure returns true

3 years agoHandle 3 digit exponents in \p{nv=%e}
Karl Williamson [Wed, 15 Aug 2018 22:33:58 +0000 (16:33 -0600)]
Handle 3 digit exponents in \p{nv=%e}

Prior to this commit, Windows machines which format %e to have a minimum
of 3 digits would fail in looking up the Numeric value properties, and
would revert to the old swash method of doing it.

3 years agomktables: Handle platforms with 3 digit exponents
Karl Williamson [Wed, 15 Aug 2018 21:18:06 +0000 (15:18 -0600)]
mktables: Handle platforms with 3 digit exponents

C99 says there shouldn't be more than 2 digits in an exponent unless
needed.  But Windows uses three.  This messes some stuff up that is
expecting two.  Change to remove leading zeros so that only two digits
are used.  This allows mktables to properly operate on Windows.

3 years agoUpdate Time-Piece to CPAN version 1.33
Chris 'BinGOs' Williams [Mon, 20 Aug 2018 10:15:20 +0000 (11:15 +0100)]
Update Time-Piece to CPAN version 1.33

  [DELTA]

1.33    2018-08-18
        - Allow objects in overloaded methods

3 years agoperldelta for 56191551147fe888e34f15ef84f08013f4fbb5aa
James E Keenan [Sat, 18 Aug 2018 00:19:49 +0000 (20:19 -0400)]
perldelta for 56191551147fe888e34f15ef84f08013f4fbb5aa

3 years agoSynch with CPAN Test-Simple 1.302140.
Chad Granum [Sat, 18 Aug 2018 00:02:40 +0000 (20:02 -0400)]
Synch with CPAN Test-Simple 1.302140.

Addressing RT 133382.

3 years agoperlre: Add some clarifying script run documentation
Karl Williamson [Thu, 16 Aug 2018 22:48:05 +0000 (16:48 -0600)]
perlre: Add some clarifying script run documentation

3 years agoperlre, perlrecharclass: Add examples
Karl Williamson [Thu, 16 Aug 2018 22:27:52 +0000 (16:27 -0600)]
perlre, perlrecharclass: Add examples

This adds more concrete cases of how mixed script digits can be
hazardous.

3 years agoFix script run bug '1' followed by Thai digit
Karl Williamson [Thu, 16 Aug 2018 22:14:01 +0000 (16:14 -0600)]
Fix script run bug '1' followed by Thai digit

This does not have a ticket, but was pointed out in
http://nntp.perl.org/group/perl.perl5.porters/251870

The logic for deciding if it was needed to check if a character is a
digit was flawed.

3 years agoregexec.c: Use a macro for clarity
Karl Williamson [Thu, 16 Aug 2018 21:08:27 +0000 (15:08 -0600)]
regexec.c: Use a macro for clarity

This commit #defines a macro and uses it, which makes the code easier to
understand.

3 years agoregexec.c: Fix UNLIKELY() scope
Karl Williamson [Thu, 16 Aug 2018 20:54:23 +0000 (14:54 -0600)]
regexec.c: Fix UNLIKELY() scope

The expression as a whole is unlikely to be true, not just the portion
that was marked so.

3 years agoReleaser for 5.29.2
Sawyer X [Sat, 11 Aug 2018 19:24:51 +0000 (22:24 +0300)]
Releaser for 5.29.2

3 years agoPATCH: [perl #41202] text->float gives wrong answer
sisyphus [Wed, 1 Aug 2018 12:33:38 +0000 (22:33 +1000)]
PATCH: [perl #41202] text->float gives wrong answer

This changes to use Perl_strtod() when available, and that turns out to
be the key to fixing this bug.

S_mulexp10() is removed from embed.fnc to avoid repeating the
complicated prerequisites for defining Perl_strtod().  This works
because this static function already was defined before use in
numeric.c, and always called in full form without using a macro.

James Keenan fixed a file permissions problem originally introduced by
this commit, but the fix has been squashed into it.

3 years agoperl.h - mingw-w64 builds use __mingw_strtold instead of strtold
sisyphus [Wed, 1 Aug 2018 12:32:00 +0000 (22:32 +1000)]
perl.h - mingw-w64 builds use __mingw_strtold instead of strtold

There are bugs in strtold().

James Keenan fixed a file permissions problem originally introduced by
this commit, but the fix has been squashed into it.

3 years agolib/locale.t - no longer special case quadmath builds
sisyphus [Wed, 1 Aug 2018 12:29:57 +0000 (22:29 +1000)]
lib/locale.t - no longer special case quadmath builds

The previous commit now has these respect locale

3 years agonumeric.c: Move some code around
Karl Williamson [Wed, 8 Aug 2018 17:23:31 +0000 (11:23 -0600)]
numeric.c: Move some code around

For readability, this changes

if (f00) {  MANY LINES } else { FEW LINES }

to

if (! f00) { FEW LINES } else { MANY LINES }

3 years agonumeric.c: White-space only
Karl Williamson [Wed, 8 Aug 2018 17:22:09 +0000 (11:22 -0600)]
numeric.c: White-space only

Remove trailing blanks, add a few blank lines

3 years agonumeric.c: Quadmath now honors LC_numeric
Karl Williamson [Wed, 8 Aug 2018 17:20:01 +0000 (11:20 -0600)]
numeric.c: Quadmath now honors LC_numeric

Previously the code compiled under quadmath did not bother to check for
locale.  Fixing this was a simple matter of a little rearrangement.

3 years ago(perl #133422) handle Off_t smaller than size_t
Tony Cook [Wed, 8 Aug 2018 04:21:33 +0000 (14:21 +1000)]
(perl #133422) handle Off_t smaller than size_t

3 years agotime::HiRes: don't truncate nanosec utime
David Mitchell [Fri, 27 Apr 2018 11:43:44 +0000 (12:43 +0100)]
time::HiRes: don't truncate nanosec utime

When passed a floating point atime/mtime value, T::HR::utime()
was converting it into two longs: secs and nsec. But the nanosec value
was calculated using a final NV to long cast, which truncates any
fractional part rather than rounding to nearest. Use a 0.5 addition to
force rounding.

This was manifesting as a test in lib/File/Copy.t failing to preserve
the same mtime after a couple of round trips with utime() and stat().

In particular, the test was attempting to set an mtime to the literal
floating-point value

    1000000000.12345

This value can't be represented exactly as an NV, so was actually
(under -Dquadmath)

1000000000.1234499999999999999999999568211720247320

which was (using truncation) being converted into the two sec/nsec
longs:

    1000000000123449999

After this commit, it instead correctly gets converted to

    1000000000123450000

3 years agoUpgrade HTTP::Tiny from version 0.070 to 0.076
Steve Hay [Wed, 8 Aug 2018 13:04:52 +0000 (14:04 +0100)]
Upgrade HTTP::Tiny from version 0.070 to 0.076

3 years agoUpgrade Filter::Util::Call from version 1.58 to 1.59
Steve Hay [Wed, 8 Aug 2018 13:02:38 +0000 (14:02 +0100)]
Upgrade Filter::Util::Call from version 1.58 to 1.59

3 years agoPA-RISC is obsolted
H.Merijn Brand [Wed, 8 Aug 2018 13:58:07 +0000 (15:58 +0200)]
PA-RISC is obsolted

Itanium in not "new". It is newer than PA-RISC though, and PA-RISC is
getting rarer

3 years agoUpdate HP-UX readme
H.Merijn Brand [Wed, 8 Aug 2018 12:51:25 +0000 (14:51 +0200)]
Update HP-UX readme

• Porting center released 5.28.0 :)
• EOL matrix link was dead

3 years agoTime-HiRes/t/itimer.t: avoid race condition.
David Mitchell [Tue, 7 Aug 2018 11:26:31 +0000 (12:26 +0100)]
Time-HiRes/t/itimer.t: avoid race condition.

This test script sets a repeating interval timer going, and after 4
'ticks' (SIGVTALRM), disables the timer (by setting it to zero).

The main loop which does CPU burning, does a getitmer() every now and
again, and when the value is zero, assumes the signal handler has
disabled the timer,  and so finishes.

The trouble was that it was checking the 'time left', which can reach
zero because the interval timer has counted down to zero, and the signal
handler is about to be called, but the interval hasn't been reset back
to 0.4s yet.

i.e. the code doesn't distinguish between "timer disabled" and "timer
just reached zero".

In that scenario, the cleanup code in the test script disables the
SIGVTALRM handler while the timer is still active, and so the process
gets killed if another signal is raised.

This commit changes the test to check the second value returned by
getitmer() for being zero rather than the first - the second being the
repeat interval, whichb is always 0.4 until the timer is disabled.

3 years agodump.c: Fix space before tabs
Karl Williamson [Mon, 6 Aug 2018 15:58:46 +0000 (09:58 -0600)]
dump.c: Fix space before tabs

These generate git warnings

3 years agoUse sv_catpvs where appropriate vs sv_catpv
Karl Williamson [Sun, 5 Aug 2018 12:41:05 +0000 (06:41 -0600)]
Use sv_catpvs where appropriate vs sv_catpv

This moves calculations definitely to compile time; some optimizing
compilers may already do this, but some may not.

3 years agoperlapi: Fix up pod for utf8n_to_uvchr_error()
Karl Williamson [Sat, 4 Aug 2018 19:19:58 +0000 (13:19 -0600)]
perlapi: Fix up pod for utf8n_to_uvchr_error()

There are two return flags signalling that the input UTF-8 was malformed
by being too short.  This commit adds detail comparing and contrasting
the meanings of the two

3 years agoperlapi: Fix up SV handling pod
Karl Williamson [Sat, 4 Aug 2018 19:15:58 +0000 (13:15 -0600)]
perlapi: Fix up SV handling pod

The pod for this has gotten screwed up over the releases, with a section
entitled SV-Body Allocation containing a bunch of SV manipulation
functions, and another section with that name containing still more with
no real rhyme or reason as to why one would be in one vs the other.  And
one function was in both places.  This commit consolidates all these
into one section entitled "SV Manipulation Functions"

3 years agoperlapi: Clarify sv_insert()
Karl Williamson [Sat, 4 Aug 2018 19:13:32 +0000 (13:13 -0600)]
perlapi: Clarify sv_insert()

3 years agoregcomp.c: Add comments
Karl Williamson [Sat, 4 Aug 2018 19:11:52 +0000 (13:11 -0600)]
regcomp.c: Add comments

3 years agoperlunicode: Clarifiy user-defined props
Karl Williamson [Sat, 4 Aug 2018 19:09:43 +0000 (13:09 -0600)]
perlunicode: Clarifiy user-defined props

3 years agoperl.h: Use TAINT_get, instead of PL_tainting.
Karl Williamson [Fri, 3 Aug 2018 19:27:47 +0000 (13:27 -0600)]
perl.h: Use TAINT_get, instead of PL_tainting.

The former is designed to be compilable out.

3 years agoperl.c: Use TAINT_get, instead of PL_tainting.
Karl Williamson [Fri, 3 Aug 2018 19:25:57 +0000 (13:25 -0600)]
perl.c: Use TAINT_get, instead of PL_tainting.

The former is designed to be compilable out.

3 years agoThe HP-UX optimizer fails again (on Itanium only this time)
H.Merijn Brand [Sun, 5 Aug 2018 07:56:10 +0000 (09:56 +0200)]
The HP-UX optimizer fails again (on Itanium only this time)

3 years agomathoms.c: Use my_strnlen, not strnlen
Karl Williamson [Sat, 4 Aug 2018 14:28:51 +0000 (08:28 -0600)]
mathoms.c: Use my_strnlen, not strnlen

Spotted by H. Merijn Brand.

3 years agoMake utf8_to_uvchr() slightly safer
Karl Williamson [Tue, 31 Jul 2018 03:41:44 +0000 (21:41 -0600)]
Make utf8_to_uvchr() slightly safer

Recent commit aa3c16bd709ef9b9c8c785af48f368e08f70c74b made this
function safe if the input is a NUL-terminated string.  But if not, it
can read past the end of the buffer.  It used as a limit the maximum
length a UTF-8 code point can be.  But most code points in real-world
use aren't nearly that long, and we know how long that can be by looking
at the first byte.  Therefore, use the length determined by the first
byte as the limit instead of the maximum possible.

3 years agoRevise kludge for [perl #133136]
Karl Williamson [Wed, 25 Jul 2018 21:00:15 +0000 (15:00 -0600)]
Revise kludge for [perl #133136]

Lexical::SealRequireHints has a test that is looking for internal Perl
behavior that has changed, and the maintainer has been unresponsive.
Since this test is high in the cpan river, in order to get 5.28
released, a kludge was added that used the old behavior.  But that old
behavior is about to be completely removed, so this does a different
kludge that loads utf8.pm, and that is what the .t is actually
expecting.  This leaves us free to remove the behavior without affecting
the module.

3 years agomathoms.c: Make safer a deprecated function
Karl Williamson [Wed, 25 Jul 2018 03:41:41 +0000 (21:41 -0600)]
mathoms.c: Make safer a deprecated function

This function is deprecated because it is lacking a length parameter, so
malformed UTF-8 may cause it to read beyond the buffer.  This commit
causes it to not read beyond a NUL character, which makes it safe for
the common case that the input is a C string.

3 years agoutf8.c: Make safer some deprecated functions
Karl Williamson [Wed, 25 Jul 2018 03:28:42 +0000 (21:28 -0600)]
utf8.c: Make safer some deprecated functions

This function is a common function, only called from various deprecated
functions, but they may be moved to ppport.h.  They are lacking a length
parameter, so malformed UTF-8 may cause them to read beyond the buffer.
This commit causes this common function to not read beyond a NUL
character, which makes all its callers safe for the common case that
the input is a NUL-terminated C string.

3 years agoutf8.c: Avoid some unnecessary work
Karl Williamson [Wed, 25 Jul 2018 01:52:25 +0000 (19:52 -0600)]
utf8.c: Avoid some unnecessary work

The code changed by this commit used to check that the input was valid
UTF-8, and if so, calculated the code point, using a fast function
that doesn't do any error checking.

However, the changes earlier in 5.29 make the time spent in checking for
validity hardly less than the time spent in calculating the code point
at the same time.  So this commit switches to calculating the code point
from the start, avoiding a second pass through the byte string.

3 years agoutf8.c: Remove unused parameters
Karl Williamson [Wed, 25 Jul 2018 01:43:19 +0000 (19:43 -0600)]
utf8.c: Remove unused parameters

These functions used to have swashes, but now all have inversion lists
instead, so we can get rid of the code that handled their swashes.

3 years agoutf8.c: Remove common code
Karl Williamson [Tue, 24 Jul 2018 23:25:13 +0000 (17:25 -0600)]
utf8.c: Remove common code

Call another function that incorporates the same code that is removed by
this commit.

3 years agomktables: Some tests are invalid
Karl Williamson [Wed, 25 Jul 2018 02:12:24 +0000 (20:12 -0600)]
mktables: Some tests are invalid

These tests have been wrongly passing.  A future commit will change
that.

3 years agoutf8.c: Make safer a deprecated function
Karl Williamson [Tue, 24 Jul 2018 23:20:08 +0000 (17:20 -0600)]
utf8.c: Make safer a deprecated function

This function is only called from deprecated functions, but they may be
moved to ppport.h.  It is lacking a length parameter, so malformed UTF-8
may cause it to read beyond the buffer.  This commit causes it to not
read beyond a NUL character, which makes it safe for the common case
that the input is a C string.

3 years agoutf8.c: Make unused parameter signal its status
Karl Williamson [Wed, 25 Jul 2018 01:35:55 +0000 (19:35 -0600)]
utf8.c: Make unused parameter signal its status

Change the string in this string parameter to indicate it is unused,
like the similar calls nearby.

3 years agoInitialize some inversion lists at start-up.
Karl Williamson [Wed, 25 Jul 2018 01:16:46 +0000 (19:16 -0600)]
Initialize some inversion lists at start-up.

The time it takes for these is trivial, since they are using compiled-in
Unicode values.

3 years agoinline.h: Init a variable to silence stupid compilers
Karl Williamson [Fri, 3 Aug 2018 04:48:55 +0000 (22:48 -0600)]
inline.h: Init a variable to silence stupid compilers

In looking at smokes, I noticed some compilers wrongly warn that this
variable is used uninitialize.  It's easiest to humor them.

3 years agoAvoid extra newlines on VMS in t/opbasic/arith.t
Craig A. Berry [Thu, 2 Aug 2018 22:30:21 +0000 (17:30 -0500)]
Avoid extra newlines on VMS in t/opbasic/arith.t

Separate print statements through a pipe with autoflush on cause
extra newlines due a bug in the VMS pipe implementation, and were
causing this test to fail with an "unexpected output" message. So
consolidate into a single print statement.

3 years agoAvoid extra newlines on VMS in t/op/local.t.
Craig A. Berry [Thu, 2 Aug 2018 22:23:50 +0000 (17:23 -0500)]
Avoid extra newlines on VMS in t/op/local.t.

Separate print statements through a pipe with autoflush on cause
extra newlines due a bug in the VMS pipe implementation, and were
causing this test to fail with an "unexpected output" message. So
consolidate into a single print statement.

3 years agoMove Unicode \p{} definitions to regcomp.c
Karl Williamson [Mon, 30 Jul 2018 22:00:25 +0000 (16:00 -0600)]
Move Unicode \p{} definitions to regcomp.c

These are only used in compiling patterns.  They previously were placed
in utf8.c because they are large, and there is a copy of regcomp.c in
ext/re, so they would have use twice the space.

This commit changes things so that they only are used and defined in
regcomp.c, (not re_comp.c) so that duplication does not occur.  They are
accessed only from one function, and that is also moved from utf8.c to
regcomp.c, only compiled in regcomp.c, and referred to as an external by
re_comp.c

I had to change the names of the table.  Previously they started with
'PL_' in case any got exposed, but globvar.t mindlessly assumes that any
such variables in the file regcomp.c are globals, and wrongly complains.
It was easier to just change the prefix to 'UNI_' instead.

A few tables are used in regexec.c, and are duplicated in re_exec.c.
Things could be adjusted so that only one copy is used.  I tried this,
but the tables are far more intertwined in regexec.c functions than
the ones changed in this commit, as only a single function accesses
these.  Thus doing this would be a lot harder, and the payback isn't all
that much.  I started work to make them EXTCONSTs, and then discovered
the intertwining, but left in that work, unused.

3 years agoext/POSIX/t/posix.t - Fix 'strtold works' test
sisyphus [Thu, 2 Aug 2018 07:59:50 +0000 (17:59 +1000)]
ext/POSIX/t/posix.t - Fix 'strtold works' test

3 years agot/run/locale.t - Add missing SKIP:{} block
sisyphus [Thu, 2 Aug 2018 07:55:44 +0000 (17:55 +1000)]
t/run/locale.t - Add missing SKIP:{} block

3 years agoConfigure: redirect try.c errors to /dev/null
Karl Williamson [Tue, 31 Jul 2018 04:00:13 +0000 (22:00 -0600)]
Configure: redirect try.c errors to /dev/null

3 years agoperldelta for 028f02e7e97a, 3d5e9c119db6 and bbc9927bf24e
Tony Cook [Wed, 1 Aug 2018 06:54:02 +0000 (16:54 +1000)]
perldelta for 028f02e7e97a3d5e9c119db6 and bbc9927bf24e

3 years agowin32: fix argumentless sleep()
Tomasz Konojacki [Sun, 15 Jul 2018 00:33:16 +0000 (02:33 +0200)]
win32: fix argumentless sleep()

Before this commit, pause() was implemented as a macro calling
win32_sleep((32767L << 16) + 32767), which was causing the following
problems with argumentless sleep():

- it was sleeping for 4262198 seconds (~50 days) instead of forever
- it was triggering "sleep(2147450879) too large" warning

This commit implements pause() as a proper function which calls
win32_msgwait() with an INFINITE timeout.

[perl #133376]

3 years ago(perl #133314) always close the directory handle on clean up
Tony Cook [Mon, 2 Jul 2018 00:43:19 +0000 (10:43 +1000)]
(perl #133314) always close the directory handle on clean up

Previously the directory handle was only closed if the rest of the
magic free clean up is done, but in most success cases that code
doesn't run, leaking the directory handle.

So always close the directory if our AV is available.

3 years ago(perl #133314) test for handle leaks from in-place editing
Tony Cook [Wed, 1 Aug 2018 01:55:22 +0000 (11:55 +1000)]
(perl #133314) test for handle leaks from in-place editing

3 years agobump $Storable::VERSION
Tony Cook [Tue, 31 Jul 2018 00:29:37 +0000 (10:29 +1000)]
bump $Storable::VERSION

since I made a substansive change to stacklimit