This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #72766] Allow huge pos() settings
authorFather Chrysostomos <sprout@cpan.org>
Sun, 21 Jul 2013 07:38:28 +0000 (00:38 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 23 Jul 2013 21:53:23 +0000 (14:53 -0700)
commit6174b39a88cd48740c024cfb6035edb6ffed9f2d
tree07f2c3b7d17fa361cd5fa1252b14b4a739fb2c60
parentef54055c17bc9effcdf6a8135d2b375b7c35dd62
[perl #72766] Allow huge pos() settings

This is part of #116907, too.  It also fixes #72924 as a side effect;
the next commit will explain.

The value of pos($foo) was being stored as an I32, not allowing values
above I32_MAX.  Change it to SSize_t (the signed equivalent of size_t,
representing the maximum string length the OS/compiler supports).

This is accomplished by changing the size of the entry in the magic
struct, which is the simplest fix.

Other parts of the code base can benefit from this, too.

We actually cast the pos value to STRLEN (size_t) when reading
it, to allow *very* long strings.  Only the value -1 is special,
meaning there is no pos.  So the maximum supported offset is
2**sizeof(size_t)-2.

The regexp engine itself still cannot handle large strings, so being
able to set pos to large values is useless right now.  This is but one
piece in a larger puzzle.

Changing the size of mg->mg_len also requires that
Perl_hv_placeholders_p change its type.  This function
should in fact not be in the API, since it exists
solely to implement the HvPLACEHOLDERS macro.  See
<https://rt.perl.org/rt3/Ticket/Display.html?id=116907#txn-1237043>.
MANIFEST
embed.fnc
hv.c
mg.c
mg.h
pp.c
proto.h
t/bigmem/pos.t [new file with mode: 0644]