From 13817fc8ca76d121dbf08724800333ebb50f5d64 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Wed, 15 May 2002 12:44:06 +0000 Subject: [PATCH] Purify finding: jperl.t causes a few Array Bounds Reads (one byte too far in a malloced buffer) at various spots in regcomp.c, all the buffers malloced by SvGROW() in sv_recode_to_utf8(). p4raw-id: //depot/perl@16608 --- sv.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/sv.c b/sv.c index 13b548b..5992a69 100644 --- a/sv.c +++ b/sv.c @@ -10474,9 +10474,10 @@ Perl_sv_recode_to_utf8(pTHX_ SV *sv, SV *encoding) PUTBACK; s = SvPV(uni, len); if (s != SvPVX(sv)) { - SvGROW(sv, len); + SvGROW(sv, len + 1); Move(s, SvPVX(sv), len, char); SvCUR_set(sv, len); + SvPVX(sv)[len] = 0; } FREETMPS; LEAVE; -- 1.8.3.1