Subversion Repositories or1k_old

/* 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.
!

#ifdef __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