| Nicolas Pitre | 7549423 | 2005-11-01 19:52:23 +0000 | [diff] [blame] | 1 | /* | 
 | 2 |  *  linux/arch/arm/lib/memmove.S | 
 | 3 |  * | 
 | 4 |  *  Author:	Nicolas Pitre | 
 | 5 |  *  Created:	Sep 28, 2005 | 
 | 6 |  *  Copyright:	(C) MontaVista Software Inc. | 
 | 7 |  * | 
 | 8 |  *  This program is free software; you can redistribute it and/or modify | 
 | 9 |  *  it under the terms of the GNU General Public License version 2 as | 
 | 10 |  *  published by the Free Software Foundation. | 
 | 11 |  */ | 
 | 12 |  | 
 | 13 | #include <linux/linkage.h> | 
 | 14 | #include <asm/assembler.h> | 
 | 15 |  | 
 | 16 | /* | 
 | 17 |  * This can be used to enable code to cacheline align the source pointer. | 
 | 18 |  * Experiments on tested architectures (StrongARM and XScale) didn't show | 
 | 19 |  * this a worthwhile thing to do.  That might be different in the future. | 
 | 20 |  */ | 
 | 21 | //#define CALGN(code...)        code | 
 | 22 | #define CALGN(code...) | 
 | 23 |  | 
 | 24 | 		.text | 
 | 25 |  | 
 | 26 | /* | 
 | 27 |  * Prototype: void *memmove(void *dest, const void *src, size_t n); | 
 | 28 |  * | 
 | 29 |  * Note: | 
 | 30 |  * | 
 | 31 |  * If the memory regions don't overlap, we simply branch to memcpy which is | 
 | 32 |  * normally a bit faster. Otherwise the copy is done going downwards.  This | 
 | 33 |  * is a transposition of the code from copy_template.S but with the copy | 
 | 34 |  * occurring in the opposite direction. | 
 | 35 |  */ | 
 | 36 |  | 
 | 37 | ENTRY(memmove) | 
 | 38 |  | 
 | 39 | 		subs	ip, r0, r1 | 
 | 40 | 		cmphi	r2, ip | 
 | 41 | 		bls	memcpy | 
 | 42 |  | 
 | 43 | 		stmfd	sp!, {r0, r4, lr} | 
 | 44 | 		add	r1, r1, r2 | 
 | 45 | 		add	r0, r0, r2 | 
 | 46 | 		subs	r2, r2, #4 | 
 | 47 | 		blt	8f | 
 | 48 | 		ands	ip, r0, #3 | 
 | 49 | 	PLD(	pld	[r1, #-4]		) | 
 | 50 | 		bne	9f | 
 | 51 | 		ands	ip, r1, #3 | 
 | 52 | 		bne	10f | 
 | 53 |  | 
 | 54 | 1:		subs	r2, r2, #(28) | 
 | 55 | 		stmfd	sp!, {r5 - r8} | 
 | 56 | 		blt	5f | 
 | 57 |  | 
 | 58 | 	CALGN(	ands	ip, r1, #31		) | 
 | 59 | 	CALGN(	sbcnes	r4, ip, r2		)  @ C is always set here | 
 | 60 | 	CALGN(	bcs	2f			) | 
 | 61 | 	CALGN(	adr	r4, 6f			) | 
 | 62 | 	CALGN(	subs	r2, r2, ip		)  @ C is set here | 
 | 63 | 	CALGN(	add	pc, r4, ip		) | 
 | 64 |  | 
 | 65 | 	PLD(	pld	[r1, #-4]		) | 
 | 66 | 2:	PLD(	subs	r2, r2, #96		) | 
 | 67 | 	PLD(	pld	[r1, #-32]		) | 
 | 68 | 	PLD(	blt	4f			) | 
 | 69 | 	PLD(	pld	[r1, #-64]		) | 
 | 70 | 	PLD(	pld	[r1, #-96]		) | 
 | 71 |  | 
 | 72 | 3:	PLD(	pld	[r1, #-128]		) | 
 | 73 | 4:		ldmdb	r1!, {r3, r4, r5, r6, r7, r8, ip, lr} | 
 | 74 | 		subs	r2, r2, #32 | 
 | 75 | 		stmdb	r0!, {r3, r4, r5, r6, r7, r8, ip, lr} | 
 | 76 | 		bge	3b | 
 | 77 | 	PLD(	cmn	r2, #96			) | 
 | 78 | 	PLD(	bge	4b			) | 
 | 79 |  | 
 | 80 | 5:		ands	ip, r2, #28 | 
 | 81 | 		rsb	ip, ip, #32 | 
 | 82 | 		addne	pc, pc, ip		@ C is always clear here | 
 | 83 | 		b	7f | 
 | 84 | 6:		nop | 
 | 85 | 		ldr	r3, [r1, #-4]! | 
 | 86 | 		ldr	r4, [r1, #-4]! | 
 | 87 | 		ldr	r5, [r1, #-4]! | 
 | 88 | 		ldr	r6, [r1, #-4]! | 
 | 89 | 		ldr	r7, [r1, #-4]! | 
 | 90 | 		ldr	r8, [r1, #-4]! | 
 | 91 | 		ldr	lr, [r1, #-4]! | 
 | 92 |  | 
 | 93 | 		add	pc, pc, ip | 
 | 94 | 		nop | 
 | 95 | 		nop | 
 | 96 | 		str	r3, [r0, #-4]! | 
 | 97 | 		str	r4, [r0, #-4]! | 
 | 98 | 		str	r5, [r0, #-4]! | 
 | 99 | 		str	r6, [r0, #-4]! | 
 | 100 | 		str	r7, [r0, #-4]! | 
 | 101 | 		str	r8, [r0, #-4]! | 
 | 102 | 		str	lr, [r0, #-4]! | 
 | 103 |  | 
 | 104 | 	CALGN(	bcs	2b			) | 
 | 105 |  | 
 | 106 | 7:		ldmfd	sp!, {r5 - r8} | 
 | 107 |  | 
 | 108 | 8:		movs	r2, r2, lsl #31 | 
 | 109 | 		ldrneb	r3, [r1, #-1]! | 
 | 110 | 		ldrcsb	r4, [r1, #-1]! | 
 | 111 | 		ldrcsb	ip, [r1, #-1] | 
 | 112 | 		strneb	r3, [r0, #-1]! | 
 | 113 | 		strcsb	r4, [r0, #-1]! | 
 | 114 | 		strcsb	ip, [r0, #-1] | 
 | 115 | 		ldmfd	sp!, {r0, r4, pc} | 
 | 116 |  | 
 | 117 | 9:		cmp	ip, #2 | 
 | 118 | 		ldrgtb	r3, [r1, #-1]! | 
 | 119 | 		ldrgeb	r4, [r1, #-1]! | 
 | 120 | 		ldrb	lr, [r1, #-1]! | 
 | 121 | 		strgtb	r3, [r0, #-1]! | 
 | 122 | 		strgeb	r4, [r0, #-1]! | 
 | 123 | 		subs	r2, r2, ip | 
 | 124 | 		strb	lr, [r0, #-1]! | 
 | 125 | 		blt	8b | 
 | 126 | 		ands	ip, r1, #3 | 
 | 127 | 		beq	1b | 
 | 128 |  | 
 | 129 | 10:		bic	r1, r1, #3 | 
 | 130 | 		cmp	ip, #2 | 
 | 131 | 		ldr	r3, [r1, #0] | 
 | 132 | 		beq	17f | 
 | 133 | 		blt	18f | 
 | 134 |  | 
 | 135 |  | 
 | 136 | 		.macro	backward_copy_shift push pull | 
 | 137 |  | 
 | 138 | 		subs	r2, r2, #28 | 
 | 139 | 		blt	14f | 
 | 140 |  | 
 | 141 | 	CALGN(	ands	ip, r1, #31		) | 
 | 142 | 	CALGN(	rsb	ip, ip, #32		) | 
 | 143 | 	CALGN(	sbcnes	r4, ip, r2		)  @ C is always set here | 
 | 144 | 	CALGN(	subcc	r2, r2, ip		) | 
 | 145 | 	CALGN(	bcc	15f			) | 
 | 146 |  | 
 | 147 | 11:		stmfd	sp!, {r5 - r9} | 
 | 148 |  | 
 | 149 | 	PLD(	pld	[r1, #-4]		) | 
 | 150 | 	PLD(	subs	r2, r2, #96		) | 
 | 151 | 	PLD(	pld	[r1, #-32]		) | 
 | 152 | 	PLD(	blt	13f			) | 
 | 153 | 	PLD(	pld	[r1, #-64]		) | 
 | 154 | 	PLD(	pld	[r1, #-96]		) | 
 | 155 |  | 
 | 156 | 12:	PLD(	pld	[r1, #-128]		) | 
 | 157 | 13:		ldmdb   r1!, {r7, r8, r9, ip} | 
 | 158 | 		mov     lr, r3, push #\push | 
 | 159 | 		subs    r2, r2, #32 | 
 | 160 | 		ldmdb   r1!, {r3, r4, r5, r6} | 
 | 161 | 		orr     lr, lr, ip, pull #\pull | 
 | 162 | 		mov     ip, ip, push #\push | 
 | 163 | 		orr     ip, ip, r9, pull #\pull | 
 | 164 | 		mov     r9, r9, push #\push | 
 | 165 | 		orr     r9, r9, r8, pull #\pull | 
 | 166 | 		mov     r8, r8, push #\push | 
 | 167 | 		orr     r8, r8, r7, pull #\pull | 
 | 168 | 		mov     r7, r7, push #\push | 
 | 169 | 		orr     r7, r7, r6, pull #\pull | 
 | 170 | 		mov     r6, r6, push #\push | 
 | 171 | 		orr     r6, r6, r5, pull #\pull | 
 | 172 | 		mov     r5, r5, push #\push | 
 | 173 | 		orr     r5, r5, r4, pull #\pull | 
 | 174 | 		mov     r4, r4, push #\push | 
 | 175 | 		orr     r4, r4, r3, pull #\pull | 
 | 176 | 		stmdb   r0!, {r4 - r9, ip, lr} | 
 | 177 | 		bge	12b | 
 | 178 | 	PLD(	cmn	r2, #96			) | 
 | 179 | 	PLD(	bge	13b			) | 
 | 180 |  | 
 | 181 | 		ldmfd	sp!, {r5 - r9} | 
 | 182 |  | 
 | 183 | 14:		ands	ip, r2, #28 | 
 | 184 | 		beq	16f | 
 | 185 |  | 
 | 186 | 15:		mov     lr, r3, push #\push | 
 | 187 | 		ldr	r3, [r1, #-4]! | 
 | 188 | 		subs	ip, ip, #4 | 
 | 189 | 		orr	lr, lr, r3, pull #\pull | 
 | 190 | 		str	lr, [r0, #-4]! | 
 | 191 | 		bgt	15b | 
 | 192 | 	CALGN(	cmp	r2, #0			) | 
 | 193 | 	CALGN(	bge	11b			) | 
 | 194 |  | 
 | 195 | 16:		add	r1, r1, #(\pull / 8) | 
 | 196 | 		b	8b | 
 | 197 |  | 
 | 198 | 		.endm | 
 | 199 |  | 
 | 200 |  | 
 | 201 | 		backward_copy_shift	push=8	pull=24 | 
 | 202 |  | 
 | 203 | 17:		backward_copy_shift	push=16	pull=16 | 
 | 204 |  | 
 | 205 | 18:		backward_copy_shift	push=24	pull=8 | 
 | 206 |  |