bdc76f
commit 8507e831907ff46d06382fe453c6832db2594e0b
bdc76f
Author: Stefan Liebler <stli@linux.ibm.com>
bdc76f
Date:   Tue Dec 18 13:57:23 2018 +0100
bdc76f
bdc76f
    S390: Refactor wcsspn ifunc handling.
bdc76f
    
bdc76f
    The ifunc handling for wcsspn 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 wcsspn variants.
bdc76f
            * sysdeps/s390/Makefile (sysdep_routines): Add wcsspn variants.
bdc76f
            * sysdeps/s390/multiarch/ifunc-impl-list.c
bdc76f
            (__libc_ifunc_impl_list): Refactor ifunc handling for wcsspn.
bdc76f
            * sysdeps/s390/multiarch/wcsspn-c.c: Move to ...
bdc76f
            * sysdeps/s390/wcsspn-c.c: ... here and adjust ifunc handling.
bdc76f
            * sysdeps/s390/multiarch/wcsspn-vx.S: Move to ...
bdc76f
            * sysdeps/s390/wcsspn-vx.S: ... here and adjust ifunc handling.
bdc76f
            * sysdeps/s390/multiarch/wcsspn.c: Move to ...
bdc76f
            * sysdeps/s390/wcsspn.c: ... here and adjust ifunc handling.
bdc76f
            * sysdeps/s390/ifunc-wcsspn.h: New file.
bdc76f
bdc76f
diff --git a/sysdeps/s390/Makefile b/sysdeps/s390/Makefile
bdc76f
index 19a556eccf285e2f..38dbba8ccfd3cd66 100644
bdc76f
--- a/sysdeps/s390/Makefile
bdc76f
+++ b/sysdeps/s390/Makefile
bdc76f
@@ -72,5 +72,6 @@ sysdep_routines += wcslen wcslen-vx wcslen-c \
bdc76f
 		   wcsncmp wcsncmp-vx wcsncmp-c \
bdc76f
 		   wcschr wcschr-vx wcschr-c \
bdc76f
 		   wcschrnul wcschrnul-vx wcschrnul-c \
bdc76f
-		   wcsrchr wcsrchr-vx wcsrchr-c
bdc76f
+		   wcsrchr wcsrchr-vx wcsrchr-c \
bdc76f
+		   wcsspn wcsspn-vx wcsspn-c
bdc76f
 endif
bdc76f
diff --git a/sysdeps/s390/ifunc-wcsspn.h b/sysdeps/s390/ifunc-wcsspn.h
bdc76f
new file mode 100644
bdc76f
index 0000000000000000..1189c6b93ff9fbec
bdc76f
--- /dev/null
bdc76f
+++ b/sysdeps/s390/ifunc-wcsspn.h
bdc76f
@@ -0,0 +1,53 @@
bdc76f
+/* wcsspn 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_WCSSPN_IFUNC	1
bdc76f
+#else
bdc76f
+# define HAVE_WCSSPN_IFUNC	0
bdc76f
+#endif
bdc76f
+
bdc76f
+#ifdef HAVE_S390_VX_ASM_SUPPORT
bdc76f
+# define HAVE_WCSSPN_IFUNC_AND_VX_SUPPORT HAVE_WCSSPN_IFUNC
bdc76f
+#else
bdc76f
+# define HAVE_WCSSPN_IFUNC_AND_VX_SUPPORT 0
bdc76f
+#endif
bdc76f
+
bdc76f
+#if defined HAVE_S390_MIN_Z13_ZARCH_ASM_SUPPORT
bdc76f
+# define WCSSPN_DEFAULT		WCSSPN_Z13
bdc76f
+/* The z13 ifunc variant is using the common code variant as fallback!  */
bdc76f
+# define HAVE_WCSSPN_C		1
bdc76f
+# define HAVE_WCSSPN_Z13	1
bdc76f
+#else
bdc76f
+# define WCSSPN_DEFAULT		WCSSPN_C
bdc76f
+# define HAVE_WCSSPN_C		1
bdc76f
+# define HAVE_WCSSPN_Z13	HAVE_WCSSPN_IFUNC_AND_VX_SUPPORT
bdc76f
+#endif
bdc76f
+
bdc76f
+#if HAVE_WCSSPN_C
bdc76f
+# define WCSSPN_C		__wcsspn_c
bdc76f
+#else
bdc76f
+# define WCSSPN_C		NULL
bdc76f
+#endif
bdc76f
+
bdc76f
+#if HAVE_WCSSPN_Z13
bdc76f
+# define WCSSPN_Z13		__wcsspn_vx
bdc76f
+#else
bdc76f
+# define WCSSPN_Z13		NULL
bdc76f
+#endif
bdc76f
diff --git a/sysdeps/s390/multiarch/Makefile b/sysdeps/s390/multiarch/Makefile
bdc76f
index 3d72cbb5f32e68f3..091f5150847a404a 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 += wcsspn wcsspn-vx wcsspn-c \
bdc76f
-		   wcspbrk wcspbrk-vx wcspbrk-c \
bdc76f
+sysdep_routines += wcspbrk wcspbrk-vx wcspbrk-c \
bdc76f
 		   wcscspn wcscspn-vx wcscspn-c \
bdc76f
 		   wmemchr wmemchr-vx wmemchr-c \
bdc76f
 		   wmemset wmemset-vx wmemset-c \
bdc76f
diff --git a/sysdeps/s390/multiarch/ifunc-impl-list.c b/sysdeps/s390/multiarch/ifunc-impl-list.c
bdc76f
index ffb4d5b6872ef9db..6f4de2845ba0a378 100644
bdc76f
--- a/sysdeps/s390/multiarch/ifunc-impl-list.c
bdc76f
+++ b/sysdeps/s390/multiarch/ifunc-impl-list.c
bdc76f
@@ -59,6 +59,7 @@
bdc76f
 #include <ifunc-wcschr.h>
bdc76f
 #include <ifunc-wcschrnul.h>
bdc76f
 #include <ifunc-wcsrchr.h>
bdc76f
+#include <ifunc-wcsspn.h>
bdc76f
 
bdc76f
 /* Maximum number of IFUNC implementations.  */
bdc76f
 #define MAX_IFUNC	3
bdc76f
@@ -593,6 +594,18 @@ __libc_ifunc_impl_list (const char *name, struct libc_ifunc_impl *array,
bdc76f
 		)
bdc76f
 #endif /* HAVE_WCSRCHR_IFUNC  */
bdc76f
 
bdc76f
+#if HAVE_WCSSPN_IFUNC
bdc76f
+    IFUNC_IMPL (i, name, wcsspn,
bdc76f
+# if HAVE_WCSSPN_Z13
bdc76f
+		IFUNC_IMPL_ADD (array, i, wcsspn,
bdc76f
+				dl_hwcap & HWCAP_S390_VX, WCSSPN_Z13)
bdc76f
+# endif
bdc76f
+# if HAVE_WCSSPN_C
bdc76f
+		IFUNC_IMPL_ADD (array, i, wcsspn, 1, WCSSPN_C)
bdc76f
+# endif
bdc76f
+		)
bdc76f
+#endif /* HAVE_WCSSPN_IFUNC  */
bdc76f
+
bdc76f
 #ifdef HAVE_S390_VX_ASM_SUPPORT
bdc76f
 
bdc76f
 # define IFUNC_VX_IMPL(FUNC)						\
bdc76f
@@ -601,8 +614,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 (wcsspn);
bdc76f
-
bdc76f
   IFUNC_VX_IMPL (wcspbrk);
bdc76f
 
bdc76f
   IFUNC_VX_IMPL (wcscspn);
bdc76f
diff --git a/sysdeps/s390/multiarch/wcsspn-c.c b/sysdeps/s390/wcsspn-c.c
bdc76f
similarity index 72%
bdc76f
rename from sysdeps/s390/multiarch/wcsspn-c.c
bdc76f
rename to sysdeps/s390/wcsspn-c.c
bdc76f
index 2c0bd0f4e69516de..db3bdb9b9f09e500 100644
bdc76f
--- a/sysdeps/s390/multiarch/wcsspn-c.c
bdc76f
+++ b/sysdeps/s390/wcsspn-c.c
bdc76f
@@ -16,16 +16,22 @@
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 WCSSPN  __wcsspn_c
bdc76f
+#include <ifunc-wcsspn.h>
bdc76f
 
bdc76f
-# include <wchar.h>
bdc76f
-extern __typeof (wcsspn) __wcsspn_c;
bdc76f
-# ifdef SHARED
bdc76f
-#  undef libc_hidden_def
bdc76f
-#  define libc_hidden_def(name)				\
bdc76f
+#if HAVE_WCSSPN_C
bdc76f
+# if HAVE_WCSSPN_IFUNC || HAVE_WCSSPN_Z13
bdc76f
+#  define WCSSPN WCSSPN_C
bdc76f
+
bdc76f
+#  if defined SHARED && IS_IN (libc)
bdc76f
+#   undef libc_hidden_def
bdc76f
+#   if ! defined HAVE_S390_MIN_Z13_ZARCH_ASM_SUPPORT
bdc76f
+#    define libc_hidden_def(name)			\
bdc76f
   __hidden_ver1 (__wcsspn_c, __GI_wcsspn, __wcsspn_c);
bdc76f
-# endif /* SHARED */
bdc76f
+#   else
bdc76f
+#    define libc_hidden_def(name)
bdc76f
+#   endif
bdc76f
+#  endif
bdc76f
+# endif
bdc76f
 
bdc76f
 # include <wcsmbs/wcsspn.c>
bdc76f
-#endif /* HAVE_S390_VX_ASM_SUPPORT && IS_IN (libc) */
bdc76f
+#endif
bdc76f
diff --git a/sysdeps/s390/multiarch/wcsspn-vx.S b/sysdeps/s390/wcsspn-vx.S
bdc76f
similarity index 97%
bdc76f
rename from sysdeps/s390/multiarch/wcsspn-vx.S
bdc76f
rename to sysdeps/s390/wcsspn-vx.S
bdc76f
index 548f2ad1644c8e88..61f7d6d0902125b7 100644
bdc76f
--- a/sysdeps/s390/multiarch/wcsspn-vx.S
bdc76f
+++ b/sysdeps/s390/wcsspn-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-wcsspn.h>
bdc76f
+#if HAVE_WCSSPN_Z13
bdc76f
 
bdc76f
 # include "sysdep.h"
bdc76f
 # include "asm-syntax.h"
bdc76f
@@ -57,7 +58,7 @@
bdc76f
 	otherwise =0;
bdc76f
    r9: loaded byte count of vlbb accept-string
bdc76f
 */
bdc76f
-ENTRY(__wcsspn_vx)
bdc76f
+ENTRY(WCSSPN_Z13)
bdc76f
 	.machine "z13"
bdc76f
 	.machinemode "zarch_nohighgprs"
bdc76f
 
bdc76f
@@ -265,6 +266,15 @@ ENTRY(__wcsspn_vx)
bdc76f
 	j	.Lslow_next_acc_notonbb /* ... and search for zero in
bdc76f
 					   fully loaded vreg again.  */
bdc76f
 .Lfallback:
bdc76f
-	jg	__wcsspn_c
bdc76f
-END(__wcsspn_vx)
bdc76f
-#endif /* HAVE_S390_VX_ASM_SUPPORT && IS_IN (libc) */
bdc76f
+	jg	WCSSPN_C
bdc76f
+END(WCSSPN_Z13)
bdc76f
+
bdc76f
+# if ! HAVE_WCSSPN_IFUNC
bdc76f
+strong_alias (WCSSPN_Z13, wcsspn)
bdc76f
+# endif
bdc76f
+
bdc76f
+# if defined HAVE_S390_MIN_Z13_ZARCH_ASM_SUPPORT \
bdc76f
+	&& defined SHARED && IS_IN (libc)
bdc76f
+strong_alias (WCSSPN_Z13, __GI_wcsspn)
bdc76f
+# endif
bdc76f
+#endif
bdc76f
diff --git a/sysdeps/s390/multiarch/wcsspn.c b/sysdeps/s390/wcsspn.c
bdc76f
similarity index 69%
bdc76f
rename from sysdeps/s390/multiarch/wcsspn.c
bdc76f
rename to sysdeps/s390/wcsspn.c
bdc76f
index 7743144a8ca7c2ee..e916b1e4414e774d 100644
bdc76f
--- a/sysdeps/s390/multiarch/wcsspn.c
bdc76f
+++ b/sysdeps/s390/wcsspn.c
bdc76f
@@ -16,14 +16,24 @@
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-wcsspn.h>
bdc76f
+
bdc76f
+#if HAVE_WCSSPN_IFUNC
bdc76f
 # define wcsspn __redirect_wcsspn
bdc76f
 # include <wchar.h>
bdc76f
 # undef wcsspn
bdc76f
 # include <ifunc-resolve.h>
bdc76f
+# if HAVE_WCSSPN_C
bdc76f
+extern __typeof (__redirect_wcsspn) WCSSPN_C attribute_hidden;
bdc76f
+# endif
bdc76f
 
bdc76f
-s390_vx_libc_ifunc2_redirected (__redirect_wcsspn, __wcsspn, wcsspn)
bdc76f
+# if HAVE_WCSSPN_Z13
bdc76f
+extern __typeof (__redirect_wcsspn) WCSSPN_Z13 attribute_hidden;
bdc76f
+# endif
bdc76f
 
bdc76f
-#else
bdc76f
-# include <wcsmbs/wcsspn.c>
bdc76f
-#endif /* !(defined HAVE_S390_VX_ASM_SUPPORT && IS_IN (libc)) */
bdc76f
+s390_libc_ifunc_expr (__redirect_wcsspn, wcsspn,
bdc76f
+		      (HAVE_WCSSPN_Z13 && (hwcap & HWCAP_S390_VX))
bdc76f
+		      ? WCSSPN_Z13
bdc76f
+		      : WCSSPN_DEFAULT
bdc76f
+		      )
bdc76f
+#endif