]>
git.ipfire.org Git - thirdparty/glibc.git/blob - sysdeps/powerpc/power6/wordcopy.c
1 /* _memcopy.c -- subroutines for memory copy functions.
2 Copyright (C) 1991-2021 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
19 /* BE VERY CAREFUL IF YOU CHANGE THIS CODE...! */
24 /* _wordcopy_fwd_aligned -- Copy block beginning at SRCP to
25 block beginning at DSTP with LEN `op_t' words (not LEN bytes!).
26 Both SRCP and DSTP should be aligned for memory operations on `op_t's. */
28 #ifndef WORDCOPY_FWD_ALIGNED
29 # define WORDCOPY_FWD_ALIGNED _wordcopy_fwd_aligned
33 WORDCOPY_FWD_ALIGNED (long int dstp
, long int srcp
, size_t len
)
39 ((op_t
*) dstp
)[0] = ((op_t
*) srcp
)[0];
50 a0
= ((op_t
*) srcp
)[0];
51 a1
= ((op_t
*) srcp
)[1];
52 ((op_t
*) dstp
)[0] = a0
;
53 ((op_t
*) dstp
)[1] = a1
;
62 /* _wordcopy_fwd_dest_aligned -- Copy block beginning at SRCP to
63 block beginning at DSTP with LEN `op_t' words (not LEN bytes!).
64 DSTP should be aligned for memory operations on `op_t's, but SRCP must
67 #define fwd_align_merge(align) \
70 a1 = ((op_t *) srcp)[1]; \
71 a2 = ((op_t *) srcp)[2]; \
72 ((op_t *) dstp)[0] = MERGE (a0, align*8, a1, (__WORDSIZE-align*8)); \
73 ((op_t *) dstp)[1] = MERGE (a1, align*8, a2, (__WORDSIZE-align*8)); \
81 #ifndef WORDCOPY_FWD_DEST_ALIGNED
82 # define WORDCOPY_FWD_DEST_ALIGNED _wordcopy_fwd_dest_aligned
86 WORDCOPY_FWD_DEST_ALIGNED (long int dstp
, long int srcp
, size_t len
)
92 /* Calculate how to shift a word read at the memory operation
93 aligned srcp to make it aligned for copy. */
96 sh_1
= 8 * (srcp
% OPSIZ
);
97 sh_2
= 8 * OPSIZ
- sh_1
;
99 /* Make SRCP aligned by rounding it down to the beginning of the `op_t'
100 it points in the middle of. */
102 a0
= ((op_t
*) srcp
)[0];
106 a1
= ((op_t
*) srcp
)[1];
107 ((op_t
*) dstp
)[0] = MERGE (a0
, sh_1
, a1
, sh_2
);
118 fwd_align_merge (align
);
122 /* _wordcopy_bwd_aligned -- Copy block finishing right before
123 SRCP to block finishing right before DSTP with LEN `op_t' words
124 (not LEN bytes!). Both SRCP and DSTP should be aligned for memory
125 operations on `op_t's. */
127 #ifndef WORDCOPY_BWD_ALIGNED
128 # define WORDCOPY_BWD_ALIGNED _wordcopy_bwd_aligned
132 WORDCOPY_BWD_ALIGNED (long int dstp
, long int srcp
, size_t len
)
140 ((op_t
*) dstp
)[0] = ((op_t
*) srcp
)[0];
152 a1
= ((op_t
*) srcp
)[1];
153 a0
= ((op_t
*) srcp
)[0];
154 ((op_t
*) dstp
)[1] = a1
;
155 ((op_t
*) dstp
)[0] = a0
;
162 #define bwd_align_merge(align) \
167 a1 = ((op_t *) srcp)[1]; \
168 a0 = ((op_t *) srcp)[0]; \
169 ((op_t *) dstp)[1] = MERGE (a1, align*8, a2, (__WORDSIZE-align*8)); \
170 ((op_t *) dstp)[0] = MERGE (a0, align*8, a1, (__WORDSIZE-align*8)); \
176 /* _wordcopy_bwd_dest_aligned -- Copy block finishing right
177 before SRCP to block finishing right before DSTP with LEN `op_t'
178 words (not LEN bytes!). DSTP should be aligned for memory
179 operations on `op_t', but SRCP must *not* be aligned. */
181 #ifndef WORDCOPY_BWD_DEST_ALIGNED
182 # define WORDCOPY_BWD_DEST_ALIGNED _wordcopy_bwd_dest_aligned
186 WORDCOPY_BWD_DEST_ALIGNED (long int dstp
, long int srcp
, size_t len
)
192 /* Calculate how to shift a word read at the memory operation
193 aligned srcp to make it aligned for copy. */
195 align
= srcp
% OPSIZ
;
196 sh_1
= 8 * (srcp
% OPSIZ
);
197 sh_2
= 8 * OPSIZ
- sh_1
;
199 /* Make srcp aligned by rounding it down to the beginning of the op_t
200 it points in the middle of. */
202 a2
= ((op_t
*) srcp
)[0];
208 a1
= ((op_t
*) srcp
)[0];
209 ((op_t
*) dstp
)[0] = MERGE (a1
, sh_1
, a2
, sh_2
);
218 bwd_align_merge (align
);