S390: Unify 31/64bit memset.

The implementation of memset for s390-32 (31bit) and
s390-64 (64bit) is nearly the same.
This patch unifies it for maintability reasons.

__memset_z10 and __memset_z196 differs between 31 and 64bit:
-31bit needs .machinemode "zarch_nohighgprs" and llgfr   %r4,%r4
-lr vs lgr and some other instructions:
But lgr and co can be also used on 31bit as this ifunc variant
is only called if we are on a zarch machine.

__memset_default differs between 31 and 64bit:
-Some 31bit vs 64bit instructions (e.g. ltr vs ltgr.
Solved with 31/64 specific instruction macros).
-The address of mvc instruction is setup in different ways
(larl vs bras). Solved with #if defined __s390x__.

Otherwise 31/64bit implementation has the same structure of the code.

ChangeLog:

	* sysdeps/s390/s390-64/memset.S: Move to ...
	* sysdeps/s390/memset.S: ... here.
	Adjust to be usable for 31/64bit.
	* sysdeps/s390/s390-32/memset.S: Delete File.
	* sysdeps/s390/multiarch/Makefile (sysdep_routines): Add memset.
	* sysdeps/s390/s390-32/multiarch/Makefile (sysdep_routines):
	Remove memset.
	* sysdeps/s390/s390-64/multiarch/Makefile: Likewise.
	* sysdeps/s390/s390-64/multiarch/memset-s390x.S: Move to ...
	* sysdeps/s390/multiarch/memset-s390x.S: ... here.
	Adjust to be usable for 31/64bit.
	* sysdeps/s390/s390-32/multiarch/memset-s390.S: Delete File.
	* sysdeps/s390/s390-64/multiarch/memset.c: Move to ...
	* sysdeps/s390/multiarch/memset.c: ... here.
	* sysdeps/s390/s390-32/multiarch/memset.c: Delete File.
This commit is contained in:
Stefan Liebler 2018-12-18 13:57:04 +01:00
parent e8023f2685
commit 5f1743d118
10 changed files with 81 additions and 230 deletions

View File

@ -1,3 +1,21 @@
2018-12-18 Stefan Liebler <stli@linux.ibm.com>
* sysdeps/s390/s390-64/memset.S: Move to ...
* sysdeps/s390/memset.S: ... here.
Adjust to be usable for 31/64bit.
* sysdeps/s390/s390-32/memset.S: Delete File.
* sysdeps/s390/multiarch/Makefile (sysdep_routines): Add memset.
* sysdeps/s390/s390-32/multiarch/Makefile (sysdep_routines):
Remove memset.
* sysdeps/s390/s390-64/multiarch/Makefile: Likewise.
* sysdeps/s390/s390-64/multiarch/memset-s390x.S: Move to ...
* sysdeps/s390/multiarch/memset-s390x.S: ... here.
Adjust to be usable for 31/64bit.
* sysdeps/s390/s390-32/multiarch/memset-s390.S: Delete File.
* sysdeps/s390/s390-64/multiarch/memset.c: Move to ...
* sysdeps/s390/multiarch/memset.c: ... here.
* sysdeps/s390/s390-32/multiarch/memset.c: Delete File.
2018-12-18 Stefan Liebler <stli@linux.ibm.com> 2018-12-18 Stefan Liebler <stli@linux.ibm.com>
* sysdeps/s390/multiarch/ifunc-resolve.h * sysdeps/s390/multiarch/ifunc-resolve.h

View File

@ -1,4 +1,4 @@
/* Set a block of memory to some byte value. 64 bit S/390 version. /* Set a block of memory to some byte value. 31/64 bit S/390 version.
Copyright (C) 2001-2018 Free Software Foundation, Inc. Copyright (C) 2001-2018 Free Software Foundation, Inc.
Contributed by Martin Schwidefsky (schwidefsky@de.ibm.com). Contributed by Martin Schwidefsky (schwidefsky@de.ibm.com).
This file is part of the GNU C Library. This file is part of the GNU C Library.
@ -28,33 +28,60 @@
.text .text
#if defined __s390x__
# define LTGR ltgr
# define CGHI cghi
# define LGR lgr
# define AGHI aghi
# define BRCTG brctg
#else
# define LTGR ltr
# define CGHI chi
# define LGR lr
# define AGHI ahi
# define BRCTG brct
#endif /* ! defined __s390x__ */
#ifdef USE_MULTIARCH #ifdef USE_MULTIARCH
ENTRY(__memset_default) ENTRY(__memset_default)
#else #else
ENTRY(memset) ENTRY(memset)
#endif #endif
#if defined __s390x__
.machine "z900" .machine "z900"
ltgr %r4,%r4 #else
je .L_Z900_4 .machine "g5"
#endif /* ! defined __s390x__ */
LTGR %r4,%r4
je .L_Z900_G5_4
stc %r3,0(%r2) stc %r3,0(%r2)
cghi %r4,1 CGHI %r4,1
lgr %r1,%r2 LGR %r1,%r2
je .L_Z900_4 je .L_Z900_G5_4
aghi %r4,-2 AGHI %r4,-2
#if defined __s390x__
larl %r5,.L_Z900_G5_18
srlg %r3,%r4,8 srlg %r3,%r4,8
ltgr %r3,%r3 # define Z900_G5_EX_D 0
jne .L_Z900_14 #else
.L_Z900_3: basr %r5,0
larl %r3,.L_Z900_18 .L_Z900_G5_19:
ex %r4,0(%r3) # define Z900_G5_EX_D .L_Z900_G5_18-.L_Z900_G5_19
.L_Z900_4: lr %r3,%r4
srl %r3,8
#endif /* ! defined __s390x__ */
LTGR %r3,%r3
jne .L_Z900_G5_14
.L_Z900_G5_3:
ex %r4,Z900_G5_EX_D(%r5)
.L_Z900_G5_4:
br %r14 br %r14
.L_Z900_14: .L_Z900_G5_14:
mvc 1(256,%r1),0(%r1) mvc 1(256,%r1),0(%r1)
la %r1,256(%r1) la %r1,256(%r1)
brctg %r3,.L_Z900_14 BRCTG %r3,.L_Z900_G5_14
j .L_Z900_3 j .L_Z900_G5_3
.L_Z900_18: .L_Z900_G5_18:
mvc 1(1,%r1),0(%r1) mvc 1(1,%r1),0(%r1)
#ifdef USE_MULTIARCH #ifdef USE_MULTIARCH
END(__memset_default) END(__memset_default)
@ -62,3 +89,9 @@ END(__memset_default)
END(memset) END(memset)
libc_hidden_builtin_def (memset) libc_hidden_builtin_def (memset)
#endif #endif
#undef LTGR
#undef CGHI
#undef LGR
#undef AGHI
#undef BRCTG

View File

@ -19,7 +19,8 @@ sysdep_routines += strlen strlen-vx strlen-c \
rawmemchr rawmemchr-vx rawmemchr-c \ rawmemchr rawmemchr-vx rawmemchr-c \
memccpy memccpy-vx memccpy-c \ memccpy memccpy-vx memccpy-c \
memrchr memrchr-vx memrchr-c \ memrchr memrchr-vx memrchr-c \
mempcpy mempcpy \
memset memset-s390x
endif endif
ifeq ($(subdir),wcsmbs) ifeq ($(subdir),wcsmbs)

View File

@ -1,4 +1,4 @@
/* Set a block of memory to some byte value. 64 bit S/390 version. /* Set a block of memory to some byte value. 31/64 bit S/390 version.
Copyright (C) 2012-2018 Free Software Foundation, Inc. Copyright (C) 2012-2018 Free Software Foundation, Inc.
This file is part of the GNU C Library. This file is part of the GNU C Library.
@ -31,6 +31,10 @@
ENTRY(__memset_z196) ENTRY(__memset_z196)
.machine "z196" .machine "z196"
.machinemode "zarch_nohighgprs"
# if !defined __s390x__
llgfr %r4,%r4
# endif /* !defined __s390x__ */
ltgr %r4,%r4 ltgr %r4,%r4
je .L_Z196_4 je .L_Z196_4
stc %r3,0(%r2) stc %r3,0(%r2)
@ -61,6 +65,10 @@ END(__memset_z196)
ENTRY(__memset_z10) ENTRY(__memset_z10)
.machine "z10" .machine "z10"
.machinemode "zarch_nohighgprs"
# if !defined __s390x__
llgfr %r4,%r4
# endif /* !defined __s390x__ */
cgije %r4,0,.L_Z10_4 cgije %r4,0,.L_Z10_4
stc %r3,0(%r2) stc %r3,0(%r2)
lgr %r1,%r2 lgr %r1,%r2

View File

@ -1,65 +0,0 @@
/* Set a block of memory to some byte value. For IBM S390
Copyright (C) 2012-2018 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, see
<http://www.gnu.org/licenses/>. */
#include "sysdep.h"
#include "asm-syntax.h"
/* INPUT PARAMETERS
%r2 = address to memory area
%r3 = byte to fill memory with
%r4 = number of bytes to fill. */
.text
#ifdef USE_MULTIARCH
ENTRY(__memset_default)
#else
ENTRY(memset)
#endif
.machine "g5"
basr %r5,0
.L_G5_19:
ltr %r4,%r4
je .L_G5_4
stc %r3,0(%r2)
chi %r4,1
lr %r1,%r2
je .L_G5_4
ahi %r4,-2
lr %r3,%r4
srl %r3,8
ltr %r3,%r3
jne .L_G5_14
ex %r4,.L_G5_20-.L_G5_19(%r5)
.L_G5_4:
br %r14
.L_G5_14:
mvc 1(256,%r1),0(%r1)
la %r1,256(%r1)
brct %r3,.L_G5_14
ex %r4,.L_G5_20-.L_G5_19(%r5)
j .L_G5_4
.L_G5_20:
mvc 1(1,%r1),0(%r1)
#ifdef USE_MULTIARCH
END(__memset_default)
#else
END(memset)
libc_hidden_builtin_def (memset)
#endif

View File

@ -1,4 +1,3 @@
ifeq ($(subdir),string) ifeq ($(subdir),string)
sysdep_routines += memset memset-s390 memcpy memcpy-s390 \ sysdep_routines += memcpy memcpy-s390 memcmp memcmp-s390
memcmp memcmp-s390
endif endif

View File

@ -1,116 +0,0 @@
/* Set a block of memory to some byte value. 32 bit S/390 version.
Copyright (C) 2012-2018 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, see
<http://www.gnu.org/licenses/>. */
#include "sysdep.h"
#include "asm-syntax.h"
/* INPUT PARAMETERS
%r2 = address of memory area
%r3 = byte to fill memory with
%r4 = number of bytes to fill. */
.text
#if IS_IN (libc)
ENTRY(__memset_z196)
.machine "z196"
.machinemode "zarch_nohighgprs"
llgfr %r4,%r4
ltgr %r4,%r4
je .L_Z196_4
stc %r3,0(%r2)
lr %r1,%r2
cghi %r4,1
je .L_Z196_4
aghi %r4,-2
srlg %r5,%r4,8
ltgr %r5,%r5
jne .L_Z196_1
.L_Z196_3:
exrl %r4,.L_Z196_17
.L_Z196_4:
br %r14
.L_Z196_1:
cgfi %r5,1048576
jh __memset_mvcle # Switch to mvcle for >256MB
.L_Z196_2:
pfd 2,1024(%r1)
mvc 1(256,%r1),0(%r1)
aghi %r5,-1
la %r1,256(%r1)
jne .L_Z196_2
j .L_Z196_3
.L_Z196_17:
mvc 1(1,%r1),0(%r1)
END(__memset_z196)
ENTRY(__memset_z10)
.machine "z10"
.machinemode "zarch_nohighgprs"
llgfr %r4,%r4
cgije %r4,0,.L_Z10_4
stc %r3,0(%r2)
lr %r1,%r2
cgije %r4,1,.L_Z10_4
aghi %r4,-2
srlg %r5,%r4,8
cgijlh %r5,0,.L_Z10_15
.L_Z10_3:
exrl %r4,.L_Z10_18
.L_Z10_4:
br %r14
.L_Z10_15:
cgfi %r5,163840 # Switch to mvcle for >40MB
jh __memset_mvcle
.L_Z10_14:
pfd 2,1024(%r1)
mvc 1(256,%r1),0(%r1)
la %r1,256(%r1)
brctg %r5,.L_Z10_14
j .L_Z10_3
.L_Z10_18:
mvc 1(1,%r1),0(%r1)
END(__memset_z10)
ENTRY(__memset_mvcle)
ahi %r4,2 # take back the change done by the caller
lr %r0,%r2 # save source address
lr %r1,%r3 # move pad byte to R1
lr %r3,%r4
sr %r4,%r4 # no source for MVCLE, only a pad byte
sr %r5,%r5
.L0: mvcle %r2,%r4,0(%r1) # thats it, MVCLE is your friend
jo .L0
lr %r2,%r0 # return value is source address
.L1:
br %r14
END(__memset_mvcle)
#endif /* IS_IN (libc) */
#include "../memset.S"
#if !IS_IN (libc)
.globl memset
.set memset,__memset_default
#elif defined SHARED && IS_IN (libc)
.globl __GI_memset
.set __GI_memset,__memset_default
#endif

View File

@ -1,4 +1,3 @@
ifeq ($(subdir),string) ifeq ($(subdir),string)
sysdep_routines += memset memset-s390x memcpy memcpy-s390x \ sysdep_routines += memcpy memcpy-s390x memcmp memcmp-s390x
memcmp memcmp-s390x
endif endif

View File

@ -1,26 +0,0 @@
/* Multiple versions of memset.
Copyright (C) 2015-2018 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, see
<http://www.gnu.org/licenses/>. */
#if IS_IN (libc)
# define memset __redirect_memset
# include <string.h>
# undef memset
# include <ifunc-resolve.h>
s390_libc_ifunc (__redirect_memset, __memset, memset)
#endif