bdc76f
commit cf3ccc31a3d76a9b4db410d3087055c3aff2b71b
bdc76f
Author: Stefan Liebler <stli@linux.ibm.com>
bdc76f
Date:   Tue Dec 18 13:57:22 2018 +0100
bdc76f
bdc76f
    S390: Refactor wcschr ifunc handling.
bdc76f
    
bdc76f
    The ifunc handling for wcschr is adjusted in order to omit ifunc
bdc76f
    if the minimum architecture level already supports newer CPUs by default.
bdc76f
    Unfortunately the c ifunc variant can't be omitted at all as it is used
bdc76f
    by the z13 ifunc variant as fallback if the pointers are not 4-byte aligned.
bdc76f
    Glibc internal calls will use the "newer" ifunc variant.
bdc76f
    
bdc76f
    ChangeLog:
bdc76f
    
bdc76f
            * sysdeps/s390/multiarch/Makefile
bdc76f
            (sysdep_routines): Remove wcschr variants.
bdc76f
            * sysdeps/s390/Makefile (sysdep_routines): Add wcschr variants.
bdc76f
            * sysdeps/s390/multiarch/ifunc-impl-list.c
bdc76f
            (__libc_ifunc_impl_list): Refactor ifunc handling for wcschr.
bdc76f
            * sysdeps/s390/multiarch/wcschr-c.c: Move to ...
bdc76f
            * sysdeps/s390/wcschr-c.c: ... here and adjust ifunc handling.
bdc76f
            * sysdeps/s390/multiarch/wcschr-vx.S: Move to ...
bdc76f
            * sysdeps/s390/wcschr-vx.S: ... here and adjust ifunc handling.
bdc76f
            * sysdeps/s390/multiarch/wcschr.c: Move to ...
bdc76f
            * sysdeps/s390/wcschr.c: ... here and adjust ifunc handling.
bdc76f
            * sysdeps/s390/ifunc-wcschr.h: New file.
bdc76f
bdc76f
diff --git a/sysdeps/s390/Makefile b/sysdeps/s390/Makefile
bdc76f
index 9146b32a939fd5bd..91ee84a54b713e4a 100644
bdc76f
--- a/sysdeps/s390/Makefile
bdc76f
+++ b/sysdeps/s390/Makefile
bdc76f
@@ -69,5 +69,6 @@ sysdep_routines += wcslen wcslen-vx wcslen-c \
bdc76f
 		   wcscat wcscat-vx wcscat-c \
bdc76f
 		   wcsncat wcsncat-vx wcsncat-c \
bdc76f
 		   wcscmp wcscmp-vx wcscmp-c \
bdc76f
-		   wcsncmp wcsncmp-vx wcsncmp-c
bdc76f
+		   wcsncmp wcsncmp-vx wcsncmp-c \
bdc76f
+		   wcschr wcschr-vx wcschr-c
bdc76f
 endif
bdc76f
diff --git a/sysdeps/s390/ifunc-wcschr.h b/sysdeps/s390/ifunc-wcschr.h
bdc76f
new file mode 100644
bdc76f
index 0000000000000000..2fe9110f7c9564d2
bdc76f
--- /dev/null
bdc76f
+++ b/sysdeps/s390/ifunc-wcschr.h
bdc76f
@@ -0,0 +1,53 @@
bdc76f
+/* wcschr variant information on S/390 version.
bdc76f
+   Copyright (C) 2018 Free Software Foundation, Inc.
bdc76f
+   This file is part of the GNU C Library.
bdc76f
+
bdc76f
+   The GNU C Library is free software; you can redistribute it and/or
bdc76f
+   modify it under the terms of the GNU Lesser General Public
bdc76f
+   License as published by the Free Software Foundation; either
bdc76f
+   version 2.1 of the License, or (at your option) any later version.
bdc76f
+
bdc76f
+   The GNU C Library is distributed in the hope that it will be useful,
bdc76f
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
bdc76f
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
bdc76f
+   Lesser General Public License for more details.
bdc76f
+
bdc76f
+   You should have received a copy of the GNU Lesser General Public
bdc76f
+   License along with the GNU C Library; if not, see
bdc76f
+   <http://www.gnu.org/licenses/>.  */
bdc76f
+
bdc76f
+#if defined USE_MULTIARCH && IS_IN (libc)		\
bdc76f
+  && ! defined HAVE_S390_MIN_Z13_ZARCH_ASM_SUPPORT
bdc76f
+# define HAVE_WCSCHR_IFUNC	1
bdc76f
+#else
bdc76f
+# define HAVE_WCSCHR_IFUNC	0
bdc76f
+#endif
bdc76f
+
bdc76f
+#ifdef HAVE_S390_VX_ASM_SUPPORT
bdc76f
+# define HAVE_WCSCHR_IFUNC_AND_VX_SUPPORT HAVE_WCSCHR_IFUNC
bdc76f
+#else
bdc76f
+# define HAVE_WCSCHR_IFUNC_AND_VX_SUPPORT 0
bdc76f
+#endif
bdc76f
+
bdc76f
+#if defined HAVE_S390_MIN_Z13_ZARCH_ASM_SUPPORT
bdc76f
+# define WCSCHR_DEFAULT		WCSCHR_Z13
bdc76f
+/* The z13 ifunc variant is using the common code variant as fallback!  */
bdc76f
+# define HAVE_WCSCHR_C		1
bdc76f
+# define HAVE_WCSCHR_Z13	1
bdc76f
+#else
bdc76f
+# define WCSCHR_DEFAULT		WCSCHR_C
bdc76f
+# define HAVE_WCSCHR_C		1
bdc76f
+# define HAVE_WCSCHR_Z13	HAVE_WCSCHR_IFUNC_AND_VX_SUPPORT
bdc76f
+#endif
bdc76f
+
bdc76f
+#if HAVE_WCSCHR_C
bdc76f
+# define WCSCHR_C		__wcschr_c
bdc76f
+#else
bdc76f
+# define WCSCHR_C		NULL
bdc76f
+#endif
bdc76f
+
bdc76f
+#if HAVE_WCSCHR_Z13
bdc76f
+# define WCSCHR_Z13		__wcschr_vx
bdc76f
+#else
bdc76f
+# define WCSCHR_Z13		NULL
bdc76f
+#endif
bdc76f
diff --git a/sysdeps/s390/multiarch/Makefile b/sysdeps/s390/multiarch/Makefile
bdc76f
index d1740fa8e4f5faa8..b282613b4705bb14 100644
bdc76f
--- a/sysdeps/s390/multiarch/Makefile
bdc76f
+++ b/sysdeps/s390/multiarch/Makefile
bdc76f
@@ -1,6 +1,5 @@
bdc76f
 ifeq ($(subdir),wcsmbs)
bdc76f
-sysdep_routines += wcschr wcschr-vx wcschr-c \
bdc76f
-		   wcschrnul wcschrnul-vx wcschrnul-c \
bdc76f
+sysdep_routines += wcschrnul wcschrnul-vx wcschrnul-c \
bdc76f
 		   wcsrchr wcsrchr-vx wcsrchr-c \
bdc76f
 		   wcsspn wcsspn-vx wcsspn-c \
bdc76f
 		   wcspbrk wcspbrk-vx wcspbrk-c \
bdc76f
diff --git a/sysdeps/s390/multiarch/ifunc-impl-list.c b/sysdeps/s390/multiarch/ifunc-impl-list.c
bdc76f
index 8c9e788ae5962e2a..c69165465dc97111 100644
bdc76f
--- a/sysdeps/s390/multiarch/ifunc-impl-list.c
bdc76f
+++ b/sysdeps/s390/multiarch/ifunc-impl-list.c
bdc76f
@@ -56,6 +56,7 @@
bdc76f
 #include <ifunc-wcsncat.h>
bdc76f
 #include <ifunc-wcscmp.h>
bdc76f
 #include <ifunc-wcsncmp.h>
bdc76f
+#include <ifunc-wcschr.h>
bdc76f
 
bdc76f
 /* Maximum number of IFUNC implementations.  */
bdc76f
 #define MAX_IFUNC	3
bdc76f
@@ -554,6 +555,18 @@ __libc_ifunc_impl_list (const char *name, struct libc_ifunc_impl *array,
bdc76f
 		)
bdc76f
 #endif /* HAVE_WCSNCMP_IFUNC  */
bdc76f
 
bdc76f
+#if HAVE_WCSCHR_IFUNC
bdc76f
+    IFUNC_IMPL (i, name, wcschr,
bdc76f
+# if HAVE_WCSCHR_Z13
bdc76f
+		IFUNC_IMPL_ADD (array, i, wcschr,
bdc76f
+				dl_hwcap & HWCAP_S390_VX, WCSCHR_Z13)
bdc76f
+# endif
bdc76f
+# if HAVE_WCSCHR_C
bdc76f
+		IFUNC_IMPL_ADD (array, i, wcschr, 1, WCSCHR_C)
bdc76f
+# endif
bdc76f
+		)
bdc76f
+#endif /* HAVE_WCSCHR_IFUNC  */
bdc76f
+
bdc76f
 #ifdef HAVE_S390_VX_ASM_SUPPORT
bdc76f
 
bdc76f
 # define IFUNC_VX_IMPL(FUNC)						\
bdc76f
@@ -562,8 +575,6 @@ __libc_ifunc_impl_list (const char *name, struct libc_ifunc_impl *array,
bdc76f
 			      __##FUNC##_vx)				\
bdc76f
 	      IFUNC_IMPL_ADD (array, i, FUNC, 1, __##FUNC##_c))
bdc76f
 
bdc76f
-  IFUNC_VX_IMPL (wcschr);
bdc76f
-
bdc76f
   IFUNC_VX_IMPL (wcschrnul);
bdc76f
 
bdc76f
   IFUNC_VX_IMPL (wcsrchr);
bdc76f
diff --git a/sysdeps/s390/multiarch/wcschr-c.c b/sysdeps/s390/wcschr-c.c
bdc76f
similarity index 61%
bdc76f
rename from sysdeps/s390/multiarch/wcschr-c.c
bdc76f
rename to sysdeps/s390/wcschr-c.c
bdc76f
index 8d6679c7f2f89864..4908492a0a72ed28 100644
bdc76f
--- a/sysdeps/s390/multiarch/wcschr-c.c
bdc76f
+++ b/sysdeps/s390/wcschr-c.c
bdc76f
@@ -16,22 +16,29 @@
bdc76f
    License along with the GNU C Library; if not, see
bdc76f
    <http://www.gnu.org/licenses/>.  */
bdc76f
 
bdc76f
-#if defined HAVE_S390_VX_ASM_SUPPORT && IS_IN (libc)
bdc76f
-# define WCSCHR  __wcschr_c
bdc76f
-
bdc76f
-# include <wchar.h>
bdc76f
-extern __typeof (__wcschr) __wcschr_c;
bdc76f
-# undef weak_alias
bdc76f
-# define weak_alias(name, alias)
bdc76f
-# ifdef SHARED
bdc76f
-#  undef libc_hidden_def
bdc76f
-#  define libc_hidden_def(name)					\
bdc76f
-  __hidden_ver1 (__wcschr_c, __GI_wcschr, __wcschr_c);		\
bdc76f
-  strong_alias (__wcschr_c, __wcschr_c_1);			\
bdc76f
+#include <ifunc-wcschr.h>
bdc76f
+
bdc76f
+#if HAVE_WCSCHR_C
bdc76f
+# if HAVE_WCSCHR_IFUNC || HAVE_WCSCHR_Z13
bdc76f
+#  define WCSCHR WCSCHR_C
bdc76f
+
bdc76f
+#  undef weak_alias
bdc76f
+#  define weak_alias(name, alias)
bdc76f
+
bdc76f
+#  if defined SHARED && IS_IN (libc)
bdc76f
+#   undef libc_hidden_weak
bdc76f
+#   define libc_hidden_weak(name)
bdc76f
+#   undef libc_hidden_def
bdc76f
+#   if ! defined HAVE_S390_MIN_Z13_ZARCH_ASM_SUPPORT
bdc76f
+#    define libc_hidden_def(name)					\
bdc76f
+  __hidden_ver1 (__wcschr_c, __GI_wcschr, __wcschr_c)  __attribute__((weak)); \
bdc76f
+  strong_alias (__wcschr_c, __wcschr_c_1);				\
bdc76f
   __hidden_ver1 (__wcschr_c_1, __GI___wcschr, __wcschr_c_1);
bdc76f
-#  undef libc_hidden_weak
bdc76f
-#  define libc_hidden_weak(name)
bdc76f
-# endif /* SHARED */
bdc76f
+#   else
bdc76f
+#    define libc_hidden_def(name)
bdc76f
+#   endif
bdc76f
+#  endif
bdc76f
+# endif
bdc76f
 
bdc76f
 # include <wcsmbs/wcschr.c>
bdc76f
-#endif /* HAVE_S390_VX_ASM_SUPPORT && IS_IN (libc) */
bdc76f
+#endif
bdc76f
diff --git a/sysdeps/s390/multiarch/wcschr-vx.S b/sysdeps/s390/wcschr-vx.S
bdc76f
similarity index 88%
bdc76f
rename from sysdeps/s390/multiarch/wcschr-vx.S
bdc76f
rename to sysdeps/s390/wcschr-vx.S
bdc76f
index 94e5df7f365aa361..dd24998390c7e2e6 100644
bdc76f
--- a/sysdeps/s390/multiarch/wcschr-vx.S
bdc76f
+++ b/sysdeps/s390/wcschr-vx.S
bdc76f
@@ -16,7 +16,8 @@
bdc76f
    License along with the GNU C Library; if not, see
bdc76f
    <http://www.gnu.org/licenses/>.  */
bdc76f
 
bdc76f
-#if defined HAVE_S390_VX_ASM_SUPPORT && IS_IN (libc)
bdc76f
+#include <ifunc-wcschr.h>
bdc76f
+#if HAVE_WCSCHR_Z13
bdc76f
 
bdc76f
 # include "sysdep.h"
bdc76f
 # include "asm-syntax.h"
bdc76f
@@ -36,7 +37,7 @@
bdc76f
    -v17=index of unequal
bdc76f
    -v18=replicated c
bdc76f
 */
bdc76f
-ENTRY(__wcschr_vx)
bdc76f
+ENTRY(WCSCHR_Z13)
bdc76f
 	.machine "z13"
bdc76f
 	.machinemode "zarch_nohighgprs"
bdc76f
 
bdc76f
@@ -98,6 +99,17 @@ ENTRY(__wcschr_vx)
bdc76f
 	lghi	%r2,0		/* Return null if character not found.  */
bdc76f
 	br	%r14
bdc76f
 .Lfallback:
bdc76f
-	jg	__wcschr_c
bdc76f
-END(__wcschr_vx)
bdc76f
-#endif /* HAVE_S390_VX_ASM_SUPPORT && IS_IN (libc) */
bdc76f
+	jg	WCSCHR_C
bdc76f
+END(WCSCHR_Z13)
bdc76f
+
bdc76f
+# if ! HAVE_WCSCHR_IFUNC
bdc76f
+strong_alias (WCSCHR_Z13, __wcschr)
bdc76f
+weak_alias (__wcschr, wcschr)
bdc76f
+# endif
bdc76f
+
bdc76f
+# if defined HAVE_S390_MIN_Z13_ZARCH_ASM_SUPPORT \
bdc76f
+	&& defined SHARED && IS_IN (libc)
bdc76f
+strong_alias (WCSCHR_Z13, __GI___wcschr)
bdc76f
+weak_alias (WCSCHR_Z13, __GI_wcschr)
bdc76f
+# endif
bdc76f
+#endif
bdc76f
diff --git a/sysdeps/s390/multiarch/wcschr.c b/sysdeps/s390/wcschr.c
bdc76f
similarity index 71%
bdc76f
rename from sysdeps/s390/multiarch/wcschr.c
bdc76f
rename to sysdeps/s390/wcschr.c
bdc76f
index f44138f771f9f9cb..9923864ff8f5ef1f 100644
bdc76f
--- a/sysdeps/s390/multiarch/wcschr.c
bdc76f
+++ b/sysdeps/s390/wcschr.c
bdc76f
@@ -16,7 +16,9 @@
bdc76f
    License along with the GNU C Library; if not, see
bdc76f
    <http://www.gnu.org/licenses/>.  */
bdc76f
 
bdc76f
-#if defined HAVE_S390_VX_ASM_SUPPORT && IS_IN (libc)
bdc76f
+#include <ifunc-wcschr.h>
bdc76f
+
bdc76f
+#if HAVE_WCSCHR_IFUNC
bdc76f
 # define wcschr __redirect_wcschr
bdc76f
 # define __wcschr __redirect___wcschr
bdc76f
 # include <wchar.h>
bdc76f
@@ -24,9 +26,18 @@
bdc76f
 # undef __wcschr
bdc76f
 # include <ifunc-resolve.h>
bdc76f
 
bdc76f
-s390_vx_libc_ifunc_redirected (__redirect___wcschr, __wcschr)
bdc76f
-weak_alias (__wcschr, wcschr)
bdc76f
+# if HAVE_WCSCHR_C
bdc76f
+extern __typeof (__redirect___wcschr) WCSCHR_C attribute_hidden;
bdc76f
+# endif
bdc76f
 
bdc76f
-#else
bdc76f
-# include <wcsmbs/wcschr.c>
bdc76f
-#endif /* !(defined HAVE_S390_VX_ASM_SUPPORT && IS_IN (libc)) */
bdc76f
+# if HAVE_WCSCHR_Z13
bdc76f
+extern __typeof (__redirect___wcschr) WCSCHR_Z13 attribute_hidden;
bdc76f
+# endif
bdc76f
+
bdc76f
+s390_libc_ifunc_expr (__redirect___wcschr, __wcschr,
bdc76f
+		      (HAVE_WCSCHR_Z13 && (hwcap & HWCAP_S390_VX))
bdc76f
+		      ? WCSCHR_Z13
bdc76f
+		      : WCSCHR_DEFAULT
bdc76f
+		      )
bdc76f
+weak_alias (__wcschr, wcschr)
bdc76f
+#endif