t/op/crypt.t: Perform SHA-256 algorithm if default one is disabled

The crypt(3) call may return NULL. This is the case on FIPS-enabled
platforms. Then "salt makes a difference" test would fail.

This fixes RT#121591.

Signed-off-by: Petr Písař <ppisar@redhat.com>

perldelta for 2c2d7daa9519, a6d695237c4c

[perl #122445] use magic on $DB::single etc to avoid overload issues

This prevents perl recursing infinitely when an overloaded object is
assigned to $DB::single, $DB::trace or $DB::signal

This is done by referencing their values as IVs instead of as SVs in
dbstate, and by adding magic to those variables so that assignments to
the scalars update the PL_DBcontrol array.

[perl #122445] test for overload assigned to $DB::single

Special test preambles needed for these.

pod_rules.t needs special preamble.

Version bump for e6425454.

Test preamble: explicit @INC, instead of unshift.

Exception: t/run/switchI.t, needs the unshift way.

Test preamble: if requiring ./test.pl, needs chdir.

Exception: t/op/chdir, which does things its own way, for obvious reasons.

Test preamble: unify to dot slash test dot pl

Test preamble: unify chdir 't' if -d 't';

Add various *BSD O_ constants.

Tru64: the socket API defines must come early.

There seems to be no way around needing to select the socket API early.

attrs.t: Test that attr handlers can see prototypes

perldelta for ff5314c5aa54

fix attributes memcmp without len<6 (asan catch)

Tru64: does have sa_len.

Tru64: _SOCKADDR_LEN is good.

Declare it as early as possible.  The earlier position lead into
getting a mix of different APIs with mismatching sockadddrs.

t/io/eintr.t: Make this pass on my ppc64 box

See the "Test failures in blead on ppc64" thread on perl5-porters for
details. I'd fail on the previous value, this passes every time.

Tru64: the cluster filesystem is special.

(It has non-POSIX interfaces and semantics which probably should
 be left outside e.g. Cwd::realpath()).

Tru64: Document "read_cur_obj_info: bad file magic number" error.

Skip the test if in linux but not in x86*.

The state of things found by Ævar in ppc linux was even weirder:
most -- but not all! -- text symbols were in D section, not in T.

Skipping is fine since we are here after best-effort testing,
failing softly is quite acceptable.

The double-double precision can be really large.

I don't know where I had pulled the earlier smaller limit,
but sisyphus@ set me right.

Fix EBCDIC-only bug with /[...]/

Perl has special handling with ranges in bracketed character classes
when the end points are either both uppercase or both lowercase.  This
used a different test which is incorrect.  The consequences were that a
some Latin1 ranges would be rendered as empty.

regcomp.c: Fix EBCDIC-only memory leak

regcomp.c: Fix typo in comment

Document special EBCDIC [...] literal range handling

\N{...} now treated as literal for EBCDIC qr/[...]/

Perl specially handles some ranges in bracketed character classes to
deal with gaps between, for example, "i" and "j".  The next commit will
better document this.  This special handling is only invoked when both
ends of the range are literals.  This commit extends that so that a
\N{...} construct is considered a literal for this purpose.

There really shouldn't be any difference in the handling of "A" vs
"\N{LATIN CAPITAL LETTER A}".  And this commit makes them be handled the
same.

It further makes \N{U+0041} be treated the same.  The programmer here is
effectively saying "A", and invoking the Unicode definition for it, so
it stands to reason that the range s/he wants should also be interpreted
the Unicode way.

re/pat.t: Add some EBCDIC tests

These test the special handling of ranges in bracketed character classes
where the endpoints are alphanumeric literals, but there is a code point
gap in the range that would otherwise match but shouldn't.

toke.c: Extract into a named string constant

This moves a literal double-quoted string into a const variable, so that
it only need be written out once, and its  size can be compiler-computed
and used as another const variable.  Hence, mnemonics are used instead
of bare numbers.

toke.c: Update, clarify comments, fix some indents

reg_mesg.t: Add comments; remove trailing white-space

perlapi: Clarify two entries

improve and reword README.win32

fix op/infnan.t failures on VC 6

fixes 2 failures, first is a fatal error, sceond is a not ok
-----
ok 460 - abs(NaN) is NaN
ok 461 - int(NaN) is NaN
Can't take sqrt of NaN at op/infnan.t line 319.
C:\perl521\srcvc6\t>
-----
ok 465 - sin(NaN) is NaN
not ok 466 - rand(NaN) is NaN
# Failed test 466 - rand(NaN) is NaN at op/infnan.t line 331
#      got "0.20653527722801"
# expected "NaN"
ok 467 - sin(9**9**9) is NaN
-----

Mollify concise-xs.t

Deparse foreach state $x

B::Deparse was emitting ‘foreach my’ instead of ‘foreach state’.

This example prints 1:

use feature ':all'; no warnings experimental;
sub f {
  my sub foo;
  foo(), return if @_;
  for state $x (1) {
    f(1);
    sub foo { print $x, "\n" }
  }
}
f()

If you change ‘state’ to ‘my’, it prints nothing.

So there is a difference between ‘for my’ and ‘for state’.  (At first
I thought there might not be.)

Deparse.t: Delete a test

It was identical to one 3 tests earlier.

op_reg_common.h: Nits

Add missing U suffix to unsigned numeric constant; parenthesize macro
expansions for safety.

Finish deparsing ‘my sub if; CORE::if...’

Commit 3188a8216 took care of the majority of cases making mostly gen-
eral changes.

This commit finishes up all the weird keywords that need spe-
cial handling.

podcheck.

The double-double mantissa precision ... it's complicated.

AIX/longdouble: switch the default to allow it.

Since the only really unfixable part is the inf/nan support.

Document the troublesomeness in README.aix.

Delete obsolete comment fragment.

Use the double-double size only if using long double.

... and only for the buffer size, not for the extraction.

The leading underscore is optional in Darwin.

Bail out if there seem to be no text symbols.

Found by Ævar in an IBM pSeries POWER7 Fedora Linux box.
All the text symbols (code) seemed to be 'D' (data).

There might be something further to fix regarding the use of 'nm'
(or maybe 'ar'?) in this particular box, but this change makes
the test more robust against surprising nm results.

Deparse sub calls quietly

In commit a958cfbb8 I used eval{prototype "CORE::..."} to see whether
something is a keyword, not realising that we have a __DIE__ hand-
ler that squeaks every time.  It is only installed when Deparse is
invoked via -MO.

Localising $SIG{__DIE__} does the trick.  Localising $@ as well is a
good idea when using eval, though I haven’t checked whether that was
causing problems.

[perl #122911] regexp.h: Rmv VOL from op_comp sig

It is no longer needed as of 1067df30ae9.

silence some compiler warnings on VC6

sv.c and toke.c have the following warnings on VC6 but not VC 2003
(and probably newer too), example
..\toke.c(3149) : warning C4761: integral size mismatch in argument;
conversion supplied

find_default_stash (commit 90aeefb473 )& gv_magicalize (commit 71c35c050e )
..\gv.c(1680) : warning C4028: formal parameter 6 different from declaration
..\gv.c(1783) : warning C4028: formal parameter 6 different from declaration

not all VC6 compiler warnings are fixed by this patch

Deparse with CORE:: to avoid lex sub conflicts

If a lexical sub with the same name as a keyword is in scope, we need
to deparse the keyword with a CORE:: prefix.

This commit handles most of the cases, but there are a few exceptional
cases remaining.

Deparse-core.t: Fix ineffective tests

In a958cfbb8, I accidentally changed this to test ‘test::foo()’,
rather than ‘foo()’ deparsing as ‘test::foo()’, which was what I
had intended.

Correct ‘"my" variable "&f::b"...’ message

"my" variable &foo::bar can't be in a package at - line 2, near "my sub foo::bar"

It should say ‘subroutine’, not ‘variable’.  When I implemented lexi-
cal subs, I thought I caught all these, must I missed this one.

toke.c: Add comment for greppability

Reorder t/lib/croak/toke

to put string terminator errors all in one place.

Make B::Deparse qualify sub calls named after keywords

While B::Deparse was correctly applying CORE:: as necessary to dis-
ambiguate between keywords and custom subroutines, it was not doing
likewise for subroutines whose names were keywords.  main::foo()
should be deparsed as main::foo() if ‘foo’ is a keyword.

[perl #122771] Fix assertion failure with -d and sort

-d was conflicting with sort optimisations added by 932bca295d, which
had assertions that checked for nextstate, but not dbstate ops.

Remove __SUB__ from Deparse-core.t exception list

This list is for keywords exempt from the checks that make sure all
keywords have been tested.  __SUB__ *is* tested, so it does not
belong here.

Simplify OP_LEAVESUBLV logic in op.c:op_lvalue

If the lvalue type was OP_LEAVESUBLV, then the code for handling
entersub ops would go through extra checking to see whether we
have an lvalue sub available at compile time, before falling
through to the croaking code.  But the croaking code does not croak
if the type is OP_LEAVESUBLV, so the extra checks were for nothing.
We can skip those checks here just as we do for OP_GREPSTART,
OP_ENTERSUB and OP_REFGEN lvalue types.

op.c:op_lvalue: Remove redundent case OP_RETURN

The default case does nothing if the type is OP_LEAVESUBLV.  This has
been so since 145b2bbb3.

Deparse inverted for(;;) cond more correctly

22584011 did not take the looks-like-a-function rule into account.

not ($1 || 2) ** 2 means (not ($1 || 2)) ** 2.

Deparse.t: Another to-do test for lex subs

Consistent spaces after dots in perlfunc

clarify use VERSION docs

Anything that C<use VERSION> adds, another C<use VERSION> may take away.
Explicitly doing the C<use strict> and/or C<use feature> means that
C<use VERSION> will not change them. C<use VERSION> will only change
the defaults, or things done by C<use VERSION>.

silence compiler warnings in utf8_mg_pos_cache_update

commit 73ecc8cb69 added warnings on VC2003, silence them
..\sv.c(7556) : warning C4244: '=' : conversion from 'STRLEN' to 'float', possible loss of data
..\sv.c(7557) : warning C4244: '=' : conversion from 'const STRLEN' to 'float', possible loss of data
..\sv.c(7560) : warning C4244: '=' : conversion from 'const STRLEN' to 'float', possible loss of data
..\sv.c(7561) : warning C4244: '=' : conversion from 'STRLEN' to 'float', possible loss of data

optimize SV creation funcs in sv.c

In Perl_newSV, the sv_upgrade is redundant, except to protect against a
segv in blindly SV body derefing SvGROW (but not in sv_grow). sv_grow has
always upgraded a non-PV SV to PV. So don't it here. Since a new SV will
never have be a COW, have a SvLEN or a body, all of which SvGROW uses,
just call sv_grow. Less branching, and smaller code that way.

In Perl_newSV_type, give a hint to compiler that if a platform's
symbol visibility allows inlining, and newSV_type's arg is the base type
(currently SVt_NULL, maybe SVt_IV in future (see ML)), to possibly inline
new_SV into the caller and remove the sv_upgrade call. Also don't call
sv_upgrade if it isn't needed (SVt_NULL) in the public symbol version.

The redundant sv_upgrade then sv_grow goes to commit 79072805bf
"perl 5.0 alpha 2". VC 2003 -01 32 bit threaded machine code size in bytes
of 2 functions
Perl_newSV_type before 0x2f after 0x29
Perl_newSV  before 0x48 after 0x28

regcomp.c: Compiler warning

Shut up this warning:

regcomp.c:7346:13: warning: format specifies type 'unsigned long' but the
      argument has type 'U32' (aka 'unsigned int') [-Wformat]
            RExC_study_chunk_recursed_count);
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

by casting to auld lang syne—I mean unsigned long.

Fix assertion failure/hang with / (?{(^{})/

When this invalid construct is parsed, the resulting op tree for the
pattern has a code block with no constant item following it, breaking
the assumptions made by pmruntime.

Fixing this was not so easy.

You can’t just adjust the assertions, because the hang that non-debug-
ging builds exhibited is still there.

You can’t just return NULL from pmruntime when encounting the bad op
tree, because the parser will crash on the null pointer.

You can’t just return the empty pmop, because the wrong pad is
active, and other functions in op.c will try to access nonexistent
pad entries.

You can’t just LEAVE_SCOPE and return the pmop, because then PL_parser
will be null in yyerror.  Changing yyerror to account is not suffi-
cient, because then you get double-freed SVs.  At that point I gave up
with that approach.

The easiest solution turned out to be to fake up the op that we were
expecting to see.

XSLoader.t fix-up following 8e6aa27cd01.

The skip count was incorrect as there is only one test, not two.

Also, XSLoader uses forward slashes explicitly, so prepending a
path to what it concocts from the package name must be done in
Unix format regardless of platform.

Add linked mods to known_pod_issues

perl5220delta: Mention mods from #122814

Deparse inverted for(;;) condition correctly

This is wrong:

$ perl -MO=Deparse -e 'for($a;!$b;$c){}'
for ($a; $b; $c) {
    ();
}

-e syntax OK

What happened to the bang?

This was broken in 5.12 by edbe35ea95.

Make OP_METHOD* to be of new class METHOP

Introduce a new opcode class, METHOP, which will hold class/method related
info needed at runtime to improve performance of class/object method
calls, then change OP_METHOD and OP_METHOD_NAMED from being UNOP/SVOP to
being METHOP.

Note that because OP_METHOD is a UNOP with an op_first, while
OP_METHOD_NAMED is an SVOP, the first field of the METHOP structure
is a union holding either op_first or op_sv. This was seen as less messy
than having to introduce two new op classes.

The new op class's character is '.'

Nothing has changed in functionality and/or performance by this commit.
It just introduces new structure which will be extended with extra
fields and used in later commits.

Added METHOP constructors:
- newMETHOP() for method ops with dynamic method names.
  The only optype for this op is OP_METHOD.
- newMETHOP_named() for method ops with constant method names.
  Optypes for this op are: OP_METHOD_NAMED (currently) and (later)
  OP_METHOD_SUPER, OP_METHOD_REDIR, OP_METHOD_NEXT, OP_METHOD_NEXTCAN,
  OP_METHOD_MAYBENEXT

(This commit includes fixups by davem)

Do not rely on the precise error wording

'No such file or directory' is fine on Linux but other UNIXes might
say it differently, for example 'A file or directory in the path name does not exist'.

perldelta for 8e6aa27cd01d, 30837b2a7d75, de937bde1656

[perl #122455] fix XSLoader loading other namespaces

bump $XSLoader::VERSION

Allow XSLoader to load modules from a different namespace

When trying to locate the binary component of a module, use the caller
package to find the library root directory, not the passed in module
name.  Since the file path it is using is always taken from the caller,
using the passed in package prevents it from finding the library root.
If in the package File::Spec::Unix, and given XSLoader::load("Cwd"), the
library root is three levels up from the filename of the
File::Spec::Unix module, not one.

[perl #122455] TODO test for XSLoader mishandling of namespaces

[perl #122657] TODO checking the result of recv() on hurd

Compare recv return value to peername in socket test

Deparse ‘local our’

Deparse was omitting the ‘our’.

Keep concise-xs.t happy

Deparse \(..., (@a), ...) correctly

It is the presence of parentheses immediately around the array (and
possibly local/our/my/+) in refgen context, rather than parentheses
surrounding the argument to \, that causes the array to be flattened.

B::Deparse was deparsing \(@a) correctly, but not \(@a, (@b)), in
which takes a reference to @a and to each of @b’s elements.  It was
omitting the parentheses around @b.

Update comments for OPf_SPECIAL/do

‘do subname’ has been removed, so OPf_SPECIAL no longer applies to
OP_ENTERSUB.

Make list assignment respect foreach aliasing

See ff2a62e0c8 for the explanation.  The bug fix in that commit did
not apply to foreach’s aliasing.

In short, ($a,$b)=($c,$d) needs to account for whether two of those
variable names could be referring to the same variable.

This commit causes the test suite to exercise a code path in scope.c
added by ff2a62e0c8, which turned out to be buggy.  (I forgot to test
it at the time.)

The Module-CoreList on CPAN is now 5.20141002

There's no need to rewrite the Module-CoreList pod now

Make the CAVEAT entry in Module-CoreList pod sane

Update Module-CoreList Changes file for 5.20141002 release

corelist: import v5.18.3 and v5.18.4 data

perlhist: bring in 5.18.3 and 5.18.4 release dates

import latest epigraphs from maint-5.18

Maintainers.pl: Include all Deparse-*.t files in _PERLLIB

Sort MANIFEST properly

Correct and update sv.c’s string copy comments

Thanks to Dave Mitchell for pointing out my mistakes.

Whether the rhs is copy-on-write already does not change whether we
do the long-string-and-left-buffer-size check.  The comments (added in
2ac0bcb35) were wrong.

Also, update the comments for e8c6a474e, which added the
big-buffer-on-the-right skip logic.

[perl #122870] Fix B::Deparse–DDS compatibility

Add tests for overriding <> versus rcatline

New <<>> tests

- Modify test to test also that <<>> with empty (false) lines
- Add a test for <<>> used in a rcatline op

Upstream a patch from pkgsrc for NetBSD hints