Blame otp-R12B-5-0007-Fix-check-for-compile-workspace-overflow.patch

Peter Lemenkov 09a929
From 4c90a8bb06e8bed4b62e15b78b461edb0e606df5 Mon Sep 17 00:00:00 2001
Peter Lemenkov 09a929
From: Peter Lemenkov <lemenkov@gmail.com>
Peter Lemenkov 09a929
Date: Mon, 19 Apr 2010 13:45:41 +0400
Peter Lemenkov 09a929
Subject: [PATCH 7/7] Fix check for compile workspace overflow
Peter Lemenkov 09a929
Peter Lemenkov 09a929
Patch from:
Peter Lemenkov 09a929
http://vcs.pcre.org/viewvc/code/trunk/pcre_compile.c?r1=504&r2=505&view=patch
Peter Lemenkov 09a929
Peter Lemenkov 09a929
Test case:
Peter Lemenkov 09a929
N = 819, re:compile([lists:duplicate(N, $(), lists:duplicate(N, $))]).
Peter Lemenkov 09a929
Peter Lemenkov 09a929
Compiling large regular expressions could overflow the workspace
Peter Lemenkov 09a929
buffer. Modify the test to check for a value smaller than the buffer
Peter Lemenkov 09a929
size.
Peter Lemenkov 09a929
---
Peter Lemenkov 09a929
 erts/emulator/pcre/pcre_compile.c |    9 +++++++--
Peter Lemenkov 09a929
 1 files changed, 7 insertions(+), 2 deletions(-)
Peter Lemenkov 09a929
Peter Lemenkov 09a929
diff --git a/erts/emulator/pcre/pcre_compile.c b/erts/emulator/pcre/pcre_compile.c
Peter Lemenkov 09a929
index 5d2be9a..08ce2b0 100644
Peter Lemenkov 09a929
--- a/erts/emulator/pcre/pcre_compile.c
Peter Lemenkov 09a929
+++ b/erts/emulator/pcre/pcre_compile.c
Peter Lemenkov 09a929
@@ -91,6 +91,11 @@ is 4 there is plenty of room. */
Peter Lemenkov 09a929
 
Peter Lemenkov 09a929
 #define COMPILE_WORK_SIZE (4096)
Peter Lemenkov 09a929
 
Peter Lemenkov 09a929
+/* The overrun tests check for a slightly smaller size so that they detect the
Peter Lemenkov 09a929
+overrun before it actually does run off the end of the data block. */
Peter Lemenkov 09a929
+
Peter Lemenkov 09a929
+#define WORK_SIZE_CHECK (COMPILE_WORK_SIZE - 100)
Peter Lemenkov 09a929
+
Peter Lemenkov 09a929
 
Peter Lemenkov 09a929
 /* Table for handling escaped characters in the range '0'-'z'. Positive returns
Peter Lemenkov 09a929
 are simple data values; negative values are for special things like \d and so
Peter Lemenkov 09a929
@@ -2444,7 +2449,7 @@ for (;; ptr++)
Peter Lemenkov 09a929
 #ifdef DEBUG
Peter Lemenkov 09a929
     if (code > cd->hwm) cd->hwm = code;                 /* High water info */
Peter Lemenkov 09a929
 #endif
Peter Lemenkov 09a929
-    if (code > cd->start_workspace + COMPILE_WORK_SIZE) /* Check for overrun */
Peter Lemenkov 09a929
+    if (code > cd->start_workspace + WORK_SIZE_CHECK)   /* Check for overrun */
Peter Lemenkov 09a929
       {
Peter Lemenkov 09a929
       *errorcodeptr = ERR52;
Peter Lemenkov 09a929
       goto FAILED;
Peter Lemenkov 09a929
@@ -2493,7 +2498,7 @@ for (;; ptr++)
Peter Lemenkov 09a929
   /* In the real compile phase, just check the workspace used by the forward
Peter Lemenkov 09a929
   reference list. */
Peter Lemenkov 09a929
 
Peter Lemenkov 09a929
-  else if (cd->hwm > cd->start_workspace + COMPILE_WORK_SIZE)
Peter Lemenkov 09a929
+  else if (cd->hwm > cd->start_workspace + WORK_SIZE_CHECK)
Peter Lemenkov 09a929
     {
Peter Lemenkov 09a929
     *errorcodeptr = ERR52;
Peter Lemenkov 09a929
     goto FAILED;
Peter Lemenkov 09a929
-- 
Peter Lemenkov 09a929
1.6.6.1
Peter Lemenkov 09a929