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
 |