OLD | NEW |
| (Empty) |
1 #ifndef __ARMEB__ | |
2 | |
3 /* | |
4 * Copyright (C) 2008 The Android Open Source Project | |
5 * All rights reserved. | |
6 * | |
7 * Redistribution and use in source and binary forms, with or without | |
8 * modification, are permitted provided that the following conditions | |
9 * are met: | |
10 * * Redistributions of source code must retain the above copyright | |
11 * notice, this list of conditions and the following disclaimer. | |
12 * * Redistributions in binary form must reproduce the above copyright | |
13 * notice, this list of conditions and the following disclaimer in | |
14 * the documentation and/or other materials provided with the | |
15 * distribution. | |
16 * | |
17 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS | |
18 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT | |
19 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS | |
20 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE | |
21 * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, | |
22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, | |
23 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS | |
24 * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED | |
25 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, | |
26 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT | |
27 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | |
28 * SUCH DAMAGE. | |
29 */ | |
30 | |
31 | |
32 /* | |
33 * Optimized memcpy() for ARM. | |
34 * | |
35 * note that memcpy() always returns the destination pointer, | |
36 * so we have to preserve R0. | |
37 */ | |
38 | |
39 /* | |
40 * This file has been modified from the original for use in musl libc. | |
41 * The main changes are: addition of .type memcpy,%function to make the | |
42 * code safely callable from thumb mode, adjusting the return | |
43 * instructions to be compatible with pre-thumb ARM cpus, and removal | |
44 * of prefetch code that is not compatible with older cpus. | |
45 */ | |
46 | |
47 .syntax unified | |
48 | |
49 .global memcpy | |
50 .type memcpy,%function | |
51 memcpy: | |
52 /* The stack must always be 64-bits aligned to be compliant with the | |
53 * ARM ABI. Since we have to save R0, we might as well save R4 | |
54 * which we can use for better pipelining of the reads below | |
55 */ | |
56 .fnstart | |
57 .save {r0, r4, lr} | |
58 stmfd sp!, {r0, r4, lr} | |
59 /* Making room for r5-r11 which will be spilled later */ | |
60 .pad #28 | |
61 sub sp, sp, #28 | |
62 | |
63 /* it simplifies things to take care of len<4 early */ | |
64 cmp r2, #4 | |
65 blo copy_last_3_and_return | |
66 | |
67 /* compute the offset to align the source | |
68 * offset = (4-(src&3))&3 = -src & 3 | |
69 */ | |
70 rsb r3, r1, #0 | |
71 ands r3, r3, #3 | |
72 beq src_aligned | |
73 | |
74 /* align source to 32 bits. We need to insert 2 instructions between | |
75 * a ldr[b|h] and str[b|h] because byte and half-word instructions | |
76 * stall 2 cycles. | |
77 */ | |
78 movs r12, r3, lsl #31 | |
79 sub r2, r2, r3 /* we know that r3 <= r2 because r2 >= 4
*/ | |
80 ldrbmi r3, [r1], #1 | |
81 ldrbcs r4, [r1], #1 | |
82 ldrbcs r12,[r1], #1 | |
83 strbmi r3, [r0], #1 | |
84 strbcs r4, [r0], #1 | |
85 strbcs r12,[r0], #1 | |
86 | |
87 src_aligned: | |
88 | |
89 /* see if src and dst are aligned together (congruent) */ | |
90 eor r12, r0, r1 | |
91 tst r12, #3 | |
92 bne non_congruent | |
93 | |
94 /* Use post-incriment mode for stm to spill r5-r11 to reserved stack | |
95 * frame. Don't update sp. | |
96 */ | |
97 stmea sp, {r5-r11} | |
98 | |
99 /* align the destination to a cache-line */ | |
100 rsb r3, r0, #0 | |
101 ands r3, r3, #0x1C | |
102 beq congruent_aligned32 | |
103 cmp r3, r2 | |
104 andhi r3, r2, #0x1C | |
105 | |
106 /* conditionnaly copies 0 to 7 words (length in r3) */ | |
107 movs r12, r3, lsl #28 | |
108 ldmcs r1!, {r4, r5, r6, r7} /* 16 bytes */ | |
109 ldmmi r1!, {r8, r9} /* 8 bytes */ | |
110 stmcs r0!, {r4, r5, r6, r7} | |
111 stmmi r0!, {r8, r9} | |
112 tst r3, #0x4 | |
113 ldrne r10,[r1], #4 /* 4 bytes */ | |
114 strne r10,[r0], #4 | |
115 sub r2, r2, r3 | |
116 | |
117 congruent_aligned32: | |
118 /* | |
119 * here source is aligned to 32 bytes. | |
120 */ | |
121 | |
122 cached_aligned32: | |
123 subs r2, r2, #32 | |
124 blo less_than_32_left | |
125 | |
126 /* | |
127 * We preload a cache-line up to 64 bytes ahead. On the 926, this will | |
128 * stall only until the requested world is fetched, but the linefill | |
129 * continues in the the background. | |
130 * While the linefill is going, we write our previous cache-line | |
131 * into the write-buffer (which should have some free space). | |
132 * When the linefill is done, the writebuffer will | |
133 * start dumping its content into memory | |
134 * | |
135 * While all this is going, we then load a full cache line into | |
136 * 8 registers, this cache line should be in the cache by now | |
137 * (or partly in the cache). | |
138 * | |
139 * This code should work well regardless of the source/dest alignment. | |
140 * | |
141 */ | |
142 | |
143 /* Align the preload register to a cache-line because the cpu does | |
144 * "critical word first" (the first word requested is loaded first). | |
145 */ | |
146 @ bic r12, r1, #0x1F | |
147 @ add r12, r12, #64 | |
148 | |
149 1: ldmia r1!, { r4-r11 } | |
150 subs r2, r2, #32 | |
151 | |
152 /* | |
153 * NOTE: if r12 is more than 64 ahead of r1, the following ldrhi | |
154 * for ARM9 preload will not be safely guarded by the preceding subs. | |
155 * When it is safely guarded the only possibility to have SIGSEGV here | |
156 * is because the caller overstates the length. | |
157 */ | |
158 @ ldrhi r3, [r12], #32 /* cheap ARM9 preload */ | |
159 stmia r0!, { r4-r11 } | |
160 bhs 1b | |
161 | |
162 add r2, r2, #32 | |
163 | |
164 less_than_32_left: | |
165 /* | |
166 * less than 32 bytes left at this point (length in r2) | |
167 */ | |
168 | |
169 /* skip all this if there is nothing to do, which should | |
170 * be a common case (if not executed the code below takes | |
171 * about 16 cycles) | |
172 */ | |
173 tst r2, #0x1F | |
174 beq 1f | |
175 | |
176 /* conditionnaly copies 0 to 31 bytes */ | |
177 movs r12, r2, lsl #28 | |
178 ldmcs r1!, {r4, r5, r6, r7} /* 16 bytes */ | |
179 ldmmi r1!, {r8, r9} /* 8 bytes */ | |
180 stmcs r0!, {r4, r5, r6, r7} | |
181 stmmi r0!, {r8, r9} | |
182 movs r12, r2, lsl #30 | |
183 ldrcs r3, [r1], #4 /* 4 bytes */ | |
184 ldrhmi r4, [r1], #2 /* 2 bytes */ | |
185 strcs r3, [r0], #4 | |
186 strhmi r4, [r0], #2 | |
187 tst r2, #0x1 | |
188 ldrbne r3, [r1] /* last byte */ | |
189 strbne r3, [r0] | |
190 | |
191 /* we're done! restore everything and return */ | |
192 1: ldmfd sp!, {r5-r11} | |
193 ldmfd sp!, {r0, r4, lr} | |
194 bx lr | |
195 | |
196 /********************************************************************/ | |
197 | |
198 non_congruent: | |
199 /* | |
200 * here source is aligned to 4 bytes | |
201 * but destination is not. | |
202 * | |
203 * in the code below r2 is the number of bytes read | |
204 * (the number of bytes written is always smaller, because we have | |
205 * partial words in the shift queue) | |
206 */ | |
207 cmp r2, #4 | |
208 blo copy_last_3_and_return | |
209 | |
210 /* Use post-incriment mode for stm to spill r5-r11 to reserved stack | |
211 * frame. Don't update sp. | |
212 */ | |
213 stmea sp, {r5-r11} | |
214 | |
215 /* compute shifts needed to align src to dest */ | |
216 rsb r5, r0, #0 | |
217 and r5, r5, #3 /* r5 = # bytes in partial words
*/ | |
218 mov r12, r5, lsl #3 /* r12 = right */ | |
219 rsb lr, r12, #32 /* lr = left */ | |
220 | |
221 /* read the first word */ | |
222 ldr r3, [r1], #4 | |
223 sub r2, r2, #4 | |
224 | |
225 /* write a partial word (0 to 3 bytes), such that destination | |
226 * becomes aligned to 32 bits (r5 = nb of words to copy for alignment) | |
227 */ | |
228 movs r5, r5, lsl #31 | |
229 strbmi r3, [r0], #1 | |
230 movmi r3, r3, lsr #8 | |
231 strbcs r3, [r0], #1 | |
232 movcs r3, r3, lsr #8 | |
233 strbcs r3, [r0], #1 | |
234 movcs r3, r3, lsr #8 | |
235 | |
236 cmp r2, #4 | |
237 blo partial_word_tail | |
238 | |
239 /* Align destination to 32 bytes (cache line boundary) */ | |
240 1: tst r0, #0x1c | |
241 beq 2f | |
242 ldr r5, [r1], #4 | |
243 sub r2, r2, #4 | |
244 orr r4, r3, r5, lsl lr | |
245 mov r3, r5, lsr r12 | |
246 str r4, [r0], #4 | |
247 cmp r2, #4 | |
248 bhs 1b | |
249 blo partial_word_tail | |
250 | |
251 /* copy 32 bytes at a time */ | |
252 2: subs r2, r2, #32 | |
253 blo less_than_thirtytwo | |
254 | |
255 /* Use immediate mode for the shifts, because there is an extra cycle | |
256 * for register shifts, which could account for up to 50% of | |
257 * performance hit. | |
258 */ | |
259 | |
260 cmp r12, #24 | |
261 beq loop24 | |
262 cmp r12, #8 | |
263 beq loop8 | |
264 | |
265 loop16: | |
266 ldr r12, [r1], #4 | |
267 1: mov r4, r12 | |
268 ldmia r1!, { r5,r6,r7, r8,r9,r10,r11} | |
269 subs r2, r2, #32 | |
270 ldrhs r12, [r1], #4 | |
271 orr r3, r3, r4, lsl #16 | |
272 mov r4, r4, lsr #16 | |
273 orr r4, r4, r5, lsl #16 | |
274 mov r5, r5, lsr #16 | |
275 orr r5, r5, r6, lsl #16 | |
276 mov r6, r6, lsr #16 | |
277 orr r6, r6, r7, lsl #16 | |
278 mov r7, r7, lsr #16 | |
279 orr r7, r7, r8, lsl #16 | |
280 mov r8, r8, lsr #16 | |
281 orr r8, r8, r9, lsl #16 | |
282 mov r9, r9, lsr #16 | |
283 orr r9, r9, r10, lsl #16 | |
284 mov r10, r10, lsr #16 | |
285 orr r10, r10, r11, lsl #16 | |
286 stmia r0!, {r3,r4,r5,r6, r7,r8,r9,r10} | |
287 mov r3, r11, lsr #16 | |
288 bhs 1b | |
289 b less_than_thirtytwo | |
290 | |
291 loop8: | |
292 ldr r12, [r1], #4 | |
293 1: mov r4, r12 | |
294 ldmia r1!, { r5,r6,r7, r8,r9,r10,r11} | |
295 subs r2, r2, #32 | |
296 ldrhs r12, [r1], #4 | |
297 orr r3, r3, r4, lsl #24 | |
298 mov r4, r4, lsr #8 | |
299 orr r4, r4, r5, lsl #24 | |
300 mov r5, r5, lsr #8 | |
301 orr r5, r5, r6, lsl #24 | |
302 mov r6, r6, lsr #8 | |
303 orr r6, r6, r7, lsl #24 | |
304 mov r7, r7, lsr #8 | |
305 orr r7, r7, r8, lsl #24 | |
306 mov r8, r8, lsr #8 | |
307 orr r8, r8, r9, lsl #24 | |
308 mov r9, r9, lsr #8 | |
309 orr r9, r9, r10, lsl #24 | |
310 mov r10, r10, lsr #8 | |
311 orr r10, r10, r11, lsl #24 | |
312 stmia r0!, {r3,r4,r5,r6, r7,r8,r9,r10} | |
313 mov r3, r11, lsr #8 | |
314 bhs 1b | |
315 b less_than_thirtytwo | |
316 | |
317 loop24: | |
318 ldr r12, [r1], #4 | |
319 1: mov r4, r12 | |
320 ldmia r1!, { r5,r6,r7, r8,r9,r10,r11} | |
321 subs r2, r2, #32 | |
322 ldrhs r12, [r1], #4 | |
323 orr r3, r3, r4, lsl #8 | |
324 mov r4, r4, lsr #24 | |
325 orr r4, r4, r5, lsl #8 | |
326 mov r5, r5, lsr #24 | |
327 orr r5, r5, r6, lsl #8 | |
328 mov r6, r6, lsr #24 | |
329 orr r6, r6, r7, lsl #8 | |
330 mov r7, r7, lsr #24 | |
331 orr r7, r7, r8, lsl #8 | |
332 mov r8, r8, lsr #24 | |
333 orr r8, r8, r9, lsl #8 | |
334 mov r9, r9, lsr #24 | |
335 orr r9, r9, r10, lsl #8 | |
336 mov r10, r10, lsr #24 | |
337 orr r10, r10, r11, lsl #8 | |
338 stmia r0!, {r3,r4,r5,r6, r7,r8,r9,r10} | |
339 mov r3, r11, lsr #24 | |
340 bhs 1b | |
341 | |
342 less_than_thirtytwo: | |
343 /* copy the last 0 to 31 bytes of the source */ | |
344 rsb r12, lr, #32 /* we corrupted r12, recompute it */ | |
345 add r2, r2, #32 | |
346 cmp r2, #4 | |
347 blo partial_word_tail | |
348 | |
349 1: ldr r5, [r1], #4 | |
350 sub r2, r2, #4 | |
351 orr r4, r3, r5, lsl lr | |
352 mov r3, r5, lsr r12 | |
353 str r4, [r0], #4 | |
354 cmp r2, #4 | |
355 bhs 1b | |
356 | |
357 partial_word_tail: | |
358 /* we have a partial word in the input buffer */ | |
359 movs r5, lr, lsl #(31-3) | |
360 strbmi r3, [r0], #1 | |
361 movmi r3, r3, lsr #8 | |
362 strbcs r3, [r0], #1 | |
363 movcs r3, r3, lsr #8 | |
364 strbcs r3, [r0], #1 | |
365 | |
366 /* Refill spilled registers from the stack. Don't update sp. */ | |
367 ldmfd sp, {r5-r11} | |
368 | |
369 copy_last_3_and_return: | |
370 movs r2, r2, lsl #31 /* copy remaining 0, 1, 2 or 3 bytes */ | |
371 ldrbmi r2, [r1], #1 | |
372 ldrbcs r3, [r1], #1 | |
373 ldrbcs r12,[r1] | |
374 strbmi r2, [r0], #1 | |
375 strbcs r3, [r0], #1 | |
376 strbcs r12,[r0] | |
377 | |
378 /* we're done! restore sp and spilled registers and return */ | |
379 add sp, sp, #28 | |
380 ldmfd sp!, {r0, r4, lr} | |
381 bx lr | |
382 | |
383 #endif | |
OLD | NEW |