summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2019-12-17 14:23:07 -0700
committerKarl Williamson <khw@cpan.org>2019-12-17 14:31:08 -0700
commit9f16475a53933d1d9c547f871b97b3b12160cece (patch)
tree8663e338c3b5e058f0d73f3f6f8a3e3ff4fbede8
parent5af38e470e5404ea35b11b729d9a03653c224ccb (diff)
downloadperl-9f16475a53933d1d9c547f871b97b3b12160cece.tar.gz
PATCH: GH #17370, read beyond buffer in grok_inf_nan
Like GH #17367, this was caused by a failure to check that we aren't at the end of the buffer after advancing the ptr to it.
-rw-r--r--t/re/pat.t5
1 files changed, 4 insertions, 1 deletions
diff --git a/t/re/pat.t b/t/re/pat.t
index 413fbee823..41d27bb3f7 100644
--- a/t/re/pat.t
+++ b/t/re/pat.t
@@ -24,7 +24,7 @@ BEGIN {
skip_all_without_unicode_tables();
-plan tests => 1012; # Update this when adding/deleting tests.
+plan tests => 1013; # Update this when adding/deleting tests.
run_tests() unless caller;
@@ -2084,6 +2084,9 @@ CODE
{ # [perl #133871], ASAN/valgrind out-of-bounds access
fresh_perl_like('qr/\p{nv:NAnq}/', qr/Can't find Unicode property definition/, {}, "GH #17367");
}
+ { # GH #17370, ASAN/valgrind out-of-bounds access
+ fresh_perl_like('qr/\p{nv:qnan}/', qr/Can't find Unicode property definition/, {}, "GH #17370");
+ }
SKIP:
{ # [perl #133921], segfault