Home | History | Annotate | Line # | Download | only in powerpc
memset.S revision 1.6.64.1
      1 /*	$NetBSD: memset.S,v 1.6.64.1 2011/03/05 20:55:28 rmind Exp $ */
      2 
      3 /*-
      4  * Copyright (C) 2003	Matt Thomas <matt (at) 3am-software.com>
      5  * Copyright (C) 2001	Martin J. Laubach <mjl (at) NetBSD.org>
      6  * All rights reserved.
      7  *
      8  * Redistribution and use in source and binary forms, with or without
      9  * modification, are permitted provided that the following conditions
     10  * are met:
     11  * 1. Redistributions of source code must retain the above copyright
     12  *    notice, this list of conditions and the following disclaimer.
     13  * 2. Redistributions in binary form must reproduce the above copyright
     14  *    notice, this list of conditions and the following disclaimer in the
     15  *    documentation and/or other materials provided with the distribution.
     16  * 3. The name of the author may not be used to endorse or promote products
     17  *    derived from this software without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     20  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     21  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     22  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     23  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     24  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     25  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     26  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     27  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
     28  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     29  */
     30 /*----------------------------------------------------------------------*/
     31 
     32 #include <machine/asm.h>
     33 
     34 /*----------------------------------------------------------------------*/
     35 /*
     36      void bzero(void *b r3, size_t len r4);
     37      void *memset(void *b r3, int c r4, size_t len r5);
     38 */
     39 /*----------------------------------------------------------------------*/
     40 
     41 #define r_dst	%r4
     42 #define r_len	%r5
     43 #define r_tmp	%r6
     44 #define r_val	%r0
     45 
     46 ENTRY(bzero)
     47 		li	r_val, 0		/* Value to fill with */
     48 		mr	r_len, %r4
     49 		b	cb_memset
     50 
     51 ENTRY(memset)
     52 		mr	r_val, %r4		/* Value to fill with */
     53 
     54 cb_memset:
     55 		cmplwi	r_len, 0		/* is the length 0? */
     56 		beqlr-				/*    nothing to do */
     57 		mr	r_dst, %r3
     58 		/*
     59 		 * r3=start, r4=dstptr, r5=length, r0=fill-val
     60 		 */
     61 		cmplwi	r_len, 6		/* more than 6 bytes? */
     62 		bgt	complex_fill		/*    do it the complex way */
     63 		subi	r_dst, r_dst, 1		/* presubtract for stbu */
     64 simple_fill:	mtctr	r_len			/* set CTR */
     65 1:		stbu	r_val, 1(r_dst)		/* update memory */
     66 		bdnz+	1b			/*    until CTR is 0 */
     67 		blr				/* return */
     68 
     69 complex_fill:
     70 		rlwimi	r_val, r_val, 8, 16, 23	/* word extend fill value */
     71 		rlwimi	r_val, r_val, 16, 0, 15
     72 		andi.	r_tmp, r_dst, 0x03
     73 		beq+	word_fill		/* already aligned to word? */
     74 		andi.	r_tmp, r_dst, 0x01
     75 		beq	half_fill		/* aligned to halfword? */
     76 		stb	r_val, 0(r_dst)
     77 		addi	r_dst, r_dst, 1
     78 		subi	r_len, r_len, 1		/* subtract byte */
     79 		andi.	r_tmp, r_dst, 0x02
     80 		beq	word_fill		/* aligned to word? */
     81 half_fill:
     82 		sth	r_val, 0(r_dst)
     83 		addi	r_dst, r_dst, 2
     84 		subi	r_len, r_len, 2		/* subtract halfword */
     85 
     86 word_fill:
     87 		cmplwi	r_len, 4		/* we have more than 4 bytes? */
     88 		blt-	trailing_bytes		/* no?  finish writing */
     89 		srwi	r_tmp, r_len, 2		/* get word count */
     90 		mtctr	r_tmp
     91 		subi	r_dst, r_dst, 4
     92 1:		stwu	r_val, 4(r_dst)
     93 		bdnz+	1b
     94 
     95 trailing_bytes:
     96 		andi.	r_len, r_len, 0x03	/* how much left? */
     97 		beqlr+				/* nothing? return */
     98 		addi	r_dst, r_dst, 3
     99 		b	simple_fill
    100