From 92f8cd4e7b0ff3d09162139e3c99b1d9310bca81 Mon Sep 17 00:00:00 2001 From: Tony Cook Date: Mon, 10 Oct 2016 10:46:46 +1100 Subject: [PATCH] (perl #129281) test for buffer overflow issue MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Ported to 5.24.1: commit d2ba660af00f1bf2e7012741615eff7c19f29707 Author: Tony Cook Date: Mon Oct 10 10:46:46 2016 +1100 (perl #129281) test for buffer overflow issue Signed-off-by: Petr Písař --- t/re/pat.t | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/t/re/pat.t b/t/re/pat.t index 749edd0..7b8e6f7 100644 --- a/t/re/pat.t +++ b/t/re/pat.t @@ -23,7 +23,7 @@ BEGIN { skip_all_without_unicode_tables(); } -plan tests => 792; # Update this when adding/deleting tests. +plan tests => 793; # Update this when adding/deleting tests. run_tests() unless caller; @@ -1779,6 +1779,11 @@ EOP }msx, { stderr => 1 }, "Offsets in debug output are not negative"); } } + { + # [perl #129281] buffer write overflow, detected by ASAN, valgrind + local $::TODO = "whilem_c bumped too much"; + fresh_perl_is('/0(?0)|^*0(?0)|^*(^*())0|/', '', {}, "don't bump whilem_c too much"); + } } # End of sub run_tests 1; -- 2.7.4