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$");
45 #define GET_PCB(tmp) \
46 mrc p15, 0, tmp, c13, c0, 4; \
47 add tmp, tmp, #(PC_CURPCB)
50 .word _C_LABEL(__pcpu) + PC_CURPCB
51 #define GET_PCB(tmp) \
56 * r0 = user space address
57 * r1 = kernel space address
60 * Copies bytes from user space to kernel space
65 movle pc, lr /* Bail early if length is <= 0 */
71 ldr r3, .L_min_memcpy_size
75 stmfd sp!, {r0-r2, r4, lr}
79 mov r3, #2 /* SRC_IS_USER */
84 ldmfd sp!, {r0-r2, r4, lr}
89 stmfd sp!, {r10-r11, lr}
95 adr ip, .Lcopyin_fault
96 ldr r11, [r10, #PCB_ONFAULT]
97 str ip, [r10, #PCB_ONFAULT]
99 str r11, [r10, #PCB_ONFAULT]
101 ldmfd sp!, {r10-r11, pc}
105 str r11, [r10, #PCB_ONFAULT]
107 ldmgtfd sp!, {r4-r7} /* r3 > 0 Restore r4-r7 */
108 ldmltfd sp!, {r4-r9} /* r3 < 0 Restore r4-r9 */
109 ldmfd sp!, {r10-r11, pc}
113 /* Word-align the destination buffer */
114 ands ip, r1, #0x03 /* Already word aligned? */
115 beq .Lcopyin_wordaligned /* Yup */
117 cmp r2, ip /* Enough bytes left to align it? */
118 blt .Lcopyin_l4_2 /* Nope. Just copy bytewise */
121 addne pc, pc, ip, lsl #3
123 ldrbt ip, [r0], #0x01
125 ldrbt ip, [r0], #0x01
127 ldrbt ip, [r0], #0x01
129 cmp r2, #0x00 /* All done? */
132 /* Destination buffer is now word aligned */
133 .Lcopyin_wordaligned:
134 ands ip, r0, #0x03 /* Is src also word-aligned? */
135 bne .Lcopyin_bad_align /* Nope. Things just got bad */
136 cmp r2, #0x08 /* Less than 8 bytes remaining? */
137 blt .Lcopyin_w_less_than8
139 /* Quad-align the destination buffer */
140 tst r1, #0x07 /* Already quad aligned? */
141 ldrnet ip, [r0], #0x04
142 strne ip, [r1], #0x04
144 stmfd sp!, {r4-r9} /* Free up some registers */
145 mov r3, #-1 /* Signal restore r4-r9 */
147 /* Destination buffer quad aligned, source is word aligned */
149 blt .Lcopyin_w_lessthan128
151 /* Copy 128 bytes at a time */
153 ldrt r4, [r0], #0x04 /* LD:00-03 */
154 ldrt r5, [r0], #0x04 /* LD:04-07 */
155 pld [r0, #0x18] /* Prefetch 0x20 */
156 ldrt r6, [r0], #0x04 /* LD:08-0b */
157 ldrt r7, [r0], #0x04 /* LD:0c-0f */
158 ldrt r8, [r0], #0x04 /* LD:10-13 */
159 ldrt r9, [r0], #0x04 /* LD:14-17 */
160 strd r4, [r1], #0x08 /* ST:00-07 */
161 ldrt r4, [r0], #0x04 /* LD:18-1b */
162 ldrt r5, [r0], #0x04 /* LD:1c-1f */
163 strd r6, [r1], #0x08 /* ST:08-0f */
164 ldrt r6, [r0], #0x04 /* LD:20-23 */
165 ldrt r7, [r0], #0x04 /* LD:24-27 */
166 pld [r0, #0x18] /* Prefetch 0x40 */
167 strd r8, [r1], #0x08 /* ST:10-17 */
168 ldrt r8, [r0], #0x04 /* LD:28-2b */
169 ldrt r9, [r0], #0x04 /* LD:2c-2f */
170 strd r4, [r1], #0x08 /* ST:18-1f */
171 ldrt r4, [r0], #0x04 /* LD:30-33 */
172 ldrt r5, [r0], #0x04 /* LD:34-37 */
173 strd r6, [r1], #0x08 /* ST:20-27 */
174 ldrt r6, [r0], #0x04 /* LD:38-3b */
175 ldrt r7, [r0], #0x04 /* LD:3c-3f */
176 strd r8, [r1], #0x08 /* ST:28-2f */
177 ldrt r8, [r0], #0x04 /* LD:40-43 */
178 ldrt r9, [r0], #0x04 /* LD:44-47 */
179 pld [r0, #0x18] /* Prefetch 0x60 */
180 strd r4, [r1], #0x08 /* ST:30-37 */
181 ldrt r4, [r0], #0x04 /* LD:48-4b */
182 ldrt r5, [r0], #0x04 /* LD:4c-4f */
183 strd r6, [r1], #0x08 /* ST:38-3f */
184 ldrt r6, [r0], #0x04 /* LD:50-53 */
185 ldrt r7, [r0], #0x04 /* LD:54-57 */
186 strd r8, [r1], #0x08 /* ST:40-47 */
187 ldrt r8, [r0], #0x04 /* LD:58-5b */
188 ldrt r9, [r0], #0x04 /* LD:5c-5f */
189 strd r4, [r1], #0x08 /* ST:48-4f */
190 ldrt r4, [r0], #0x04 /* LD:60-63 */
191 ldrt r5, [r0], #0x04 /* LD:64-67 */
192 pld [r0, #0x18] /* Prefetch 0x80 */
193 strd r6, [r1], #0x08 /* ST:50-57 */
194 ldrt r6, [r0], #0x04 /* LD:68-6b */
195 ldrt r7, [r0], #0x04 /* LD:6c-6f */
196 strd r8, [r1], #0x08 /* ST:58-5f */
197 ldrt r8, [r0], #0x04 /* LD:70-73 */
198 ldrt r9, [r0], #0x04 /* LD:74-77 */
199 strd r4, [r1], #0x08 /* ST:60-67 */
200 ldrt r4, [r0], #0x04 /* LD:78-7b */
201 ldrt r5, [r0], #0x04 /* LD:7c-7f */
202 strd r6, [r1], #0x08 /* ST:68-6f */
203 strd r8, [r1], #0x08 /* ST:70-77 */
205 strd r4, [r1], #0x08 /* ST:78-7f */
206 bge .Lcopyin_w_loop128
208 .Lcopyin_w_lessthan128:
209 adds r2, r2, #0x80 /* Adjust for extra sub */
213 blt .Lcopyin_w_lessthan32
215 /* Copy 32 bytes at a time */
231 bge .Lcopyin_w_loop32
233 .Lcopyin_w_lessthan32:
234 adds r2, r2, #0x20 /* Adjust for extra sub */
236 RETeq /* Return now if done */
241 add pc, pc, r5, lsl #1
244 /* At least 24 bytes remaining */
250 /* At least 16 bytes remaining */
256 /* At least 8 bytes remaining */
262 /* Less than 8 bytes remaining */
264 RETeq /* Return now if done */
267 .Lcopyin_w_less_than8:
269 ldrget ip, [r0], #0x04
270 strge ip, [r1], #0x04
271 RETeq /* Return now if done */
273 ldrbt ip, [r0], #0x01
275 ldrgebt r2, [r0], #0x01
278 strgeb r2, [r1], #0x01
283 * At this point, it has not been possible to word align both buffers.
284 * The destination buffer (r1) is word aligned, but the source buffer
297 .Lcopyin_bad1_loop16:
309 orr r4, r4, r5, lsr #24
311 orr r5, r5, r6, lsr #24
313 orr r6, r6, r7, lsr #24
315 orr r7, r7, ip, lsr #24
317 orr r4, r4, r5, lsl #24
319 orr r5, r5, r6, lsl #24
321 orr r6, r6, r7, lsl #24
323 orr r7, r7, ip, lsl #24
331 bge .Lcopyin_bad1_loop16
335 RETeq /* Return now if done */
349 orr r4, r4, ip, lsr #24
351 orr r4, r4, ip, lsl #24
354 bge .Lcopyin_bad1_loop4
358 .Lcopyin_bad2_loop16:
370 orr r4, r4, r5, lsr #16
372 orr r5, r5, r6, lsr #16
374 orr r6, r6, r7, lsr #16
376 orr r7, r7, ip, lsr #16
378 orr r4, r4, r5, lsl #16
380 orr r5, r5, r6, lsl #16
382 orr r6, r6, r7, lsl #16
384 orr r7, r7, ip, lsl #16
392 bge .Lcopyin_bad2_loop16
396 RETeq /* Return now if done */
410 orr r4, r4, ip, lsr #16
412 orr r4, r4, ip, lsl #16
415 bge .Lcopyin_bad2_loop4
419 .Lcopyin_bad3_loop16:
431 orr r4, r4, r5, lsr #8
433 orr r5, r5, r6, lsr #8
435 orr r6, r6, r7, lsr #8
437 orr r7, r7, ip, lsr #8
439 orr r4, r4, r5, lsl #8
441 orr r5, r5, r6, lsl #8
443 orr r6, r6, r7, lsl #8
445 orr r7, r7, ip, lsl #8
453 bge .Lcopyin_bad3_loop16
457 RETeq /* Return now if done */
471 orr r4, r4, ip, lsr #8
473 orr r4, r4, ip, lsl #8
476 bge .Lcopyin_bad3_loop4
486 addne pc, pc, r2, lsl #3
488 ldrbt ip, [r0], #0x01
490 ldrbt ip, [r0], #0x01
498 * r0 = kernel space address
499 * r1 = user space address
502 * Copies bytes from kernel space to user space
507 movle pc, lr /* Bail early if length is <= 0 */
509 ldr r3, .L_arm_memcpy
513 ldr r3, .L_min_memcpy_size
517 stmfd sp!, {r0-r2, r4, lr}
521 mov r3, #1 /* DST_IS_USER */
522 ldr r4, .L_arm_memcpy
526 ldmfd sp!, {r0-r2, r4, lr}
531 stmfd sp!, {r10-r11, lr}
537 adr ip, .Lcopyout_fault
538 ldr r11, [r10, #PCB_ONFAULT]
539 str ip, [r10, #PCB_ONFAULT]
541 str r11, [r10, #PCB_ONFAULT]
543 ldmfd sp!, {r10-r11, pc}
547 str r11, [r10, #PCB_ONFAULT]
549 ldmgtfd sp!, {r4-r7} /* r3 > 0 Restore r4-r7 */
550 ldmltfd sp!, {r4-r9} /* r3 < 0 Restore r4-r9 */
551 ldmfd sp!, {r10-r11, pc}
555 /* Word-align the destination buffer */
556 ands ip, r1, #0x03 /* Already word aligned? */
557 beq .Lcopyout_wordaligned /* Yup */
559 cmp r2, ip /* Enough bytes left to align it? */
560 blt .Lcopyout_l4_2 /* Nope. Just copy bytewise */
563 addne pc, pc, ip, lsl #3
566 strbt ip, [r1], #0x01
568 strbt ip, [r1], #0x01
570 strbt ip, [r1], #0x01
571 cmp r2, #0x00 /* All done? */
574 /* Destination buffer is now word aligned */
575 .Lcopyout_wordaligned:
576 ands ip, r0, #0x03 /* Is src also word-aligned? */
577 bne .Lcopyout_bad_align /* Nope. Things just got bad */
578 cmp r2, #0x08 /* Less than 8 bytes remaining? */
579 blt .Lcopyout_w_less_than8
581 /* Quad-align the destination buffer */
582 tst r0, #0x07 /* Already quad aligned? */
583 ldrne ip, [r0], #0x04
585 strnet ip, [r1], #0x04
587 stmfd sp!, {r4-r9} /* Free up some registers */
588 mov r3, #-1 /* Signal restore r4-r9 */
590 /* Destination buffer word aligned, source is quad aligned */
592 blt .Lcopyout_w_lessthan128
594 /* Copy 128 bytes at a time */
596 ldrd r4, [r0], #0x08 /* LD:00-07 */
597 pld [r0, #0x18] /* Prefetch 0x20 */
598 ldrd r6, [r0], #0x08 /* LD:08-0f */
599 ldrd r8, [r0], #0x08 /* LD:10-17 */
600 strt r4, [r1], #0x04 /* ST:00-03 */
601 strt r5, [r1], #0x04 /* ST:04-07 */
602 ldrd r4, [r0], #0x08 /* LD:18-1f */
603 strt r6, [r1], #0x04 /* ST:08-0b */
604 strt r7, [r1], #0x04 /* ST:0c-0f */
605 ldrd r6, [r0], #0x08 /* LD:20-27 */
606 pld [r0, #0x18] /* Prefetch 0x40 */
607 strt r8, [r1], #0x04 /* ST:10-13 */
608 strt r9, [r1], #0x04 /* ST:14-17 */
609 ldrd r8, [r0], #0x08 /* LD:28-2f */
610 strt r4, [r1], #0x04 /* ST:18-1b */
611 strt r5, [r1], #0x04 /* ST:1c-1f */
612 ldrd r4, [r0], #0x08 /* LD:30-37 */
613 strt r6, [r1], #0x04 /* ST:20-23 */
614 strt r7, [r1], #0x04 /* ST:24-27 */
615 ldrd r6, [r0], #0x08 /* LD:38-3f */
616 strt r8, [r1], #0x04 /* ST:28-2b */
617 strt r9, [r1], #0x04 /* ST:2c-2f */
618 ldrd r8, [r0], #0x08 /* LD:40-47 */
619 pld [r0, #0x18] /* Prefetch 0x60 */
620 strt r4, [r1], #0x04 /* ST:30-33 */
621 strt r5, [r1], #0x04 /* ST:34-37 */
622 ldrd r4, [r0], #0x08 /* LD:48-4f */
623 strt r6, [r1], #0x04 /* ST:38-3b */
624 strt r7, [r1], #0x04 /* ST:3c-3f */
625 ldrd r6, [r0], #0x08 /* LD:50-57 */
626 strt r8, [r1], #0x04 /* ST:40-43 */
627 strt r9, [r1], #0x04 /* ST:44-47 */
628 ldrd r8, [r0], #0x08 /* LD:58-4f */
629 strt r4, [r1], #0x04 /* ST:48-4b */
630 strt r5, [r1], #0x04 /* ST:4c-4f */
631 ldrd r4, [r0], #0x08 /* LD:60-67 */
632 pld [r0, #0x18] /* Prefetch 0x80 */
633 strt r6, [r1], #0x04 /* ST:50-53 */
634 strt r7, [r1], #0x04 /* ST:54-57 */
635 ldrd r6, [r0], #0x08 /* LD:68-6f */
636 strt r8, [r1], #0x04 /* ST:58-5b */
637 strt r9, [r1], #0x04 /* ST:5c-5f */
638 ldrd r8, [r0], #0x08 /* LD:70-77 */
639 strt r4, [r1], #0x04 /* ST:60-63 */
640 strt r5, [r1], #0x04 /* ST:64-67 */
641 ldrd r4, [r0], #0x08 /* LD:78-7f */
642 strt r6, [r1], #0x04 /* ST:68-6b */
643 strt r7, [r1], #0x04 /* ST:6c-6f */
644 strt r8, [r1], #0x04 /* ST:70-73 */
645 strt r9, [r1], #0x04 /* ST:74-77 */
647 strt r4, [r1], #0x04 /* ST:78-7b */
648 strt r5, [r1], #0x04 /* ST:7c-7f */
649 bge .Lcopyout_w_loop128
651 .Lcopyout_w_lessthan128:
652 adds r2, r2, #0x80 /* Adjust for extra sub */
654 RETeq /* Return now if done */
656 blt .Lcopyout_w_lessthan32
658 /* Copy 32 bytes at a time */
674 bge .Lcopyout_w_loop32
676 .Lcopyout_w_lessthan32:
677 adds r2, r2, #0x20 /* Adjust for extra sub */
679 RETeq /* Return now if done */
684 add pc, pc, r5, lsl #1
687 /* At least 24 bytes remaining */
693 /* At least 16 bytes remaining */
699 /* At least 8 bytes remaining */
705 /* Less than 8 bytes remaining */
707 RETeq /* Return now if done */
710 .Lcopyout_w_less_than8:
712 ldrge ip, [r0], #0x04
713 strget ip, [r1], #0x04
714 RETeq /* Return now if done */
718 ldrgeb r2, [r0], #0x01
719 strbt ip, [r1], #0x01
721 strgebt r2, [r1], #0x01
726 * At this point, it has not been possible to word align both buffers.
727 * The destination buffer (r1) is word aligned, but the source buffer
740 .Lcopyout_bad1_loop16:
752 orr r4, r4, r5, lsr #24
754 orr r5, r5, r6, lsr #24
756 orr r6, r6, r7, lsr #24
758 orr r7, r7, ip, lsr #24
760 orr r4, r4, r5, lsl #24
762 orr r5, r5, r6, lsl #24
764 orr r6, r6, r7, lsl #24
766 orr r7, r7, ip, lsl #24
774 bge .Lcopyout_bad1_loop16
778 RETeq /* Return now if done */
783 .Lcopyout_bad1_loop4:
792 orr r4, r4, ip, lsr #24
794 orr r4, r4, ip, lsl #24
797 bge .Lcopyout_bad1_loop4
801 .Lcopyout_bad2_loop16:
813 orr r4, r4, r5, lsr #16
815 orr r5, r5, r6, lsr #16
817 orr r6, r6, r7, lsr #16
819 orr r7, r7, ip, lsr #16
821 orr r4, r4, r5, lsl #16
823 orr r5, r5, r6, lsl #16
825 orr r6, r6, r7, lsl #16
827 orr r7, r7, ip, lsl #16
835 bge .Lcopyout_bad2_loop16
839 RETeq /* Return now if done */
844 .Lcopyout_bad2_loop4:
853 orr r4, r4, ip, lsr #16
855 orr r4, r4, ip, lsl #16
858 bge .Lcopyout_bad2_loop4
862 .Lcopyout_bad3_loop16:
874 orr r4, r4, r5, lsr #8
876 orr r5, r5, r6, lsr #8
878 orr r6, r6, r7, lsr #8
880 orr r7, r7, ip, lsr #8
882 orr r4, r4, r5, lsl #8
884 orr r5, r5, r6, lsl #8
886 orr r6, r6, r7, lsl #8
888 orr r7, r7, ip, lsl #8
896 bge .Lcopyout_bad3_loop16
900 RETeq /* Return now if done */
905 .Lcopyout_bad3_loop4:
914 orr r4, r4, ip, lsr #8
916 orr r4, r4, ip, lsl #8
919 bge .Lcopyout_bad3_loop4
929 addne pc, pc, r2, lsl #3
932 strbt ip, [r1], #0x01
934 strbt ip, [r1], #0x01