122 lines
		
	
	
	
		
			2.3 KiB
			
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
		
		
			
		
	
	
			122 lines
		
	
	
	
		
			2.3 KiB
			
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
|   | /* Optimised simple memory fill | ||
|  |  * | ||
|  |  * Copyright (C) 2007 Red Hat, Inc. All Rights Reserved. | ||
|  |  * Written by David Howells (dhowells@redhat.com)
 | ||
|  |  * | ||
|  |  * This program is free software; you can redistribute it and/or
 | ||
|  |  * modify it under the terms of the GNU General Public Licence | ||
|  |  * as published by the Free Software Foundation; either version
 | ||
|  |  * 2 of the Licence, or (at your option) any later version. | ||
|  |  */ | ||
|  | #include <asm/cache.h> | ||
|  | 
 | ||
|  |         .section .text | ||
|  |         .balign	L1_CACHE_BYTES
 | ||
|  | 
 | ||
|  | ############################################################################### | ||
|  | # | ||
|  | # void *memset(void *dst, int c, size_t n) | ||
|  | # | ||
|  | ############################################################################### | ||
|  | 	.globl	memset
 | ||
|  |         .type	memset,@function
 | ||
|  | memset: | ||
|  | 	movm	[d2,d3],(sp) | ||
|  | 	mov	d0,(12,sp) | ||
|  | 	mov	d1,(16,sp) | ||
|  | 	mov	(20,sp),d2			# count | ||
|  | 	mov	d0,a0				# dst | ||
|  | 	mov	d0,e3				# the return value | ||
|  | 
 | ||
|  | 	cmp	+0,d2 | ||
|  | 	beq	memset_done			# return if zero-length fill | ||
|  | 
 | ||
|  | 	# see if the region parameters are four-byte aligned | ||
|  | 	or	d0,d2,d3 | ||
|  | 	and	+3,d3 | ||
|  | 	bne	memset_1			# jump if not | ||
|  | 
 | ||
|  | 	extbu	d1 | ||
|  | 	mov_asl	d1,d3,8,d1 | ||
|  | 	or_asl	d1,d3,8,d1 | ||
|  | 	or_asl	d1,d3,8,d1 | ||
|  | 	or	d3,d1 | ||
|  | 
 | ||
|  | 	# we want to transfer as much as we can in chunks of 32 bytes | ||
|  | 	cmp	+31,d2 | ||
|  | 	bls	memset_4_remainder		# 4-byte aligned remainder | ||
|  | 
 | ||
|  | 	add	-32,d2 | ||
|  | 	mov	+32,d3 | ||
|  | 
 | ||
|  | memset_4_loop: | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 
 | ||
|  | 	sub	d3,d2 | ||
|  | 	bcc	memset_4_loop | ||
|  | 
 | ||
|  | 	add	d3,d2 | ||
|  | 	beq	memset_4_no_remainder | ||
|  | 
 | ||
|  | memset_4_remainder: | ||
|  | 	# cut 4-7 words down to 0-3 | ||
|  | 	cmp	+16,d2 | ||
|  | 	bcs	memset_4_three_or_fewer_words | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 	mov	d1,(a0+) | ||
|  | 	add	-16,d2 | ||
|  | 	beq	memset_4_no_remainder | ||
|  | 
 | ||
|  | 	# copy the remaining 1, 2 or 3 words | ||
|  | memset_4_three_or_fewer_words: | ||
|  | 	cmp	+8,d2 | ||
|  | 	bcs	memset_4_one_word | ||
|  | 	beq	memset_4_two_words | ||
|  | 	mov	d1,(a0+) | ||
|  | memset_4_two_words: | ||
|  | 	mov	d1,(a0+) | ||
|  | memset_4_one_word: | ||
|  | 	mov	d1,(a0+) | ||
|  | 
 | ||
|  | memset_4_no_remainder: | ||
|  | 	# check we set the correct amount | ||
|  | 	# TODO: REMOVE CHECK | ||
|  | 	sub	e3,a0,d2 | ||
|  | 	mov	(20,sp),d1 | ||
|  | 	cmp	d2,d1 | ||
|  | 	beq	memset_done | ||
|  | 	break | ||
|  | 	break | ||
|  | 	break | ||
|  | 
 | ||
|  | memset_done: | ||
|  | 	mov	e3,a0 | ||
|  | 	ret	[d2,d3],8 | ||
|  | 
 | ||
|  | 	# handle misaligned copying | ||
|  | memset_1: | ||
|  | 	add	-1,d2 | ||
|  | 	mov	+1,d3 | ||
|  | 	setlb					# setlb requires the next insns | ||
|  | 						# to occupy exactly 4 bytes | ||
|  | 
 | ||
|  | 	sub	d3,d2 | ||
|  | 	movbu	d1,(a0) | ||
|  | 	inc	a0 | ||
|  | 	lcc | ||
|  | 
 | ||
|  | 	mov	e3,a0 | ||
|  | 	ret	[d2,d3],8 | ||
|  | 
 | ||
|  | memset_end: | ||
|  | 	.size	memset, memset_end-memset |