92 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			92 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
| /* Cloned and hacked for uClibc by Paul Mundt, December 2003 */
 | |
| /* Modified by SuperH, Inc. September 2003 */
 | |
| !
 | |
| ! Fast SH memset
 | |
| !
 | |
| ! by Toshiyasu Morita (tm@netcom.com)
 | |
| !
 | |
| ! SH5 code by J"orn Rennecke (joern.rennecke@superh.com)
 | |
| ! Copyright 2002 SuperH Ltd.
 | |
| !
 | |
| 
 | |
| #if __BYTE_ORDER == __LITTLE_ENDIAN
 | |
| #define SHHI shlld
 | |
| #define SHLO shlrd
 | |
| #else
 | |
| #define SHHI shlrd
 | |
| #define SHLO shlld
 | |
| #endif
 | |
| 
 | |
| 	.section .text..SHmedia32,"ax"
 | |
| 	.globl	memset
 | |
| 	.type	memset, @function
 | |
| 
 | |
| 	.align 5
 | |
| 
 | |
| memset:
 | |
| 	pta/l multiquad, tr0
 | |
| 	andi r2, 7, r22
 | |
| 	ptabs r18, tr2
 | |
| 	mshflo.b r3,r3,r3
 | |
| 	add r4, r22, r23
 | |
| 	mperm.w r3, r63, r3	// Fill pattern now in every byte of r3
 | |
| 
 | |
| 	movi 8, r9
 | |
| 	bgtu/u r23, r9, tr0 // multiquad
 | |
| 
 | |
| 	beqi/u r4, 0, tr2       // Return with size 0 - ensures no mem accesses
 | |
| 	ldlo.q r2, 0, r7
 | |
| 	shlli r4, 2, r4
 | |
| 	movi -1, r8
 | |
| 	SHHI r8, r4, r8
 | |
| 	SHHI r8, r4, r8
 | |
| 	mcmv r7, r8, r3
 | |
| 	stlo.q r2, 0, r3
 | |
| 	blink tr2, r63
 | |
| 
 | |
| multiquad:
 | |
| 	pta/l lastquad, tr0
 | |
| 	stlo.q r2, 0, r3
 | |
| 	shlri r23, 3, r24
 | |
| 	add r2, r4, r5
 | |
| 	beqi/u r24, 1, tr0 // lastquad
 | |
| 	pta/l loop, tr1
 | |
| 	sub r2, r22, r25
 | |
| 	andi r5, -8, r20   // calculate end address and
 | |
| 	addi r20, -7*8, r8 // loop end address; This might overflow, so we need
 | |
| 	                   // to use a different test before we start the loop
 | |
| 	bge/u r24, r9, tr1 // loop
 | |
| 	st.q r25, 8, r3
 | |
| 	st.q r20, -8, r3
 | |
| 	shlri r24, 1, r24
 | |
| 	beqi/u r24, 1, tr0 // lastquad
 | |
| 	st.q r25, 16, r3
 | |
| 	st.q r20, -16, r3
 | |
| 	beqi/u r24, 2, tr0 // lastquad
 | |
| 	st.q r25, 24, r3
 | |
| 	st.q r20, -24, r3
 | |
| lastquad:
 | |
| 	sthi.q r5, -1, r3
 | |
| 	blink tr2,r63
 | |
| 
 | |
| loop:
 | |
| !!!	alloco r25, 32	// QQQ comment out for short-term fix to SHUK #3895.
 | |
| 			// QQQ commenting out is locically correct, but sub-optimal
 | |
| 			// QQQ Sean McGoogan - 4th April 2003.
 | |
| 	st.q r25, 8, r3
 | |
| 	st.q r25, 16, r3
 | |
| 	st.q r25, 24, r3
 | |
| 	st.q r25, 32, r3
 | |
| 	addi r25, 32, r25
 | |
| 	bgeu/l r8, r25, tr1 // loop
 | |
| 
 | |
| 	st.q r20, -40, r3
 | |
| 	st.q r20, -32, r3
 | |
| 	st.q r20, -24, r3
 | |
| 	st.q r20, -16, r3
 | |
| 	st.q r20, -8, r3
 | |
| 	sthi.q r5, -1, r3
 | |
| 	blink tr2,r63
 | |
| 
 | |
| 	.size	memset,.-memset
 |