platform/upstream/perl.git
14 years agoRegression test for 34394ecd - SVs that were only on the tmps stack leaked.
Nicholas Clark [Tue, 23 Feb 2010 14:23:31 +0000 (14:23 +0000)]
Regression test for 34394ecd - SVs that were only on the tmps stack leaked.

14 years agoSymbol S_no_symref_sv should be static (local to the compilation unit).
Jan Dubois [Tue, 23 Feb 2010 08:54:46 +0000 (00:54 -0800)]
Symbol S_no_symref_sv should be static (local to the compilation unit).

14 years agoTeach bump-perl-version about perl511.dll, perl511.lib and perl511s.lib
Jan Dubois [Tue, 23 Feb 2010 02:27:13 +0000 (18:27 -0800)]
Teach bump-perl-version about perl511.dll, perl511.lib and perl511s.lib

14 years agoUpdate the release managers' guide: don't push the tag too soon!
Steve Hay [Mon, 22 Feb 2010 23:24:59 +0000 (23:24 +0000)]
Update the release managers' guide: don't push the tag too soon!

Remind release managers not to push a new tag until the indexing of
the new uploads has been successful. A problem with indexing 5.11.5
meant that we nearly ended up with 5.11.6 instead, since the 5.11.5
tag had already been pushed.

14 years agofix prose from previous lib/bytes.pm doc update
David Mitchell [Mon, 22 Feb 2010 17:19:43 +0000 (17:19 +0000)]
fix prose from previous lib/bytes.pm doc update

14 years agoBetter explain utf8::upgrade/downgrade/encode/decode
David Mitchell [Mon, 22 Feb 2010 16:44:59 +0000 (16:44 +0000)]
Better explain utf8::upgrade/downgrade/encode/decode

Try to make it clear what each does, and the fact that upgrade/downgrade
don't change the logical string value while encode/decode do.

14 years agodeprecate bytes.pm
David Mitchell [Mon, 22 Feb 2010 15:25:16 +0000 (15:25 +0000)]
deprecate bytes.pm

14 years agoBram pointed out the new tests hang if the fix for #72878 isn't in place.
Abigail [Mon, 22 Feb 2010 14:36:50 +0000 (15:36 +0100)]
Bram pointed out the new tests hang if the fix for #72878 isn't in place.
This commits traps the recursion and throws an exception.

14 years agoAnother minor update to the release managers' guide
Steve Hay [Mon, 22 Feb 2010 12:35:45 +0000 (12:35 +0000)]
Another minor update to the release managers' guide

14 years agoDon't multiply define Perl_regcurly in core and the re extension.
Craig A. Berry [Mon, 22 Feb 2010 04:26:15 +0000 (22:26 -0600)]
Don't multiply define Perl_regcurly in core and the re extension.

Broken in ff3f963aa0f95ea53996b6a3842b824504b57c79.

14 years agostop skipping ext/Fcntl/t/syslfs.t
David Mitchell [Sat, 20 Feb 2010 21:01:11 +0000 (21:01 +0000)]
stop skipping ext/Fcntl/t/syslfs.t

Since the module reorganisation and now that tests run cd'ed to
ext/Fcntl, expecting to run ../perl no longer works.
Also, for the benefit of future generations, make the inability
to find perl a failure rather than a skip, with a more relevant error
message.

14 years agostop cpan/Memoize/t/tie_ndbm.t being skipped
David Mitchell [Sat, 20 Feb 2010 20:03:54 +0000 (20:03 +0000)]
stop cpan/Memoize/t/tie_ndbm.t being skipped

Back in 2006, 0b40f9f8cf631862db10aed9706454c7518fef19 added a skip check
for $ENV{TMP} being writeable. This test failed if $TMP wasn't set, but
also, since then this test script has been updated to write its temp files
to the current dir rather than /tmp, so the TMP check is redundant, and is
now removed.

14 years agostop op/groups.t skipping on Linux
David Mitchell [Sat, 20 Feb 2010 19:34:05 +0000 (19:34 +0000)]
stop op/groups.t skipping on Linux

My linux (with selinux) includes a "context=" field as part of the
output of "id -a". Make the extraction of the "groups=(.+)" entry
of "id -a" more robust in the presence of unpredictable (in name and
ordering) fields, by splitting on fieldname=(.*), then looking for a field
name of 'groups'.

14 years agoSys-Syslog/t/constants.t couldn't find macros.all
David Mitchell [Sat, 20 Feb 2010 16:02:58 +0000 (16:02 +0000)]
Sys-Syslog/t/constants.t couldn't find macros.all

The move from ext/ to cpan/ hadn't been reflected in the pathname
of macros.all. However, since tests are now run from the src dir,
the whole $ENV{PERL_CORE} bit is no longer necessary.
(Note that this line has already been modified from the CPAN version,
so a further change to it doesn't really matter as regards maintaining
sync with CPAN).

14 years agoUpdate Porting/release_managers_guide.pod and Porting/makerel
Steve Hay [Sun, 21 Feb 2010 20:30:34 +0000 (20:30 +0000)]
Update Porting/release_managers_guide.pod and Porting/makerel

In the course of releasing perl-5.11.5 I found a few things that are not
quite correct or no longer relevant:

- Add comments on the problems with doing this on Win32
- There are no longer Roman numerals in README.vms (since eb505c2afb6b5ac2aaba7935878ae6494d44732a)
- Note that Module::CoreList's Changes and META.yml files need updating too
- Fix Porting/makerel's null device redirection

One bigger problem remains to be resolved: when run in a normal cmd.exe
shell on Win32, the Porting/makerel script currently generates tarballs
containing world-writable files and directories, which the PAUSE indexer
then rejects as a possible security risk.

14 years agoFix the NAME in two old perlXYZdelta.pod files
Steve Hay [Sun, 21 Feb 2010 19:44:23 +0000 (19:44 +0000)]
Fix the NAME in two old perlXYZdelta.pod files

14 years agoCreate perl5116delta and update other versions
Steve Hay [Sun, 21 Feb 2010 19:43:45 +0000 (19:43 +0000)]
Create perl5116delta and update other versions

14 years agoStop pod/buildtoc from changing EOLs on Win32
Steve Hay [Sun, 21 Feb 2010 19:41:49 +0000 (19:41 +0000)]
Stop pod/buildtoc from changing EOLs on Win32

14 years agoMerge branch 'tie-scalar' into blead
Abigail [Sun, 21 Feb 2010 16:28:39 +0000 (17:28 +0100)]
Merge branch 'tie-scalar' into blead

14 years agoUpdate future release schedule
Steve Hay [Sun, 21 Feb 2010 16:20:46 +0000 (16:20 +0000)]
Update future release schedule

Put myself down for another release. Hopefully we can get Porting/makerel
and/or the PAUSE indexer sorted out before then to avoid the trouble
experienced rolling perl-5.11.5 from Win32 :-)

14 years agoUpped VERSION
Abigail [Sun, 21 Feb 2010 16:13:27 +0000 (17:13 +0100)]
Upped VERSION

14 years agoSince change 9c901649534a1360, vendorlib_stem isn't always added to @INC.
Nicholas Clark [Sun, 21 Feb 2010 14:46:27 +0000 (14:46 +0000)]
Since change 9c901649534a1360, vendorlib_stem isn't always added to @INC.

Update lib/Config.t to reflect this.

vendorlib_stem used always to be added if defined. Since that change it is only
added if inc_version_list is also defined, which makes "vendor" behaviour
consistent with "site", where sitelib_stem had always only ever been added to
@INC if inc_version_list is defined.

14 years agoFinal update to perl5115delta.pod
Steve Hay [Sat, 20 Feb 2010 21:08:25 +0000 (21:08 +0000)]
Final update to perl5115delta.pod

14 years agoRecord Perl 5.11.5 and a new pumpkin keeper in perlhist
Steve Hay [Sat, 20 Feb 2010 18:34:56 +0000 (18:34 +0000)]
Record Perl 5.11.5 and a new pumpkin keeper in perlhist

14 years agoFix Module::CoreList's own $VERSION in 5.11.4
Steve Hay [Sat, 20 Feb 2010 18:21:13 +0000 (18:21 +0000)]
Fix Module::CoreList's own $VERSION in 5.11.4

14 years agoUpdate Module::CoreList for Perl 5.11.5
Steve Hay [Sat, 20 Feb 2010 18:20:18 +0000 (18:20 +0000)]
Update Module::CoreList for Perl 5.11.5

14 years agoDon't recurse forever if both new() and TIESCALAR() are missing.
Abigail [Sat, 20 Feb 2010 17:55:06 +0000 (18:55 +0100)]
Don't recurse forever if both new() and TIESCALAR() are missing.

This should fix issue #72878. Before calling $pkg -> new in TIESCALAR,
we check whether $pkg -> new is actually the new defined in the Tie::Scalar
package; if true, croak instead of calling it.

14 years agoDocument differences between Tie::Scalar and Tie::StdScalar
Abigail [Sat, 20 Feb 2010 17:54:15 +0000 (18:54 +0100)]
Document differences between Tie::Scalar and Tie::StdScalar

14 years agoMissed a version bump in README.vms
Steve Hay [Sat, 20 Feb 2010 16:55:22 +0000 (16:55 +0000)]
Missed a version bump in README.vms

14 years agoBump version to 5.11.5
Steve Hay [Sat, 20 Feb 2010 16:28:04 +0000 (16:28 +0000)]
Bump version to 5.11.5

14 years agoStop Porting/bump-perl-version from changing EOLs on Win32
Steve Hay [Sat, 20 Feb 2010 16:22:41 +0000 (16:22 +0000)]
Stop Porting/bump-perl-version from changing EOLs on Win32

14 years agoAlmost the final updates to perl5115delta.pod
Steve Hay [Sat, 20 Feb 2010 15:41:36 +0000 (15:41 +0000)]
Almost the final updates to perl5115delta.pod

14 years agoUpdate Porting/Maintainers.pl with version bumps that have been forgotten
Steve Hay [Sat, 20 Feb 2010 15:40:52 +0000 (15:40 +0000)]
Update Porting/Maintainers.pl with version bumps that have been forgotten

This should also bump version to 0.82, but only 0.80 is actually on CPAN.
Likewise, Pod::Perldoc should say 3.15_02, but only 3.15_01 is on CPAN.

14 years agounTODO some passing TODO tests in reg_fold.t
David Mitchell [Sat, 20 Feb 2010 15:41:38 +0000 (15:41 +0000)]
unTODO some passing TODO tests in reg_fold.t

As far as I can tell these particular tests were never actually TODO,
but were lumped in with other failing tests for ease of coding the .t file

14 years agoFix apidoc for HeUTF8()
Marcus Holland-Moritz [Sat, 20 Feb 2010 14:33:05 +0000 (15:33 +0100)]
Fix apidoc for HeUTF8()

HeUTF8() onlu takes one argument.

14 years agoUpdate perl5115delta.pod with new diagnostics
Steve Hay [Sat, 20 Feb 2010 12:00:30 +0000 (12:00 +0000)]
Update perl5115delta.pod with new diagnostics

14 years agoPATCH: deprecation warnings for unreasonable charnames
Karl Williamson [Sat, 20 Feb 2010 06:53:36 +0000 (23:53 -0700)]
PATCH: deprecation warnings for unreasonable charnames

Prior to now just about anything has been legal for a character name in
\N{...}.  This means that legal code was broken by having \N{3,4} for
example mean [^\n]{3,4}.  Such code doesn't come from standard
charnames, but from legal custom translators.

This patch deprecates "unreasonable" names.  handy.h is changed by the
addition of macros that taken together define the names we deem
reasonable,  namely alpha beginning with alphanumerics and some
punctuations as continuations.

toke.c is changed to parse each name and to raise a warning if any
problematic characters are found.

Some tests and diagnostic documentation are also included.

14 years agoImprove handling of qq(\N{...}); and /x
Karl Williamson [Fri, 19 Feb 2010 21:42:16 +0000 (14:42 -0700)]
Improve handling of qq(\N{...}); and /x

It is possible to bypass the lexer's parsing of \N.  This patch causes
the regex compiler to deal with that better.  The compiler no longer
assumes that the lexer parsed the \N.  It generates an error message if
the \N isn't in a form it is expecting, and invalid hexadecimal digits
are now fatal errors, with the position of the error more clearly
marked.

The diagnostic pod has been updated to reflect the new error messages,
with some slight clarifications to the previous ones as well.

14 years agoAdd some missing dVAR's
Marcus Holland-Moritz [Sat, 20 Feb 2010 10:13:00 +0000 (11:13 +0100)]
Add some missing dVAR's

Commits c3acb9e0760135dfd888c0ee1b415777d784aabc867fa1e2da145229b4db2c6e8d5b51700c15f114
and f0e67a1d29102aa9905aecf2b0f98449697d5af3 added or changed functions that now require a
dVAR declaration to compile with -DPERL_GLOBAL_STRUCT.

14 years agoRegen headers after previous patches
Steve Hay [Sat, 20 Feb 2010 00:49:07 +0000 (00:49 +0000)]
Regen headers after previous patches

14 years agoAdd X flag to embed.fnc entries.
Karl Williamson [Sat, 20 Feb 2010 00:12:20 +0000 (17:12 -0700)]
Add X flag to embed.fnc entries.

It has been pointed out that the E flag should be accompanied by the X
flag, and is not for these recently changed entries.

14 years agoMove some fncs from Public to extensions visible
Karl Williamson [Fri, 19 Feb 2010 22:26:24 +0000 (15:26 -0700)]
Move some fncs from Public to extensions visible

Run
make regen embed.fnc
on this patch.

Several functions are in the public API, but don't need to be.  They are
helpers for the regex engine, and thus need to be visible to extensions
for 'use re "debug"'.

14 years agoMore updates to perl5115delta.pod
Steve Hay [Sat, 20 Feb 2010 00:29:55 +0000 (00:29 +0000)]
More updates to perl5115delta.pod

14 years agoAvoid returning an undefined SV*
Rafael Garcia-Suarez [Fri, 19 Feb 2010 09:53:24 +0000 (10:53 +0100)]
Avoid returning an undefined SV*

14 years agoRegen headers after previous patches
Rafael Garcia-Suarez [Fri, 19 Feb 2010 09:11:43 +0000 (10:11 +0100)]
Regen headers after previous patches

14 years agoMake a missing right brace on \N{ fatal
Karl Williamson [Thu, 18 Feb 2010 22:06:51 +0000 (15:06 -0700)]
Make a missing right brace on \N{ fatal

It was decided that this should be a fatal error instead of a warning.

Also some comments were updated..

14 years agoPATCH: [perl #56444] delayed interpolation of \N{...}
Karl Williamson [Thu, 18 Feb 2010 20:41:09 +0000 (13:41 -0700)]
PATCH: [perl #56444] delayed interpolation of \N{...}

make regen embed.fnc
needs to be run on this patch.

This patch fixes Bugs #56444 and #62056.

Hopefully we have finally gotten this right.  The parser used to handle
all the escaped constants, expanding \x2e to its single byte equivalent.
The problem is that for regexp patterns, this is a '.', which is a
metacharacter and has special meaning that \x2e does not.  So things
were changed so that the parser didn't expand things in patterns.  But
this causes problems for \N{NAME}, when the pattern doesn't get
evaluated until runtime, as for example when it has a scalar reference
in it, like qr/$foo\N{NAME}/.  We want the value for \N{NAME} that was
in effect at the point during the parsing phase that this regex was
encountered in, but we don't actually look at it until runtime, when
these bug reports show that it is gone.  The solution is for the
tokenizer to parse \N{NAME}, but to compile it into an intermediate
value that won't ever be considered a metacharacter.  We have chosen to
compile NAME to its equivalent code point value, and express it in the
already existing \N{U+...} form.  This indicates to the regex compiler
that the original input was a named character and retains the value it
had at that point in the parse.

This means that \N{U+...} now always must imply Unicode semantics for
the string or pattern it appeared in.  Previously there was an
inconsistency, where effectively \N{NAME} implied Unicode semantics, but
\N{U+...} did not necessarily.  So now, any string or pattern that has
either of these forms is utf8 upgraded.

A complication is that a charnames handler can return a sequence of
multiple characters instead of just one.  To deal with this case, the
tokenizer will generate a constant of the form \N{U+c1.c2.c2...}, where
c1 etc are the individual characters.  Perhaps this will be made a
public interface someday, but I decided to not expose it externally as
far as possible for now in case we find reason to change it.  It is
possible to defeat this by passing it in a single quoted string to the
regex compiler, so the documentation will be changed to discourage that.

A further complication is that \N can have an additional meaning: to
match a non-newline.  This means that the two meanings have to be
disambiguated.

embed.fnc was changed to make public the function regcurly() in
regcomp.c so that it could be referred to in toke.c to see if the ... in
\N{...} is a legal quantifier like {2,}.  This is used in the
disambiguation.

toke.c was changed to update some out-dated relevant comments.
It now parses \N in patterns.  If it determines that it isn't a named
sequence, it passes it through unchanged.  This happens when there is no
brace after the \N, or no closing brace, or if the braces enclose a
legal quantifier.  Previously there has been essentially no restriction
on what can come between the braces so that a custom translator can
accept virtually anything.  Now, legal quantifiers are assumed to mean
that the \N is a "match non-newline that quantity of times".

I removed the #ifdef'd out code that had been left in in case pack U
reverted to earlier behavior.  I did this because it complicated things,
and because the change to pack U has been in long enough and shown that
it is correct so it's not likely to be reverted.

\N meaning a named character is handled differently depending on whether
this is a pattern or not.  In all cases, the output will be upgraded to
utf8 because a named character implies Unicode semantics.  If not a
pattern, the \N is parsed into a utf8 string, as before.  Otherwise it
will be parsed into the intermediate \N{U+...} form.  If the original
was already a valid \N{U+...} constant, it is passed through unchanged.

I now check that the sequence returned by the charnames handler is not
malformed, which was lacking before.

The code in regcomp.c which dealt with interfacing with the charnames
handler has been removed.  All the values should be determined by the
time regcomp.c gets involved.  The affected subroutine is necessarily
restructured.

An EXACT-type node is generated for the character sequence.  Such a node
has a capacity of 255 bytes, and so it is possible to overflow it.  This
wasn't checked for before, but now it is, and a warning issued and the
overflowing characters are discarded.

14 years agoUpdate perldelta for 5.12 to warn vendors about deprecate.pm
Jesse Vincent [Thu, 18 Feb 2010 19:03:23 +0000 (11:03 -0800)]
Update perldelta for 5.12 to warn vendors about deprecate.pm

(See [perl #72670])

14 years agort #72866 - add magic to arrayrefs assigned to *Foo::ISA
Tony Cook [Thu, 18 Feb 2010 09:59:33 +0000 (20:59 +1100)]
rt #72866 - add magic to arrayrefs assigned to *Foo::ISA

The fix for rt #60220 (26d68d86) updated the isa cache when an
arrayref was assigned to some *ISA, but didn't add the magic to the
new @ISA to catch any further updates to it.  Add the magic, and
tests.

14 years agoAvoid a panic from the UTF-8 length cache if the length overflows 32 bits.
Nicholas Clark [Thu, 18 Feb 2010 15:38:11 +0000 (15:38 +0000)]
Avoid a panic from the UTF-8 length cache if the length overflows 32 bits.

Rather than storing a value, and having it wrap to a wrong value, treat such
lengths as "still unknown". This is a work around until a proper solution is
designed an implemented.

14 years agoIn Perl_reg_temp_copy(), ensure SvMAGIC() is NULL in the new REGEXP.
Nicholas Clark [Thu, 18 Feb 2010 15:23:49 +0000 (15:23 +0000)]
In Perl_reg_temp_copy(), ensure SvMAGIC() is NULL in the new REGEXP.

Change c2123ae380a372d5 exposed the fact that Perl_reg_temp_copy() didn't
reset SvMAGIC() to NULL after block copying the "parent" regexp. The analagous
problem with SvSTASH() was fixed with change b9ad13acb338e137.

14 years agoKeep perl5115delta.pod up to date
Steve Hay [Thu, 18 Feb 2010 09:46:59 +0000 (09:46 +0000)]
Keep perl5115delta.pod up to date

14 years agoUpgrade podlators from 2.3.0 to 2.3.1
Steve Hay [Thu, 18 Feb 2010 09:46:16 +0000 (09:46 +0000)]
Upgrade podlators from 2.3.0 to 2.3.1

Ensures that all $VERSIONs are bumped in files that have changed since
Perl 5.11.4.

14 years agoUpdate perl5115delta.pod with today's changes
Steve Hay [Thu, 18 Feb 2010 00:28:17 +0000 (00:28 +0000)]
Update perl5115delta.pod with today's changes

14 years agoUpgrade CPAN from 1.94_55 to 1.94_56
Steve Hay [Thu, 18 Feb 2010 00:17:57 +0000 (00:17 +0000)]
Upgrade CPAN from 1.94_55 to 1.94_56

Ensures that all $VERSIONs are bumped in files that have changed since
Perl 5.11.4.

14 years agoMerge branch 'pod-perlrepository' of git://github.com/avar/perl into blead
Jesse Vincent [Wed, 17 Feb 2010 15:31:58 +0000 (07:31 -0800)]
Merge branch 'pod-perlrepository' of git://github.com/avar/perl into blead

* 'pod-perlrepository' of git://github.com/avar/perl:
  Mention why it's a good idea to use topic branches for everything
  Adjusted the git config user.name/user.email example for what 99% of users would like to do
  Prefix commands universally with "%". Most of the POD used that convention but a few cases didn't
  Don't recommend that people manually fiddle with their F<.git/config>, instead they should edit it with L<git-config(1)>
  Note that checking out from git via http:// is at least 4x slower than git://

14 years agoMake the new Socket implementation of inet_pton consistent with the existing Socket6...
Jesse Vincent [Wed, 17 Feb 2010 14:45:30 +0000 (06:45 -0800)]
Make the new Socket implementation of inet_pton consistent with the existing Socket6 implementation of inet_pton.

Fix for release-blocking ticket [perl #72884]

> |https://rt.cpan.org/Ticket/Display.html?id=52497|4411113f|NJH/IO-Socket-Multicast6-0.03.tar.gz   |

I'll describe what's happening here, and leave it to everyone else to decide
which of the interacting events is the bug, or where the fix might be.

So the *entire* change is this:

commit 4411113f31b3f00171bb335092b02104d29d7cd7
Author: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date:   Fri Mar 27 13:19:16 2009 +0100

    Add inet_pton and inet_ntop to the list of functions exported by Socket

diff --git a/ext/Socket/Socket.pm b/ext/Socket/Socket.pm
index 6b268ef..7d130ba 100644
--- a/ext/Socket/Socket.pm
+++ b/ext/Socket/Socket.pm
@@ -198,6 +198,7 @@ use XSLoader ();
 @ISA = qw(Exporter);
 @EXPORT = qw(
        inet_aton inet_ntoa
+       inet_pton inet_ntop
        sockaddr_family
        pack_sockaddr_in unpack_sockaddr_in
        pack_sockaddr_un unpack_sockaddr_un

and test fails like this:

$  /home/nick/Sandpit/snap5.9.x-v5.11.4-85-g95c9bfa/bin/perl5.11.4 -Mblib t/35mcastsend.t
1..11
Constant subroutine IO::Socket::Multicast6::AF_INET6 redefined at /home/nick/Sandpit/snap5.9.x-v5.11.4-85-g95c9bfa/lib/perl5/5.11.4/Exporter.pm line 64.
 at /home/nick/.cpan/build/IO-Socket-Multicast6-0.03-CqGAYT/blib/lib/IO/Socket/Multicast6.pm line 10
Prototype mismatch: sub IO::Socket::Multicast6::AF_INET6 () vs none at /home/nick/Sandpit/snap5.9.x-v5.11.4-85-g95c9bfa/lib/perl5/5.11.4/Exporter.pm line 64.
 at /home/nick/.cpan/build/IO-Socket-Multicast6-0.03-CqGAYT/blib/lib/IO/Socket/Multicast6.pm line 10
Constant subroutine IO::Socket::Multicast6::PF_INET6 redefined at /home/nick/Sandpit/snap5.9.x-v5.11.4-85-g95c9bfa/lib/perl5/5.11.4/Exporter.pm line 64.
 at /home/nick/.cpan/build/IO-Socket-Multicast6-0.03-CqGAYT/blib/lib/IO/Socket/Multicast6.pm line 10
Prototype mismatch: sub IO::Socket::Multicast6::PF_INET6 () vs none at /home/nick/Sandpit/snap5.9.x-v5.11.4-85-g95c9bfa/lib/perl5/5.11.4/Exporter.pm line 64.
 at /home/nick/.cpan/build/IO-Socket-Multicast6-0.03-CqGAYT/blib/lib/IO/Socket/Multicast6.pm line 10
ok 1 - use IO::Socket::Multicast6;
ok 2 - Create IPv4 multicast socket
ok 3 - Combined IPv4 destination address and port
ok 4 - Separate IPv4 destination address and port
Bad arg length for Socket::pack_sockaddr_in, length is 16, should be 4 at t/35mcastsend.t line 26.

The warnings aren't actually really relevant. The "problem"s are:

IO::Socket::Multicast6 isa IO::Socket::INET6
IO::Socket::INET6 isa IO::Socket

so they chose to inherit all behaviour from IO::Socket. In turn

IO::Socket isa IO::Handle isa Exporter.

IO::Socket chooses to export everything that Socket does:

sub import {
    my $pkg = shift;
    if (@_ && $_[0] eq 'sockatmark') { # not very extensible but for now, fast
Exporter::export_to_level('IO::Socket', 1, $pkg, 'sockatmark');
    } else {
my $callpkg = caller;
Exporter::export 'Socket', $callpkg, @_;
    }
}

So, this means that all those choices and delegation of behaviour (and
responsibility) means that all those modules export whatever Socket exports.
OO modules.

So, now they also export inet_pton and inet_ntop.

The test is careful to only import what it needs:

use strict;
use Socket6 qw/ inet_pton pack_sockaddr_in6/;
use Socket qw/  pack_sockaddr_in /;
use Test::More tests => 11;

in particular, it wants inet_pton from Socket6, and only pack_sockaddr_in
from Socket. So at that point, main::inet_pton is Socket6::inet_pton

Then it does this, correctly in a BEGIN block:

BEGIN { use_ok( 'IO::Socket::Multicast6' ); }

The side effect of this is to import all exports from IO::Socket::Multicast6.
Which, from the above chain of inheritance, is @Socket::EXPORT.

So at this point, main::inet_pton is rebound to Socket::inet_pton

And the test fails, because they differ, and it expected (and wanted)
Socket6::inet_pton(). Socket6::inet_pton() returns 4 bytes for AF_INET, 16
bytes for AF_INET6. Socket::inet_pton() returns 16 for both.
Socket::pack_sockaddr_in() wants 4 bytes.

Now, to add to the fun:

    use IO::Socket::Multicast6 ();

and

    use IO::Socket::Multicast6;

of course mean different things. The former suppresses all exports.
It turns out that with Test::More::isa_ok() has no way of doing the former:

$ cat use_ok.pl

use warnings;
use strict;

use Test::More tests => 3;

package clash;

BEGIN { main::use_ok 'Socket' };

package crunch;

BEGIN { main::use_ok 'Socket', () };

package biff;

BEGIN { main::use_ok 'Socket', 'sockaddr_family' };

package main;

sub dump_lowercase_keys {
    my $package = shift;

    print "For package $package:\n";

    no strict 'refs';
    print "    $_\n" foreach sort grep {!tr/A-Z//} keys %{"${package}::"};

    print "\n";
}

dump_lowercase_keys $_ foreach qw (clash crunch biff);
__END__

$ perl use_ok.pl
1..3
ok 1 - use Socket;
ok 2 - use Socket;
ok 3 - use Socket;
For package clash:
    inet_aton
    inet_ntoa
    pack_sockaddr_in
    pack_sockaddr_un
    sockaddr_family
    sockaddr_in
    sockaddr_un
    unpack_sockaddr_in
    unpack_sockaddr_un

For package crunch:
    inet_aton
    inet_ntoa
    pack_sockaddr_in
    pack_sockaddr_un
    sockaddr_family
    sockaddr_in
    sockaddr_un
    unpack_sockaddr_in
    unpack_sockaddr_un

For package biff:
    sockaddr_family

So, there's no clean way to rewrite that test with use_ok to suppress imports.

So, to summarise, it's due to

A cascade of modules blindly exporting everything that Socket exports
Socket::inet_pton() and Socket6::inet_pton() differing in behaviour
A test that fails to realise that it's importing everything via use_ok

This one ranks as blocker because:

    Socket::inet_pton() and Socket::inet_ntop() are not in any stable release

    Hence we have the option to change them if we do it *NOW*.

I think that the right fix is the appended patch. This makes the new Socket
implementation of inet_pton consistent with the existing Socket6
implementation of inet_pton.

14 years agoDocumentation fix in perldoc's usage statement. (-A -> -v)
Offer Kaye [Wed, 17 Feb 2010 14:37:10 +0000 (06:37 -0800)]
Documentation fix in perldoc's usage statement.  (-A -> -v)

Reported in: <5694251002150108m12a3d68flb196f14a45103149@mail.gmail.com>

14 years agoChange my email address from work to home
Steve Hay [Wed, 17 Feb 2010 09:27:51 +0000 (09:27 +0000)]
Change my email address from work to home

14 years agoKeep perl5115delta.pod up to date
Steve Hay [Tue, 16 Feb 2010 23:23:55 +0000 (23:23 +0000)]
Keep perl5115delta.pod up to date

14 years agoMention why it's a good idea to use topic branches for everything
Ævar Arnfjörð Bjarmason [Tue, 16 Feb 2010 18:19:18 +0000 (18:19 +0000)]
Mention why it's a good idea to use topic branches for everything

Most of this is derived from Dan Golden's E-Mail to me on
perl5-porters with the subject "[PATCH] Add comments to gv.c about
variable implementation" where I'd submitted a patch without using a
topic branch.

14 years agoAdjusted the git config user.name/user.email example for what 99% of users would...
Ævar Arnfjörð Bjarmason [Tue, 16 Feb 2010 17:46:46 +0000 (17:46 +0000)]
Adjusted the git config user.name/user.email example for what 99% of users would like to do

Almost nobody wants to set user.name/user.email on a per-repository
basis as the previous example suggested. I put in a new example that
shows how to use C<git config --global> along with an example of how
to set user.email just for F<perl-git>

I replaced Leon Brocard's name with mine because he didn't fit into
the multiple E-Mail address example and I couldn't think of another
example.

14 years agoPrefix commands universally with "%". Most of the POD used that convention but a...
Ævar Arnfjörð Bjarmason [Tue, 16 Feb 2010 17:36:58 +0000 (17:36 +0000)]
Prefix commands universally with "%". Most of the POD used that convention but a few cases didn't

14 years agoDon't recommend that people manually fiddle with their F<.git/config>, instead they...
Ævar Arnfjörð Bjarmason [Tue, 16 Feb 2010 17:33:43 +0000 (17:33 +0000)]
Don't recommend that people manually fiddle with their F<.git/config>, instead they should edit it with L<git-config(1)>

14 years agoFix another place where I typoed book's name
Jesse Vincent [Tue, 16 Feb 2010 17:28:01 +0000 (09:28 -0800)]
Fix another place where I typoed book's name

14 years agoDoc fix. Thanks to Bram.
Jesse Vincent [Tue, 16 Feb 2010 17:26:30 +0000 (09:26 -0800)]
Doc fix. Thanks to Bram.

14 years agoNote that checking out from git via http:// is at least 4x slower than git://
Ævar Arnfjörð Bjarmason [Tue, 16 Feb 2010 17:23:25 +0000 (17:23 +0000)]
Note that checking out from git via  is at least 4x slower than git://

Tested on a 10 MiB/s connection in London, although this is also
IO/CPU bound since Git needs to resolve deltas and check out after the
repository has made it across the wire.

14 years agoFix #72850 - reading $! shouldn't SEGV if Strerror(errno) returns NULL.
Nicholas Clark [Tue, 16 Feb 2010 16:16:33 +0000 (16:16 +0000)]
Fix #72850 - reading $! shouldn't SEGV if Strerror(errno) returns NULL.

This can happen on some OSes for out of range errno values. The bug was
introduced with 0097b436152452e4, which in turn fixed #61976.

Test case by Steve Peters.

14 years ago$name =~ /Phill?ipp?e?/ && $name eq "Philippe" # FAIL
Philippe Bruhat (BooK) [Tue, 16 Feb 2010 16:16:47 +0000 (17:16 +0100)]
$name =~ /Phill?ipp?e?/ && $name eq "Philippe" # FAIL

14 years agoAdded a sucker for the August 20 release
Jesse Vincent [Tue, 16 Feb 2010 16:06:01 +0000 (08:06 -0800)]
Added a sucker for the August 20 release

14 years agoUpdated release schedule through July 2010
Jesse Vincent [Tue, 16 Feb 2010 15:40:08 +0000 (07:40 -0800)]
Updated release schedule through July 2010

14 years agoRemove unused variable
H.Merijn Brand [Tue, 16 Feb 2010 11:15:11 +0000 (12:15 +0100)]
Remove unused variable

14 years agoDoc adjustment about lock(), by Daniel Frederick Crisman
Rafael Garcia-Suarez [Mon, 15 Feb 2010 23:00:32 +0000 (00:00 +0100)]
Doc adjustment about lock(), by Daniel Frederick Crisman

14 years agoAdd our repository URL as a 'repository' key in META.yml.
Nicholas Clark [Mon, 15 Feb 2010 14:56:54 +0000 (14:56 +0000)]
Add our repository URL as a 'repository' key in META.yml.

14 years agoBump version's $VERSION
Steve Hay [Sun, 14 Feb 2010 23:52:41 +0000 (23:52 +0000)]
Bump version's $VERSION

version.pm was changed by 61a0cb1c57a82d328c88c2dd525c91495edb2db9
and Jesse confirms that the $VERSION should be bumped as a result.

14 years agoMake distclean work again on Win32
Steve Hay [Sun, 14 Feb 2010 23:49:20 +0000 (23:49 +0000)]
Make distclean work again on Win32

Cf. 71eaafb1e6768e777bc805cc8490b55c6e77da64

14 years agoFirst stab at a perl5115delta.pod with just under a week to go
Steve Hay [Sun, 14 Feb 2010 22:46:51 +0000 (22:46 +0000)]
First stab at a perl5115delta.pod with just under a week to go

14 years agoUpdate AUTHORS and Porting/checkAUTHORS.pl with new names and aliases
Steve Hay [Sun, 14 Feb 2010 19:58:51 +0000 (19:58 +0000)]
Update AUTHORS and Porting/checkAUTHORS.pl with new names and aliases

14 years agoConvert Perl_sv_pos_u2b_proper() to Perl_sv_pos_u2b_flags().
Nicholas Clark [Sun, 14 Feb 2010 12:31:44 +0000 (12:31 +0000)]
Convert Perl_sv_pos_u2b_proper() to Perl_sv_pos_u2b_flags().

Change from a value/return offset pointer to passing a Unicode offset, and
returning a byte offset. The optional length value/return pointer remains.
Add a flags argument, passed to SvPV_flags(). This allows the caller to
specify whether mg_get() should be called on sv.

14 years agoRemove a vestigial STRLEN case and convert a label to lowercase.
Nicholas Clark [Sun, 14 Feb 2010 16:04:35 +0000 (16:04 +0000)]
Remove a vestigial STRLEN case and convert a label to lowercase.

(Tweaking 777f7c561610dee6.)

14 years agoRemoves 32-bit limit on substr arguments. The full range of IV and UV is available...
Eric Brine [Fri, 12 Feb 2010 01:28:29 +0000 (20:28 -0500)]
Removes 32-bit limit on substr arguments. The full range of IV and UV is available for the pos and len arguments, with safe conversion to STRLEN where it's smaller than an IV.

14 years ago[PATCH] Support for SystemTap's dtrace compatibility layer and issues linking miniperl
H.Merijn Brand [Sat, 13 Feb 2010 18:09:53 +0000 (19:09 +0100)]
[PATCH] Support for SystemTap's dtrace compatibility layer and issues linking miniperl

SystemTaps' dtrace binary lives in /usr/bin, so add a check to Configure
for that.

Additionally link the dtrace .o file into miniperl, which is an issue
with SystemTap and also reported on p5p to affect OpenSolaris in

Signed-off-by: H.Merijn Brand <h.m.brand@xs4all.nl>
14 years agoBump Safe's version to 2.22
Rafael Garcia-Suarez [Thu, 11 Feb 2010 21:57:31 +0000 (22:57 +0100)]
Bump Safe's version to 2.22

14 years agobump to CPAN 1.12. Only Makefile.PL changes not affecting CORE
Reini Urban [Thu, 11 Feb 2010 11:56:39 +0000 (12:56 +0100)]
bump to CPAN 1.12. Only Makefile.PL changes not affecting CORE

14 years agoSilence spurious warning in new Safe test
Rafael Garcia-Suarez [Thu, 11 Feb 2010 21:36:54 +0000 (22:36 +0100)]
Silence spurious warning in new Safe test

This warning is emitted by perl when re-throwing the exception, so add a
TODO test to suppress it. However, fixing that will imply a core change.

14 years agoRemove npl addresses from "my" files
Robin Barker [Thu, 11 Feb 2010 16:39:13 +0000 (16:39 +0000)]
Remove npl addresses from "my" files

14 years agodelete orphaned text
Robin Barker [Thu, 11 Feb 2010 17:57:45 +0000 (17:57 +0000)]
delete orphaned text

14 years agoRevised opening line of perl man page
David Golden [Thu, 11 Feb 2010 20:04:54 +0000 (15:04 -0500)]
Revised opening line of perl man page

This patch was reviewed with Larry Wall via IRC.  His stipulation was
that both historical glossses be preserved to humorous effect.

14 years agorevert perl -h changes
David Golden [Thu, 11 Feb 2010 19:15:10 +0000 (14:15 -0500)]
revert perl -h changes

14 years agoBug in Safe 2.21 re propagating exceptions
Tim Bunce [Thu, 11 Feb 2010 10:29:17 +0000 (11:29 +0100)]
Bug in Safe 2.21 re propagating exceptions

An exception thrown from a closure gets lost.
I've boiled it down to this:

   perl -MSafe -e 'Safe->new->reval(q{sub { die @_ }})->(qq{ok\n})'

That should die with "ok".

The problem is that the closure that wraps any returned code ref if
threads are enabled is acting as an eval block so hiding the exception.

14 years ago[perl #72590] Panic if 'use strict' and forget 'my'
Rafael Garcia-Suarez [Thu, 11 Feb 2010 09:32:01 +0000 (10:32 +0100)]
[perl #72590] Panic if 'use strict' and forget 'my'

That bug happens when we detect a compilation error in the statement
being parsed, and when the continuation of the parsing of that same
statement needs to load the file unicore/Name.pl via charnames.pm.
In that case perl gets confused, fails to parse Name.pl because
the parser is already in error, and also fails to properly rewind
to a normal error-reporting state.

This patch does not attempt to fix the whole error-reporting process;
instead, it simply prevents perl from trying to load charnames if it has
already recorded a parse error. So, in a way, it hides the bug under
the carpet. However, this is a safe fix, suitable for a code-freeze
stage.

14 years agokeep -h to 80 characters or less
David Golden [Thu, 11 Feb 2010 03:54:43 +0000 (22:54 -0500)]
keep -h to 80 characters or less

14 years agoHelp new users learn how to get help
David Golden [Thu, 11 Feb 2010 03:13:59 +0000 (22:13 -0500)]
Help new users learn how to get help

14 years agoNote a change in warnings::register's behavior in 5.10 that wasn't documented at...
Jesse Vincent [Thu, 11 Feb 2010 02:05:08 +0000 (18:05 -0800)]
Note a change in warnings::register's behavior in 5.10 that wasn't documented at the time. Resolves [perl #62522]

14 years agoPer Jesse, ignoring the skipping the tests form threaded OpenBSD
Steve Peters [Thu, 11 Feb 2010 01:41:48 +0000 (19:41 -0600)]
Per Jesse, ignoring the skipping the tests form threaded OpenBSD
builds.  See RT #71504 for the mess that this is avoiding.

14 years agoFix for non-regexps being upgraded to SVt_REGEXP
Nicholas Clark [Tue, 9 Feb 2010 16:11:34 +0000 (08:11 -0800)]
Fix for non-regexps being upgraded to SVt_REGEXP

$ ./perl -lwe '$a = ${qr//}; $a = 2; print re::is_regexp(\$a)'
1

It is possible for arbitrary SVs (eg PAD entries) to be upgraded to
SVt_REGEXP.  (This is new with first class regexps)

Whilst the example above does not SEGV, it will be possible to write
code that will cause SEGVs (or worse) at the point when the scalar is freed,
because the code in sv_clear() assumes that all scalars of type
SVt_REGEXP *are* regexps, and passes them to pregfree2(), which assumes that
pointers within are valid.

14 years agoregenerated Configure after backport cat ../perl/Configure >Configure
H.Merijn Brand [Tue, 9 Feb 2010 15:44:30 +0000 (16:44 +0100)]
regenerated Configure after backport cat ../perl/Configure >Configure

Please keep them sorted

14 years agoMerge branch 'blead' of ssh://perl5.git.perl.org/gitroot/perl into blead
Jesse Vincent [Tue, 9 Feb 2010 15:35:19 +0000 (07:35 -0800)]
Merge branch 'blead' of ssh://perl5.git.perl.org/gitroot/perl into blead

* 'blead' of ssh://perl5.git.perl.org/gitroot/perl:
  Warn people not to set PERL_CORE in XS
  In embed.fnc the 'E' flag should imply 'X', but doesn't.
  revise perldelta note on strict and lax version rules
  expand flag descriptions in in embed.fnc
  alphabetically sort flag descriptions in embed.fnc
  [perl #72156]: substitute `less -R' for `less' for groff's new usage
  INSTALL doc fix: calling the test suite using -MTestInit changed since it moved to top level (which happened in commit 30b6e59101b252c20a6b50b95203d1e2c6016604)
  changed "an UTF..." to "a UTF..." in all Pods

14 years agoDocument unless () {} elsif () {} else {} and tell people not to use it.
Jesse Vincent [Tue, 9 Feb 2010 15:31:16 +0000 (07:31 -0800)]
Document unless () {} elsif () {} else {} and tell people not to use it.

Note to the deprecation police: this is not a language construct
deprecation. Just a bit of healthy advice about coding style.
Who knows. In a decade, this may be the lynchpin of "postmodern perl".

14 years ago"unless else" wasn't previously documented, though it was valid syntax
Reini Urban [Tue, 9 Feb 2010 15:17:00 +0000 (07:17 -0800)]
"unless else" wasn't previously documented, though it was valid syntax