2828ab
commit bfdb731438206b0f70fe7afa890681155c30b419
2828ab
Author: Stefan Liebler <stli@linux.ibm.com>
2828ab
Date:   Wed Nov 27 12:35:40 2019 +0100
2828ab
2828ab
    S390: Fix handling of needles crossing a page in strstr z15 ifunc-variant. [BZ #25226]
2828ab
    
2828ab
    If the specified needle crosses a page-boundary, the s390-z15 ifunc variant of
2828ab
    strstr truncates the needle which results in invalid results.
2828ab
    
2828ab
    This is fixed by loading the needle beyond the page boundary to v18 instead of v16.
2828ab
    The bug is sometimes observable in test-strstr.c in check1 and check2 as the
2828ab
    haystack and needle is stored on stack. Thus the needle can be on a page boundary.
2828ab
    
2828ab
    check2 is now extended to test haystack / needles located on stack, at end of page
2828ab
    and on two pages.
2828ab
    
2828ab
    This bug was introduced with commit 6f47401bd5fc71209219779a0426170a9a7395b0
2828ab
    ("S390: Add arch13 strstr ifunc variant.") and is already released in glibc 2.30.
2828ab
2828ab
diff --git a/string/test-strstr.c b/string/test-strstr.c
2828ab
index 5861b01b73e4c315..e9e14c1ee605516e 100644
2828ab
--- a/string/test-strstr.c
2828ab
+++ b/string/test-strstr.c
2828ab
@@ -138,16 +138,45 @@ check1 (void)
2828ab
 static void
2828ab
 check2 (void)
2828ab
 {
2828ab
-  const char s1[] = ", enable_static, \0, enable_shared, ";
2828ab
+  const char s1_stack[] = ", enable_static, \0, enable_shared, ";
2828ab
+  const size_t s1_byte_count = 18;
2828ab
+  const char *s2_stack = &(s1_stack[s1_byte_count]);
2828ab
+  const size_t s2_byte_count = 18;
2828ab
   char *exp_result;
2828ab
-  char *s2 = (void *) buf1 + page_size - 18;
2828ab
+  const size_t page_size_real = getpagesize ();
2828ab
 
2828ab
-  strcpy (s2, s1);
2828ab
-  exp_result = stupid_strstr (s1, s1 + 18);
2828ab
+  /* Haystack at end of page.  The following page is protected.  */
2828ab
+  char *s1_page_end = (void *) buf1 + page_size - s1_byte_count;
2828ab
+  strcpy (s1_page_end, s1_stack);
2828ab
+
2828ab
+  /* Haystack which crosses a page boundary.
2828ab
+     Note: page_size is at least 2 * getpagesize.  See test_init.  */
2828ab
+  char *s1_page_cross = (void *) buf1 + page_size_real - 8;
2828ab
+  strcpy (s1_page_cross, s1_stack);
2828ab
+
2828ab
+  /* Needle at end of page.  The following page is protected.  */
2828ab
+  char *s2_page_end = (void *) buf2 + page_size - s2_byte_count;
2828ab
+  strcpy (s2_page_end, s2_stack);
2828ab
+
2828ab
+  /* Needle which crosses a page boundary.
2828ab
+     Note: page_size is at least 2 * getpagesize.  See test_init.  */
2828ab
+  char *s2_page_cross = (void *) buf2 + page_size_real - 8;
2828ab
+  strcpy (s2_page_cross, s2_stack);
2828ab
+
2828ab
+  exp_result = stupid_strstr (s1_stack, s2_stack);
2828ab
   FOR_EACH_IMPL (impl, 0)
2828ab
     {
2828ab
-      check_result (impl, s1, s1 + 18, exp_result);
2828ab
-      check_result (impl, s2, s1 + 18, exp_result);
2828ab
+      check_result (impl, s1_stack, s2_stack, exp_result);
2828ab
+      check_result (impl, s1_stack, s2_page_end, exp_result);
2828ab
+      check_result (impl, s1_stack, s2_page_cross, exp_result);
2828ab
+
2828ab
+      check_result (impl, s1_page_end, s2_stack, exp_result);
2828ab
+      check_result (impl, s1_page_end, s2_page_end, exp_result);
2828ab
+      check_result (impl, s1_page_end, s2_page_cross, exp_result);
2828ab
+
2828ab
+      check_result (impl, s1_page_cross, s2_stack, exp_result);
2828ab
+      check_result (impl, s1_page_cross, s2_page_end, exp_result);
2828ab
+      check_result (impl, s1_page_cross, s2_page_cross, exp_result);
2828ab
     }
2828ab
 }
2828ab
 
2828ab
diff --git a/sysdeps/s390/strstr-arch13.S b/sysdeps/s390/strstr-arch13.S
2828ab
index 929b026adfeba740..faa969849e09c2e1 100644
2828ab
--- a/sysdeps/s390/strstr-arch13.S
2828ab
+++ b/sysdeps/s390/strstr-arch13.S
2828ab
@@ -164,7 +164,7 @@ ENTRY(STRSTR_ARCH13)
2828ab
 	vfenezb	%v19,%v18,%v18	/* Search zero in loaded needle bytes.  */
2828ab
 	veclb	%v19,%v21	/* Zero index <= max loaded byte index?  */
2828ab
 	jle	.Lneedle_loaded	/* -> v18 contains full needle.  */
2828ab
-	vl	%v16,0(%r3)	/* Load needle beyond page boundary.  */
2828ab
+	vl	%v18,0(%r3)	/* Load needle beyond page boundary.  */
2828ab
 	vfenezb	%v19,%v18,%v18
2828ab
 	j	.Lneedle_loaded
2828ab
 END(STRSTR_ARCH13)