Blame SOURCES/gcc48-rh1469697-3.patch

001c85
commit a3e2ba88eb09c1eed2f7ed6e17660b345464bb90
001c85
Author: law <law@138bc75d-0d04-0410-961f-82ee72b054a4>
001c85
Date:   Wed Sep 20 05:05:12 2017 +0000
001c85
001c85
    2017-09-18  Jeff Law  <law@redhat.com>
001c85
    
001c85
            * explow.c: Include "params.h" and "dumpfile.h".
001c85
            (anti_adjust_stack_and_probe_stack_clash): New function.
001c85
            (get_stack_check_protect): Likewise.
001c85
            (compute_stack_clash_protection_loop_data): Likewise.
001c85
            (emit_stack_clash_protection_loop_start): Likewise.
001c85
            (emit_stack_clash_protection_loop_end): Likewise.
001c85
            (allocate_dynamic_stack_space): Use get_stack_check_protect.
001c85
            Use anti_adjust_stack_and_probe_stack_clash.
001c85
            * explow.h (compute_stack_clash_protection_loop_data): Prototype.
001c85
            (emit_stack_clash_protection_loop_start): Likewise.
001c85
            (emit_stack_clash_protection_loop_end): Likewise.
001c85
            * rtl.h (get_stack_check_protect): Prototype.
001c85
            * target.def (stack_clash_protection_final_dynamic_probe): New hook.
001c85
            * targhooks.c (default_stack_clash_protection_final_dynamic_probe): New.
001c85
            * targhooks.h (default_stack_clash_protection_final_dynamic_probe):
001c85
            Prototype.
001c85
            * doc/tm.texi.in (TARGET_STACK_CLASH_PROTECTION_FINAL_DYNAMIC_PROBE):
001c85
            Add @hook.
001c85
            * doc/tm.texi: Rebuilt.
001c85
            * config/alpha/alpha.c (alpha_expand_prologue): Likewise.
001c85
            * config/i386/i386.c (ix86_expand_prologue): Likewise.
001c85
            * config/ia64/ia64.c (ia64_expand_prologue): Likewise.
001c85
            * config/mips/mips.c (mips_expand_prologue): Likewise.
001c85
            * config/rs6000/rs6000.c (rs6000_emit_prologue): Likewise.
001c85
            * config/sparc/sparc.c (sparc_expand_prologue): Likewise.
001c85
            (sparc_flat_expand_prologue): Likewise.
001c85
    
001c85
            * gcc.dg/stack-check-3.c: New test.
001c85
    
001c85
    git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@252995 138bc75d-0d04-0410-961f-82ee72b054a4
001c85
001c85
diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c
001c85
index 2874b8454a9..5402f5213d6 100644
001c85
--- a/gcc/config/alpha/alpha.c
001c85
+++ b/gcc/config/alpha/alpha.c
001c85
@@ -7625,7 +7625,7 @@ alpha_expand_prologue (void)
001c85
 
001c85
   probed_size = frame_size;
001c85
   if (flag_stack_check)
001c85
-    probed_size += STACK_CHECK_PROTECT;
001c85
+    probed_size += get_stack_check_protect ();
001c85
 
001c85
   if (probed_size <= 32768)
001c85
     {
001c85
diff --git a/gcc/config/i386/i386.c b/gcc/config/i386/i386.c
001c85
index e36726ba722..d996fd160e8 100644
001c85
--- a/gcc/config/i386/i386.c
001c85
+++ b/gcc/config/i386/i386.c
001c85
@@ -10544,12 +10544,12 @@ ix86_expand_prologue (void)
001c85
 	  HOST_WIDE_INT size = allocate;
001c85
 
001c85
 	  if (TARGET_64BIT && size >= (HOST_WIDE_INT) 0x80000000)
001c85
-	    size = 0x80000000 - STACK_CHECK_PROTECT - 1;
001c85
+	    size = 0x80000000 - get_stack_check_protect () - 1;
001c85
 
001c85
 	  if (TARGET_STACK_PROBE)
001c85
-	    ix86_emit_probe_stack_range (0, size + STACK_CHECK_PROTECT);
001c85
+	    ix86_emit_probe_stack_range (0, size + get_stack_check_protect ());
001c85
 	  else
001c85
-	    ix86_emit_probe_stack_range (STACK_CHECK_PROTECT, size);
001c85
+	    ix86_emit_probe_stack_range (get_stack_check_protect (), size);
001c85
 	}
001c85
     }
001c85
 
001c85
diff --git a/gcc/config/ia64/ia64.c b/gcc/config/ia64/ia64.c
001c85
index 50bbad6661c..390983936e8 100644
001c85
--- a/gcc/config/ia64/ia64.c
001c85
+++ b/gcc/config/ia64/ia64.c
001c85
@@ -3435,7 +3435,7 @@ ia64_expand_prologue (void)
001c85
     current_function_static_stack_size = current_frame_info.total_size;
001c85
 
001c85
   if (flag_stack_check == STATIC_BUILTIN_STACK_CHECK)
001c85
-    ia64_emit_probe_stack_range (STACK_CHECK_PROTECT,
001c85
+    ia64_emit_probe_stack_range (get_stack_check_protect (),
001c85
 				 current_frame_info.total_size,
001c85
 				 current_frame_info.n_input_regs
001c85
 				   + current_frame_info.n_local_regs);
001c85
diff --git a/gcc/config/mips/mips.c b/gcc/config/mips/mips.c
001c85
index 41c5d6b6b1f..9b7eb678f19 100644
001c85
--- a/gcc/config/mips/mips.c
001c85
+++ b/gcc/config/mips/mips.c
001c85
@@ -10746,7 +10746,7 @@ mips_expand_prologue (void)
001c85
     current_function_static_stack_size = size;
001c85
 
001c85
   if (flag_stack_check == STATIC_BUILTIN_STACK_CHECK && size)
001c85
-    mips_emit_probe_stack_range (STACK_CHECK_PROTECT, size);
001c85
+    mips_emit_probe_stack_range (get_stack_check_protect (), size);
001c85
 
001c85
   /* Save the registers.  Allocate up to MIPS_MAX_FIRST_STACK_STEP
001c85
      bytes beforehand; this is enough to cover the register save area
001c85
diff --git a/gcc/config/rs6000/rs6000.c b/gcc/config/rs6000/rs6000.c
001c85
index 15583055895..a9052c6becf 100644
001c85
--- a/gcc/config/rs6000/rs6000.c
001c85
+++ b/gcc/config/rs6000/rs6000.c
001c85
@@ -23214,7 +23214,8 @@ rs6000_emit_prologue (void)
001c85
     current_function_static_stack_size = info->total_size;
001c85
 
001c85
   if (flag_stack_check == STATIC_BUILTIN_STACK_CHECK && info->total_size)
001c85
-    rs6000_emit_probe_stack_range (STACK_CHECK_PROTECT, info->total_size);
001c85
+    rs6000_emit_probe_stack_range (get_stack_check_protect (),
001c85
+				   info->total_size);
001c85
 
001c85
   if (TARGET_FIX_AND_CONTINUE)
001c85
     {
001c85
diff --git a/gcc/config/sparc/sparc.c b/gcc/config/sparc/sparc.c
001c85
index e5d326cdf23..e5e93c80261 100644
001c85
--- a/gcc/config/sparc/sparc.c
001c85
+++ b/gcc/config/sparc/sparc.c
001c85
@@ -5431,7 +5431,7 @@ sparc_expand_prologue (void)
001c85
     current_function_static_stack_size = size;
001c85
 
001c85
   if (flag_stack_check == STATIC_BUILTIN_STACK_CHECK && size)
001c85
-    sparc_emit_probe_stack_range (STACK_CHECK_PROTECT, size);
001c85
+    sparc_emit_probe_stack_range (get_stack_check_protect (), size);
001c85
 
001c85
   if (size == 0)
001c85
     ; /* do nothing.  */
001c85
@@ -5533,7 +5533,7 @@ sparc_flat_expand_prologue (void)
001c85
     current_function_static_stack_size = size;
001c85
 
001c85
   if (flag_stack_check == STATIC_BUILTIN_STACK_CHECK && size)
001c85
-    sparc_emit_probe_stack_range (STACK_CHECK_PROTECT, size);
001c85
+    sparc_emit_probe_stack_range (get_stack_check_protect (), size);
001c85
 
001c85
   if (sparc_save_local_in_regs_p)
001c85
     emit_save_or_restore_local_in_regs (stack_pointer_rtx, SPARC_STACK_BIAS,
001c85
diff --git a/gcc/doc/tm.texi b/gcc/doc/tm.texi
001c85
index 6b18a2724bc..eeef757bf5b 100644
001c85
--- a/gcc/doc/tm.texi
001c85
+++ b/gcc/doc/tm.texi
001c85
@@ -3571,6 +3571,10 @@ GCC computed the default from the values of the above macros and you will
001c85
 normally not need to override that default.
001c85
 @end defmac
001c85
 
001c85
+@deftypefn {Target Hook} bool TARGET_STACK_CLASH_PROTECTION_FINAL_DYNAMIC_PROBE (rtx @var{residual})
001c85
+Some targets make optimistic assumptions about the state of stack probing when they emit their prologues.  On such targets a probe into the end of any dynamically allocated space is likely required for safety against stack clash style attacks.  Define this variable to return nonzero if such a probe is required or zero otherwise.  You need not define this macro if it would always have the value zero.
001c85
+@end deftypefn
001c85
+
001c85
 @need 2000
001c85
 @node Frame Registers
001c85
 @subsection Registers That Address the Stack Frame
001c85
diff --git a/gcc/doc/tm.texi.in b/gcc/doc/tm.texi.in
001c85
index 7d0b3c73b2f..6707ca87236 100644
001c85
--- a/gcc/doc/tm.texi.in
001c85
+++ b/gcc/doc/tm.texi.in
001c85
@@ -3539,6 +3539,8 @@ GCC computed the default from the values of the above macros and you will
001c85
 normally not need to override that default.
001c85
 @end defmac
001c85
 
001c85
+@hook TARGET_STACK_CLASH_PROTECTION_FINAL_DYNAMIC_PROBE
001c85
+
001c85
 @need 2000
001c85
 @node Frame Registers
001c85
 @subsection Registers That Address the Stack Frame
001c85
diff --git a/gcc/explow.c b/gcc/explow.c
001c85
index 7da8bc75f19..2526e8513b7 100644
001c85
--- a/gcc/explow.c
001c85
+++ b/gcc/explow.c
001c85
@@ -40,8 +40,11 @@ along with GCC; see the file COPYING3.  If not see
001c85
 #include "target.h"
001c85
 #include "common/common-target.h"
001c85
 #include "output.h"
001c85
+#include "params.h"
001c85
+#include "dumpfile.h"
001c85
 
001c85
 static rtx break_out_memory_refs (rtx);
001c85
+static void anti_adjust_stack_and_probe_stack_clash (rtx);
001c85
 
001c85
 
001c85
 /* Truncate and perhaps sign-extend C as appropriate for MODE.  */
001c85
@@ -1140,6 +1143,29 @@ update_nonlocal_goto_save_area (void)
001c85
   emit_stack_save (SAVE_NONLOCAL, &r_save);
001c85
 }
001c85
 
001c85
+/* Return the number of bytes to "protect" on the stack for -fstack-check.
001c85
+
001c85
+   "protect" in the context of -fstack-check means how many bytes we
001c85
+   should always ensure are available on the stack.  More importantly
001c85
+   this is how many bytes are skipped when probing the stack.
001c85
+
001c85
+   On some targets we want to reuse the -fstack-check prologue support
001c85
+   to give a degree of protection against stack clashing style attacks.
001c85
+
001c85
+   In that scenario we do not want to skip bytes before probing as that
001c85
+   would render the stack clash protections useless.
001c85
+
001c85
+   So we never use STACK_CHECK_PROTECT directly.  Instead we indirect though
001c85
+   this helper which allows us to provide different values for
001c85
+   -fstack-check and -fstack-clash-protection.  */
001c85
+HOST_WIDE_INT
001c85
+get_stack_check_protect (void)
001c85
+{
001c85
+  if (flag_stack_clash_protection)
001c85
+    return 0;
001c85
+ return STACK_CHECK_PROTECT;
001c85
+}
001c85
+
001c85
 /* Return an rtx representing the address of an area of memory dynamically
001c85
    pushed on the stack.
001c85
 
001c85
@@ -1393,7 +1419,7 @@ allocate_dynamic_stack_space (rtx size, unsigned size_align,
001c85
     probe_stack_range (STACK_OLD_CHECK_PROTECT + STACK_CHECK_MAX_FRAME_SIZE,
001c85
 		       size);
001c85
   else if (flag_stack_check == STATIC_BUILTIN_STACK_CHECK)
001c85
-    probe_stack_range (STACK_CHECK_PROTECT, size);
001c85
+    probe_stack_range (get_stack_check_protect (), size);
001c85
 
001c85
   /* Don't let anti_adjust_stack emit notes.  */
001c85
   suppress_reg_args_size = true;
001c85
@@ -1451,6 +1477,8 @@ allocate_dynamic_stack_space (rtx size, unsigned size_align,
001c85
 
001c85
       if (flag_stack_check && STACK_CHECK_MOVING_SP)
001c85
 	anti_adjust_stack_and_probe (size, false);
001c85
+      else if (flag_stack_clash_protection)
001c85
+	anti_adjust_stack_and_probe_stack_clash (size);
001c85
       else
001c85
 	anti_adjust_stack (size);
001c85
 
001c85
@@ -1712,6 +1740,219 @@ probe_stack_range (HOST_WIDE_INT first, rtx size)
001c85
     }
001c85
 }
001c85
 
001c85
+/* Compute parameters for stack clash probing a dynamic stack
001c85
+   allocation of SIZE bytes.
001c85
+
001c85
+   We compute ROUNDED_SIZE, LAST_ADDR, RESIDUAL and PROBE_INTERVAL.
001c85
+
001c85
+   Additionally we conditionally dump the type of probing that will
001c85
+   be needed given the values computed.  */
001c85
+
001c85
+void
001c85
+compute_stack_clash_protection_loop_data (rtx *rounded_size, rtx *last_addr,
001c85
+					  rtx *residual,
001c85
+					  HOST_WIDE_INT *probe_interval,
001c85
+					  rtx size)
001c85
+{
001c85
+  /* Round SIZE down to STACK_CLASH_PROTECTION_PROBE_INTERVAL */
001c85
+  *probe_interval
001c85
+    = 1 << PARAM_VALUE (PARAM_STACK_CLASH_PROTECTION_PROBE_INTERVAL);
001c85
+  *rounded_size = simplify_gen_binary (AND, Pmode, size,
001c85
+				        GEN_INT (-*probe_interval));
001c85
+
001c85
+  /* Compute the value of the stack pointer for the last iteration.
001c85
+     It's just SP + ROUNDED_SIZE.  */
001c85
+  rtx rounded_size_op = force_operand (*rounded_size, NULL_RTX);
001c85
+  *last_addr = force_operand (gen_rtx_fmt_ee (STACK_GROW_OP, Pmode,
001c85
+					      stack_pointer_rtx,
001c85
+					      rounded_size_op),
001c85
+			      NULL_RTX);
001c85
+
001c85
+  /* Compute any residuals not allocated by the loop above.  Residuals
001c85
+     are just the ROUNDED_SIZE - SIZE.  */
001c85
+  *residual = simplify_gen_binary (MINUS, Pmode, size, *rounded_size);
001c85
+
001c85
+  /* Dump key information to make writing tests easy.  */
001c85
+  if (dump_file)
001c85
+    {
001c85
+      if (*rounded_size == CONST0_RTX (Pmode))
001c85
+	fprintf (dump_file,
001c85
+		 "Stack clash skipped dynamic allocation and probing loop.\n");
001c85
+      else if (GET_CODE (*rounded_size) == CONST_INT
001c85
+	       && INTVAL (*rounded_size) <= 4 * *probe_interval)
001c85
+	fprintf (dump_file,
001c85
+		 "Stack clash dynamic allocation and probing inline.\n");
001c85
+      else if (GET_CODE (*rounded_size) == CONST_INT)
001c85
+	fprintf (dump_file,
001c85
+		 "Stack clash dynamic allocation and probing in "
001c85
+		 "rotated loop.\n");
001c85
+      else
001c85
+	fprintf (dump_file,
001c85
+		 "Stack clash dynamic allocation and probing in loop.\n");
001c85
+
001c85
+      if (*residual != CONST0_RTX (Pmode))
001c85
+	fprintf (dump_file,
001c85
+		 "Stack clash dynamic allocation and probing residuals.\n");
001c85
+      else
001c85
+	fprintf (dump_file,
001c85
+		 "Stack clash skipped dynamic allocation and "
001c85
+		 "probing residuals.\n");
001c85
+    }
001c85
+}
001c85
+
001c85
+/* Emit the start of an allocate/probe loop for stack
001c85
+   clash protection.
001c85
+
001c85
+   LOOP_LAB and END_LAB are returned for use when we emit the
001c85
+   end of the loop.
001c85
+
001c85
+   LAST addr is the value for SP which stops the loop.  */
001c85
+void
001c85
+emit_stack_clash_protection_probe_loop_start (rtx *loop_lab,
001c85
+					      rtx *end_lab,
001c85
+					      rtx last_addr,
001c85
+					      bool rotated)
001c85
+{
001c85
+  /* Essentially we want to emit any setup code, the top of loop
001c85
+     label and the comparison at the top of the loop.  */
001c85
+  *loop_lab = gen_label_rtx ();
001c85
+  *end_lab = gen_label_rtx ();
001c85
+
001c85
+  emit_label (*loop_lab);
001c85
+  if (!rotated)
001c85
+    emit_cmp_and_jump_insns (stack_pointer_rtx, last_addr, EQ, NULL_RTX,
001c85
+			     Pmode, 1, *end_lab);
001c85
+}
001c85
+
001c85
+/* Emit the end of a stack clash probing loop.
001c85
+
001c85
+   This consists of just the jump back to LOOP_LAB and
001c85
+   emitting END_LOOP after the loop.  */
001c85
+
001c85
+void
001c85
+emit_stack_clash_protection_probe_loop_end (rtx loop_lab, rtx end_loop,
001c85
+					    rtx last_addr, bool rotated)
001c85
+{
001c85
+  if (rotated)
001c85
+    emit_cmp_and_jump_insns (stack_pointer_rtx, last_addr, NE, NULL_RTX,
001c85
+			     Pmode, 1, loop_lab);
001c85
+  else
001c85
+    emit_jump (loop_lab);
001c85
+
001c85
+  emit_label (end_loop);
001c85
+
001c85
+}
001c85
+
001c85
+/* Adjust the stack pointer by minus SIZE (an rtx for a number of bytes)
001c85
+   while probing it.  This pushes when SIZE is positive.  SIZE need not
001c85
+   be constant.
001c85
+
001c85
+   This is subtly different than anti_adjust_stack_and_probe to try and
001c85
+   prevent stack-clash attacks
001c85
+
001c85
+     1. It must assume no knowledge of the probing state, any allocation
001c85
+	must probe.
001c85
+
001c85
+	Consider the case of a 1 byte alloca in a loop.  If the sum of the
001c85
+	allocations is large, then this could be used to jump the guard if
001c85
+	probes were not emitted.
001c85
+
001c85
+     2. It never skips probes, whereas anti_adjust_stack_and_probe will
001c85
+	skip probes on the first couple PROBE_INTERVALs on the assumption
001c85
+	they're done elsewhere.
001c85
+
001c85
+     3. It only allocates and probes SIZE bytes, it does not need to
001c85
+	allocate/probe beyond that because this probing style does not
001c85
+	guarantee signal handling capability if the guard is hit.  */
001c85
+
001c85
+static void
001c85
+anti_adjust_stack_and_probe_stack_clash (rtx size)
001c85
+{
001c85
+  /* First ensure SIZE is Pmode.  */
001c85
+  if (GET_MODE (size) != VOIDmode && GET_MODE (size) != Pmode)
001c85
+    size = convert_to_mode (Pmode, size, 1);
001c85
+
001c85
+  /* We can get here with a constant size on some targets.  */
001c85
+  rtx rounded_size, last_addr, residual;
001c85
+  HOST_WIDE_INT probe_interval;
001c85
+  compute_stack_clash_protection_loop_data (&rounded_size, &last_addr,
001c85
+					    &residual, &probe_interval, size);
001c85
+
001c85
+  if (rounded_size != CONST0_RTX (Pmode))
001c85
+    {
001c85
+      if (INTVAL (rounded_size) <= 4 * probe_interval)
001c85
+	{
001c85
+	  for (HOST_WIDE_INT i = 0;
001c85
+	       i < INTVAL (rounded_size);
001c85
+	       i += probe_interval)
001c85
+	    {
001c85
+	      anti_adjust_stack (GEN_INT (probe_interval));
001c85
+
001c85
+	      /* The prologue does not probe residuals.  Thus the offset
001c85
+		 here to probe just beyond what the prologue had already
001c85
+		 allocated.  */
001c85
+	      emit_stack_probe (plus_constant (Pmode, stack_pointer_rtx,
001c85
+					       (probe_interval
001c85
+						- GET_MODE_SIZE (word_mode))));
001c85
+	      emit_insn (gen_blockage ());
001c85
+	    }
001c85
+	}
001c85
+      else
001c85
+	{
001c85
+	  rtx loop_lab, end_loop;
001c85
+	  bool rotate_loop = GET_CODE (rounded_size) == CONST_INT;
001c85
+	  emit_stack_clash_protection_probe_loop_start (&loop_lab, &end_loop,
001c85
+							last_addr, rotate_loop);
001c85
+
001c85
+	  anti_adjust_stack (GEN_INT (probe_interval));
001c85
+
001c85
+	  /* The prologue does not probe residuals.  Thus the offset here
001c85
+	     to probe just beyond what the prologue had already allocated.  */
001c85
+	  emit_stack_probe (plus_constant (Pmode, stack_pointer_rtx,
001c85
+					   (probe_interval
001c85
+					    - GET_MODE_SIZE (word_mode))));
001c85
+
001c85
+	  emit_stack_clash_protection_probe_loop_end (loop_lab, end_loop,
001c85
+						      last_addr, rotate_loop);
001c85
+	  emit_insn (gen_blockage ());
001c85
+	}
001c85
+    }
001c85
+
001c85
+  if (residual != CONST0_RTX (Pmode))
001c85
+    {
001c85
+      rtx x = force_reg (Pmode, plus_constant (Pmode, residual,
001c85
+					       -GET_MODE_SIZE (word_mode)));
001c85
+      anti_adjust_stack (residual);
001c85
+      emit_stack_probe (gen_rtx_PLUS (Pmode, stack_pointer_rtx, x));
001c85
+      emit_insn (gen_blockage ());
001c85
+    }
001c85
+
001c85
+  /* Some targets make optimistic assumptions in their prologues about
001c85
+     how the caller may have probed the stack.  Make sure we honor
001c85
+     those assumptions when needed.  */
001c85
+  if (size != CONST0_RTX (Pmode)
001c85
+      && targetm.stack_clash_protection_final_dynamic_probe (residual))
001c85
+    {
001c85
+      /* Ideally we would just probe at *sp.  However, if SIZE is not
001c85
+	 a compile-time constant, but is zero at runtime, then *sp
001c85
+	 might hold live data.  So probe at *sp if we know that
001c85
+	 an allocation was made, otherwise probe into the red zone
001c85
+	 which is obviously undesirable.  */
001c85
+      if (GET_CODE (size) == CONST_INT)
001c85
+	{
001c85
+	  emit_stack_probe (stack_pointer_rtx);
001c85
+	  emit_insn (gen_blockage ());
001c85
+	}
001c85
+      else
001c85
+	{
001c85
+	  emit_stack_probe (plus_constant (Pmode, stack_pointer_rtx,
001c85
+					   -GET_MODE_SIZE (word_mode)));
001c85
+	  emit_insn (gen_blockage ());
001c85
+	}
001c85
+    }
001c85
+}
001c85
+
001c85
+
001c85
 /* Adjust the stack pointer by minus SIZE (an rtx for a number of bytes)
001c85
    while probing it.  This pushes when SIZE is positive.  SIZE need not
001c85
    be constant.  If ADJUST_BACK is true, adjust back the stack pointer
001c85
diff --git a/gcc/rtl.h b/gcc/rtl.h
001c85
index 91f3387c701..ab8ec27418d 100644
001c85
--- a/gcc/rtl.h
001c85
+++ b/gcc/rtl.h
001c85
@@ -1756,6 +1756,17 @@ extern int currently_expanding_to_rtl;
001c85
 /* In explow.c */
001c85
 extern HOST_WIDE_INT trunc_int_for_mode	(HOST_WIDE_INT, enum machine_mode);
001c85
 extern rtx plus_constant (enum machine_mode, rtx, HOST_WIDE_INT);
001c85
+extern HOST_WIDE_INT get_stack_check_protect (void);
001c85
+
001c85
+/* Support for building allocation/probing loops for stack-clash
001c85
+   protection of dyamically allocated stack space.  */
001c85
+extern void compute_stack_clash_protection_loop_data (rtx *, rtx *, rtx *,
001c85
+						      HOST_WIDE_INT *, rtx);
001c85
+extern void emit_stack_clash_protection_probe_loop_start (rtx *, rtx *,
001c85
+							  rtx, bool);
001c85
+extern void emit_stack_clash_protection_probe_loop_end (rtx, rtx,
001c85
+							rtx, bool);
001c85
+
001c85
 
001c85
 /* In rtl.c */
001c85
 extern rtx rtx_alloc_stat (RTX_CODE MEM_STAT_DECL);
001c85
diff --git a/gcc/target.def b/gcc/target.def
001c85
index 4d6081c3121..eb2bd46f7a1 100644
001c85
--- a/gcc/target.def
001c85
+++ b/gcc/target.def
001c85
@@ -2580,6 +2580,13 @@ DEFHOOK
001c85
  void, (void),
001c85
  hook_void_void)
001c85
 
001c85
+DEFHOOK
001c85
+(stack_clash_protection_final_dynamic_probe,
001c85
+ "Some targets make optimistic assumptions about the state of stack probing when they emit their prologues.  On such targets a probe into the end of any dynamically allocated space is likely required for safety against stack clash style attacks.  Define this variable to return nonzero if such a probe is required or zero otherwise.  You need not define this macro if it would always have the value zero.",
001c85
+ bool, (rtx residual),
001c85
+ default_stack_clash_protection_final_dynamic_probe)
001c85
+
001c85
+
001c85
 /* Functions specific to the C family of frontends.  */
001c85
 #undef HOOK_PREFIX
001c85
 #define HOOK_PREFIX "TARGET_C_"
001c85
diff --git a/gcc/targhooks.c b/gcc/targhooks.c
001c85
index f6aa9907225..be23875538d 100644
001c85
--- a/gcc/targhooks.c
001c85
+++ b/gcc/targhooks.c
001c85
@@ -1557,4 +1557,10 @@ default_canonicalize_comparison (int *, rtx *, rtx *, bool)
001c85
 {
001c85
 }
001c85
 
001c85
+bool
001c85
+default_stack_clash_protection_final_dynamic_probe (rtx residual ATTRIBUTE_UNUSED)
001c85
+{
001c85
+  return 0;
001c85
+}
001c85
+
001c85
 #include "gt-targhooks.h"
001c85
diff --git a/gcc/targhooks.h b/gcc/targhooks.h
001c85
index b64274d3ff9..4acf33fae08 100644
001c85
--- a/gcc/targhooks.h
001c85
+++ b/gcc/targhooks.h
001c85
@@ -195,3 +195,4 @@ extern const char *default_pch_valid_p (const void *, size_t);
001c85
 extern void default_asm_output_ident_directive (const char*);
001c85
 
001c85
 extern bool default_member_type_forces_blk (const_tree, enum machine_mode);
001c85
+extern bool default_stack_clash_protection_final_dynamic_probe (rtx);
001c85
diff --git a/gcc/testsuite/gcc.dg/stack-check-3.c b/gcc/testsuite/gcc.dg/stack-check-3.c
001c85
new file mode 100644
001c85
index 00000000000..58fb65649ee
001c85
--- /dev/null
001c85
+++ b/gcc/testsuite/gcc.dg/stack-check-3.c
001c85
@@ -0,0 +1,86 @@
001c85
+/* The goal here is to ensure that dynamic allocations via vlas or
001c85
+   alloca calls receive probing.
001c85
+
001c85
+   Scanning the RTL or assembly code seems like insanity here as does
001c85
+   checking for particular allocation sizes and probe offsets.  For
001c85
+   now we just verify that there's an allocation + probe loop and
001c85
+   residual allocation + probe for f?.  */
001c85
+
001c85
+/* { dg-do compile } */
001c85
+/* { dg-options "-O2 -fstack-clash-protection -fdump-rtl-expand -fno-optimize-sibling-calls --param stack-clash-protection-probe-interval=4096 --param stack-clash-protection-guard-size=4096" } */
001c85
+/* { dg-require-effective-target supports_stack_clash_protection } */
001c85
+
001c85
+__attribute__((noinline, noclone)) void
001c85
+foo (char *p)
001c85
+{
001c85
+  asm volatile ("" : : "r" (p) : "memory");
001c85
+}
001c85
+
001c85
+/* Simple VLA, no other locals. */
001c85
+__attribute__((noinline, noclone)) void
001c85
+f0 (int x)
001c85
+{
001c85
+  char vla[x];
001c85
+  foo (vla);
001c85
+}
001c85
+
001c85
+/* Simple VLA, small local frame.  */
001c85
+__attribute__((noinline, noclone)) void
001c85
+f1 (int x)
001c85
+{
001c85
+  char locals[128];
001c85
+  char vla[x];
001c85
+  foo (vla);
001c85
+}
001c85
+
001c85
+/* Small constant alloca, no other locals. */
001c85
+__attribute__((noinline, noclone)) void
001c85
+f2 (int x)
001c85
+{
001c85
+  char *vla = __builtin_alloca (128);
001c85
+  foo (vla);
001c85
+}
001c85
+
001c85
+/* Big constant alloca, small local frame.  */
001c85
+__attribute__((noinline, noclone)) void
001c85
+f3 (int x)
001c85
+{
001c85
+  char locals[128];
001c85
+  char *vla = __builtin_alloca (16384);
001c85
+  foo (vla);
001c85
+}
001c85
+
001c85
+/* Big constant alloca, small local frame.  */
001c85
+__attribute__((noinline, noclone)) void
001c85
+f3a (int x)
001c85
+{
001c85
+  char locals[128];
001c85
+  char *vla = __builtin_alloca (32768);
001c85
+  foo (vla);
001c85
+}
001c85
+
001c85
+/* Nonconstant alloca, no other locals. */
001c85
+__attribute__((noinline, noclone)) void
001c85
+f4 (int x)
001c85
+{
001c85
+  char *vla = __builtin_alloca (x);
001c85
+  foo (vla);
001c85
+}
001c85
+
001c85
+/* Nonconstant alloca, small local frame.  */
001c85
+__attribute__((noinline, noclone)) void
001c85
+f5 (int x)
001c85
+{
001c85
+  char locals[128];
001c85
+  char *vla = __builtin_alloca (x);
001c85
+  foo (vla);
001c85
+}
001c85
+
001c85
+/* { dg-final { scan-rtl-dump-times "allocation and probing residuals" 7 "expand" } } */
001c85
+
001c85
+
001c85
+/* { dg-final { scan-rtl-dump-times "allocation and probing in loop" 7 "expand" { target callee_realigns_stack } } } */
001c85
+/* { dg-final { scan-rtl-dump-times "allocation and probing in loop" 4 "expand" { target { ! callee_realigns_stack } } } } */
001c85
+/* { dg-final { scan-rtl-dump-times "allocation and probing in rotated loop" 1 "expand" { target { ! callee_realigns_stack } } } } */
001c85
+/* { dg-final { scan-rtl-dump-times "allocation and probing inline" 1 "expand" { target { ! callee_realigns_stack } } } } */
001c85
+/* { dg-final { scan-rtl-dump-times "skipped dynamic allocation and probing loop" 1 "expand" { target { ! callee_realigns_stack } } } } */