1 /* $NetBSD: bcopyinout_xscale.S,v 1.3 2003/12/15 09:27:18 scw Exp $ */
4 * Copyright 2003 Wasabi Systems, Inc.
7 * Written by Steve C. Woodford for Wasabi Systems, Inc.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed for the NetBSD Project by
20 * Wasabi Systems, Inc.
21 * 4. The name of Wasabi Systems, Inc. may not be used to endorse
22 * or promote products derived from this software without specific prior
25 * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
27 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC
29 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
35 * POSSIBILITY OF SUCH DAMAGE.
38 #include <machine/asm.h>
39 __FBSDID("$FreeBSD$");
41 #include <machine/acle-compat.h>
48 #define GET_PCB(tmp) \
49 mrc p15, 0, tmp, c13, c0, 4; \
50 add tmp, tmp, #(TD_PCB)
53 .word _C_LABEL(__pcpu) + PC_CURPCB
54 #define GET_PCB(tmp) \
59 * r0 = user space address
60 * r1 = kernel space address
63 * Copies bytes from user space to kernel space
68 movle pc, lr /* Bail early if length is <= 0 */
74 ldr r3, .L_min_memcpy_size
78 stmfd sp!, {r0-r2, r4, lr}
82 mov r3, #2 /* SRC_IS_USER */
87 ldmfd sp!, {r0-r2, r4, lr}
92 stmfd sp!, {r10-r11, lr}
98 adr ip, .Lcopyin_fault
99 ldr r11, [r10, #PCB_ONFAULT]
100 str ip, [r10, #PCB_ONFAULT]
102 str r11, [r10, #PCB_ONFAULT]
104 ldmfd sp!, {r10-r11, pc}
108 str r11, [r10, #PCB_ONFAULT]
110 ldmfdgt sp!, {r4-r7} /* r3 > 0 Restore r4-r7 */
111 ldmfdlt sp!, {r4-r9} /* r3 < 0 Restore r4-r9 */
112 ldmfd sp!, {r10-r11, pc}
116 /* Word-align the destination buffer */
117 ands ip, r1, #0x03 /* Already word aligned? */
118 beq .Lcopyin_wordaligned /* Yup */
120 cmp r2, ip /* Enough bytes left to align it? */
121 blt .Lcopyin_l4_2 /* Nope. Just copy bytewise */
124 addne pc, pc, ip, lsl #3
126 ldrbt ip, [r0], #0x01
128 ldrbt ip, [r0], #0x01
130 ldrbt ip, [r0], #0x01
132 cmp r2, #0x00 /* All done? */
135 /* Destination buffer is now word aligned */
136 .Lcopyin_wordaligned:
137 ands ip, r0, #0x03 /* Is src also word-aligned? */
138 bne .Lcopyin_bad_align /* Nope. Things just got bad */
139 cmp r2, #0x08 /* Less than 8 bytes remaining? */
140 blt .Lcopyin_w_less_than8
142 /* Quad-align the destination buffer */
143 tst r1, #0x07 /* Already quad aligned? */
144 ldrtne ip, [r0], #0x04
145 strne ip, [r1], #0x04
147 stmfd sp!, {r4-r9} /* Free up some registers */
148 mov r3, #-1 /* Signal restore r4-r9 */
150 /* Destination buffer quad aligned, source is word aligned */
152 blt .Lcopyin_w_lessthan128
154 /* Copy 128 bytes at a time */
156 ldrt r4, [r0], #0x04 /* LD:00-03 */
157 ldrt r5, [r0], #0x04 /* LD:04-07 */
158 pld [r0, #0x18] /* Prefetch 0x20 */
159 ldrt r6, [r0], #0x04 /* LD:08-0b */
160 ldrt r7, [r0], #0x04 /* LD:0c-0f */
161 ldrt r8, [r0], #0x04 /* LD:10-13 */
162 ldrt r9, [r0], #0x04 /* LD:14-17 */
163 strd r4, [r1], #0x08 /* ST:00-07 */
164 ldrt r4, [r0], #0x04 /* LD:18-1b */
165 ldrt r5, [r0], #0x04 /* LD:1c-1f */
166 strd r6, [r1], #0x08 /* ST:08-0f */
167 ldrt r6, [r0], #0x04 /* LD:20-23 */
168 ldrt r7, [r0], #0x04 /* LD:24-27 */
169 pld [r0, #0x18] /* Prefetch 0x40 */
170 strd r8, [r1], #0x08 /* ST:10-17 */
171 ldrt r8, [r0], #0x04 /* LD:28-2b */
172 ldrt r9, [r0], #0x04 /* LD:2c-2f */
173 strd r4, [r1], #0x08 /* ST:18-1f */
174 ldrt r4, [r0], #0x04 /* LD:30-33 */
175 ldrt r5, [r0], #0x04 /* LD:34-37 */
176 strd r6, [r1], #0x08 /* ST:20-27 */
177 ldrt r6, [r0], #0x04 /* LD:38-3b */
178 ldrt r7, [r0], #0x04 /* LD:3c-3f */
179 strd r8, [r1], #0x08 /* ST:28-2f */
180 ldrt r8, [r0], #0x04 /* LD:40-43 */
181 ldrt r9, [r0], #0x04 /* LD:44-47 */
182 pld [r0, #0x18] /* Prefetch 0x60 */
183 strd r4, [r1], #0x08 /* ST:30-37 */
184 ldrt r4, [r0], #0x04 /* LD:48-4b */
185 ldrt r5, [r0], #0x04 /* LD:4c-4f */
186 strd r6, [r1], #0x08 /* ST:38-3f */
187 ldrt r6, [r0], #0x04 /* LD:50-53 */
188 ldrt r7, [r0], #0x04 /* LD:54-57 */
189 strd r8, [r1], #0x08 /* ST:40-47 */
190 ldrt r8, [r0], #0x04 /* LD:58-5b */
191 ldrt r9, [r0], #0x04 /* LD:5c-5f */
192 strd r4, [r1], #0x08 /* ST:48-4f */
193 ldrt r4, [r0], #0x04 /* LD:60-63 */
194 ldrt r5, [r0], #0x04 /* LD:64-67 */
195 pld [r0, #0x18] /* Prefetch 0x80 */
196 strd r6, [r1], #0x08 /* ST:50-57 */
197 ldrt r6, [r0], #0x04 /* LD:68-6b */
198 ldrt r7, [r0], #0x04 /* LD:6c-6f */
199 strd r8, [r1], #0x08 /* ST:58-5f */
200 ldrt r8, [r0], #0x04 /* LD:70-73 */
201 ldrt r9, [r0], #0x04 /* LD:74-77 */
202 strd r4, [r1], #0x08 /* ST:60-67 */
203 ldrt r4, [r0], #0x04 /* LD:78-7b */
204 ldrt r5, [r0], #0x04 /* LD:7c-7f */
205 strd r6, [r1], #0x08 /* ST:68-6f */
206 strd r8, [r1], #0x08 /* ST:70-77 */
208 strd r4, [r1], #0x08 /* ST:78-7f */
209 bge .Lcopyin_w_loop128
211 .Lcopyin_w_lessthan128:
212 adds r2, r2, #0x80 /* Adjust for extra sub */
216 blt .Lcopyin_w_lessthan32
218 /* Copy 32 bytes at a time */
234 bge .Lcopyin_w_loop32
236 .Lcopyin_w_lessthan32:
237 adds r2, r2, #0x20 /* Adjust for extra sub */
239 RETeq /* Return now if done */
244 add pc, pc, r5, lsl #1
247 /* At least 24 bytes remaining */
253 /* At least 16 bytes remaining */
259 /* At least 8 bytes remaining */
265 /* Less than 8 bytes remaining */
267 RETeq /* Return now if done */
270 .Lcopyin_w_less_than8:
272 ldrtge ip, [r0], #0x04
273 strge ip, [r1], #0x04
274 RETeq /* Return now if done */
276 ldrbt ip, [r0], #0x01
278 ldrbtge r2, [r0], #0x01
281 strbge r2, [r1], #0x01
286 * At this point, it has not been possible to word align both buffers.
287 * The destination buffer (r1) is word aligned, but the source buffer
300 .Lcopyin_bad1_loop16:
312 orr r4, r4, r5, lsr #24
314 orr r5, r5, r6, lsr #24
316 orr r6, r6, r7, lsr #24
318 orr r7, r7, ip, lsr #24
320 orr r4, r4, r5, lsl #24
322 orr r5, r5, r6, lsl #24
324 orr r6, r6, r7, lsl #24
326 orr r7, r7, ip, lsl #24
334 bge .Lcopyin_bad1_loop16
338 RETeq /* Return now if done */
352 orr r4, r4, ip, lsr #24
354 orr r4, r4, ip, lsl #24
357 bge .Lcopyin_bad1_loop4
361 .Lcopyin_bad2_loop16:
373 orr r4, r4, r5, lsr #16
375 orr r5, r5, r6, lsr #16
377 orr r6, r6, r7, lsr #16
379 orr r7, r7, ip, lsr #16
381 orr r4, r4, r5, lsl #16
383 orr r5, r5, r6, lsl #16
385 orr r6, r6, r7, lsl #16
387 orr r7, r7, ip, lsl #16
395 bge .Lcopyin_bad2_loop16
399 RETeq /* Return now if done */
413 orr r4, r4, ip, lsr #16
415 orr r4, r4, ip, lsl #16
418 bge .Lcopyin_bad2_loop4
422 .Lcopyin_bad3_loop16:
434 orr r4, r4, r5, lsr #8
436 orr r5, r5, r6, lsr #8
438 orr r6, r6, r7, lsr #8
440 orr r7, r7, ip, lsr #8
442 orr r4, r4, r5, lsl #8
444 orr r5, r5, r6, lsl #8
446 orr r6, r6, r7, lsl #8
448 orr r7, r7, ip, lsl #8
456 bge .Lcopyin_bad3_loop16
460 RETeq /* Return now if done */
474 orr r4, r4, ip, lsr #8
476 orr r4, r4, ip, lsl #8
479 bge .Lcopyin_bad3_loop4
489 addne pc, pc, r2, lsl #3
491 ldrbt ip, [r0], #0x01
493 ldrbt ip, [r0], #0x01
501 * r0 = kernel space address
502 * r1 = user space address
505 * Copies bytes from kernel space to user space
510 movle pc, lr /* Bail early if length is <= 0 */
512 ldr r3, .L_arm_memcpy
516 ldr r3, .L_min_memcpy_size
520 stmfd sp!, {r0-r2, r4, lr}
524 mov r3, #1 /* DST_IS_USER */
525 ldr r4, .L_arm_memcpy
529 ldmfd sp!, {r0-r2, r4, lr}
534 stmfd sp!, {r10-r11, lr}
540 adr ip, .Lcopyout_fault
541 ldr r11, [r10, #PCB_ONFAULT]
542 str ip, [r10, #PCB_ONFAULT]
544 str r11, [r10, #PCB_ONFAULT]
546 ldmfd sp!, {r10-r11, pc}
550 str r11, [r10, #PCB_ONFAULT]
552 ldmfdgt sp!, {r4-r7} /* r3 > 0 Restore r4-r7 */
553 ldmfdlt sp!, {r4-r9} /* r3 < 0 Restore r4-r9 */
554 ldmfd sp!, {r10-r11, pc}
558 /* Word-align the destination buffer */
559 ands ip, r1, #0x03 /* Already word aligned? */
560 beq .Lcopyout_wordaligned /* Yup */
562 cmp r2, ip /* Enough bytes left to align it? */
563 blt .Lcopyout_l4_2 /* Nope. Just copy bytewise */
566 addne pc, pc, ip, lsl #3
569 strbt ip, [r1], #0x01
571 strbt ip, [r1], #0x01
573 strbt ip, [r1], #0x01
574 cmp r2, #0x00 /* All done? */
577 /* Destination buffer is now word aligned */
578 .Lcopyout_wordaligned:
579 ands ip, r0, #0x03 /* Is src also word-aligned? */
580 bne .Lcopyout_bad_align /* Nope. Things just got bad */
581 cmp r2, #0x08 /* Less than 8 bytes remaining? */
582 blt .Lcopyout_w_less_than8
584 /* Quad-align the destination buffer */
585 tst r0, #0x07 /* Already quad aligned? */
586 ldrne ip, [r0], #0x04
588 strtne ip, [r1], #0x04
590 stmfd sp!, {r4-r9} /* Free up some registers */
591 mov r3, #-1 /* Signal restore r4-r9 */
593 /* Destination buffer word aligned, source is quad aligned */
595 blt .Lcopyout_w_lessthan128
597 /* Copy 128 bytes at a time */
599 ldrd r4, [r0], #0x08 /* LD:00-07 */
600 pld [r0, #0x18] /* Prefetch 0x20 */
601 ldrd r6, [r0], #0x08 /* LD:08-0f */
602 ldrd r8, [r0], #0x08 /* LD:10-17 */
603 strt r4, [r1], #0x04 /* ST:00-03 */
604 strt r5, [r1], #0x04 /* ST:04-07 */
605 ldrd r4, [r0], #0x08 /* LD:18-1f */
606 strt r6, [r1], #0x04 /* ST:08-0b */
607 strt r7, [r1], #0x04 /* ST:0c-0f */
608 ldrd r6, [r0], #0x08 /* LD:20-27 */
609 pld [r0, #0x18] /* Prefetch 0x40 */
610 strt r8, [r1], #0x04 /* ST:10-13 */
611 strt r9, [r1], #0x04 /* ST:14-17 */
612 ldrd r8, [r0], #0x08 /* LD:28-2f */
613 strt r4, [r1], #0x04 /* ST:18-1b */
614 strt r5, [r1], #0x04 /* ST:1c-1f */
615 ldrd r4, [r0], #0x08 /* LD:30-37 */
616 strt r6, [r1], #0x04 /* ST:20-23 */
617 strt r7, [r1], #0x04 /* ST:24-27 */
618 ldrd r6, [r0], #0x08 /* LD:38-3f */
619 strt r8, [r1], #0x04 /* ST:28-2b */
620 strt r9, [r1], #0x04 /* ST:2c-2f */
621 ldrd r8, [r0], #0x08 /* LD:40-47 */
622 pld [r0, #0x18] /* Prefetch 0x60 */
623 strt r4, [r1], #0x04 /* ST:30-33 */
624 strt r5, [r1], #0x04 /* ST:34-37 */
625 ldrd r4, [r0], #0x08 /* LD:48-4f */
626 strt r6, [r1], #0x04 /* ST:38-3b */
627 strt r7, [r1], #0x04 /* ST:3c-3f */
628 ldrd r6, [r0], #0x08 /* LD:50-57 */
629 strt r8, [r1], #0x04 /* ST:40-43 */
630 strt r9, [r1], #0x04 /* ST:44-47 */
631 ldrd r8, [r0], #0x08 /* LD:58-4f */
632 strt r4, [r1], #0x04 /* ST:48-4b */
633 strt r5, [r1], #0x04 /* ST:4c-4f */
634 ldrd r4, [r0], #0x08 /* LD:60-67 */
635 pld [r0, #0x18] /* Prefetch 0x80 */
636 strt r6, [r1], #0x04 /* ST:50-53 */
637 strt r7, [r1], #0x04 /* ST:54-57 */
638 ldrd r6, [r0], #0x08 /* LD:68-6f */
639 strt r8, [r1], #0x04 /* ST:58-5b */
640 strt r9, [r1], #0x04 /* ST:5c-5f */
641 ldrd r8, [r0], #0x08 /* LD:70-77 */
642 strt r4, [r1], #0x04 /* ST:60-63 */
643 strt r5, [r1], #0x04 /* ST:64-67 */
644 ldrd r4, [r0], #0x08 /* LD:78-7f */
645 strt r6, [r1], #0x04 /* ST:68-6b */
646 strt r7, [r1], #0x04 /* ST:6c-6f */
647 strt r8, [r1], #0x04 /* ST:70-73 */
648 strt r9, [r1], #0x04 /* ST:74-77 */
650 strt r4, [r1], #0x04 /* ST:78-7b */
651 strt r5, [r1], #0x04 /* ST:7c-7f */
652 bge .Lcopyout_w_loop128
654 .Lcopyout_w_lessthan128:
655 adds r2, r2, #0x80 /* Adjust for extra sub */
657 RETeq /* Return now if done */
659 blt .Lcopyout_w_lessthan32
661 /* Copy 32 bytes at a time */
677 bge .Lcopyout_w_loop32
679 .Lcopyout_w_lessthan32:
680 adds r2, r2, #0x20 /* Adjust for extra sub */
682 RETeq /* Return now if done */
687 add pc, pc, r5, lsl #1
690 /* At least 24 bytes remaining */
696 /* At least 16 bytes remaining */
702 /* At least 8 bytes remaining */
708 /* Less than 8 bytes remaining */
710 RETeq /* Return now if done */
713 .Lcopyout_w_less_than8:
715 ldrge ip, [r0], #0x04
716 strtge ip, [r1], #0x04
717 RETeq /* Return now if done */
721 ldrbge r2, [r0], #0x01
722 strbt ip, [r1], #0x01
724 strbtge r2, [r1], #0x01
729 * At this point, it has not been possible to word align both buffers.
730 * The destination buffer (r1) is word aligned, but the source buffer
743 .Lcopyout_bad1_loop16:
755 orr r4, r4, r5, lsr #24
757 orr r5, r5, r6, lsr #24
759 orr r6, r6, r7, lsr #24
761 orr r7, r7, ip, lsr #24
763 orr r4, r4, r5, lsl #24
765 orr r5, r5, r6, lsl #24
767 orr r6, r6, r7, lsl #24
769 orr r7, r7, ip, lsl #24
777 bge .Lcopyout_bad1_loop16
781 RETeq /* Return now if done */
786 .Lcopyout_bad1_loop4:
795 orr r4, r4, ip, lsr #24
797 orr r4, r4, ip, lsl #24
800 bge .Lcopyout_bad1_loop4
804 .Lcopyout_bad2_loop16:
816 orr r4, r4, r5, lsr #16
818 orr r5, r5, r6, lsr #16
820 orr r6, r6, r7, lsr #16
822 orr r7, r7, ip, lsr #16
824 orr r4, r4, r5, lsl #16
826 orr r5, r5, r6, lsl #16
828 orr r6, r6, r7, lsl #16
830 orr r7, r7, ip, lsl #16
838 bge .Lcopyout_bad2_loop16
842 RETeq /* Return now if done */
847 .Lcopyout_bad2_loop4:
856 orr r4, r4, ip, lsr #16
858 orr r4, r4, ip, lsl #16
861 bge .Lcopyout_bad2_loop4
865 .Lcopyout_bad3_loop16:
877 orr r4, r4, r5, lsr #8
879 orr r5, r5, r6, lsr #8
881 orr r6, r6, r7, lsr #8
883 orr r7, r7, ip, lsr #8
885 orr r4, r4, r5, lsl #8
887 orr r5, r5, r6, lsl #8
889 orr r6, r6, r7, lsl #8
891 orr r7, r7, ip, lsl #8
899 bge .Lcopyout_bad3_loop16
903 RETeq /* Return now if done */
908 .Lcopyout_bad3_loop4:
917 orr r4, r4, ip, lsr #8
919 orr r4, r4, ip, lsl #8
922 bge .Lcopyout_bad3_loop4
932 addne pc, pc, r2, lsl #3
935 strbt ip, [r1], #0x01
937 strbt ip, [r1], #0x01