vserver 1.9.3
[linux-2.6.git] / arch / sparc64 / lib / U3memcpy.S
index e9982de..5cde954 100644 (file)
@@ -6,14 +6,50 @@
 #ifdef __KERNEL__
 #include <asm/visasm.h>
 #include <asm/asi.h>
-#include <asm/dcu.h>
-#include <asm/spitfire.h>
 #else
 #define ASI_BLK_P 0xf0
 #define FPRS_FEF  0x04
+#ifdef MEMCPY_DEBUG
+#define VISEntryHalf rd %fprs, %o5; wr %g0, FPRS_FEF, %fprs; \
+                    clr %g1; clr %g2; clr %g3; subcc %g0, %g0, %g0;
+#define VISExitHalf and %o5, FPRS_FEF, %o5; wr %o5, 0x0, %fprs
+#else
 #define VISEntryHalf rd %fprs, %o5; wr %g0, FPRS_FEF, %fprs
 #define VISExitHalf and %o5, FPRS_FEF, %o5; wr %o5, 0x0, %fprs
 #endif
+#endif
+
+#ifndef EX_LD
+#define EX_LD(x)       x
+#endif
+
+#ifndef EX_ST
+#define EX_ST(x)       x
+#endif
+
+#ifndef EX_RETVAL
+#define EX_RETVAL(x)   x
+#endif
+
+#ifndef LOAD
+#define LOAD(type,addr,dest)   type [addr], dest
+#endif
+
+#ifndef STORE
+#define STORE(type,src,addr)   type src, [addr]
+#endif
+
+#ifndef STORE_BLK
+#define STORE_BLK(src,addr)    stda src, [addr] ASI_BLK_P
+#endif
+
+#ifndef FUNC_NAME
+#define FUNC_NAME      U3memcpy
+#endif
+
+#ifndef PREAMBLE
+#define PREAMBLE
+#endif
 
 #ifndef XCC
 #define XCC xcc
@@ -33,7 +69,7 @@
         */
 
        .text
-       .align  32
+       .align          64
 
        /* The cheetah's flexible spine, oversized liver, enlarged heart,
         * slender muscular body, and claws make it the swiftest hunter
         * of up to 2.4GB per second.
         */
 
-       .globl  U3memcpy
-U3memcpy:      /* %o0=dst, %o1=src, %o2=len */
+       .globl  FUNC_NAME
+       .type   FUNC_NAME,#function
+FUNC_NAME:     /* %o0=dst, %o1=src, %o2=len */
+       PREAMBLE
        mov             %o0, %g5
        cmp             %o2, 0
        be,pn           %XCC, 85f
         or             %o0, %o1, %o3
        cmp             %o2, 16
-       bleu,a,pn       %XCC, 70f
+       blu,a,pn        %XCC, 80f
         or             %o3, %o2, %o3
 
-       cmp             %o2, 256
-       blu,pt          %XCC, 80f
+       cmp             %o2, (3 * 64)
+       blu,pt          %XCC, 70f
         andcc          %o3, 0x7, %g0
 
-       ba,pt           %xcc, 1f
-        andcc          %o0, 0x3f, %g2
-
-       /* Here len >= 256 and condition codes reflect execution
-        * of "andcc %o0, 0x7, %g2", done by caller.
+       /* Clobbers o5/g1/g2/g3/g7/icc/xcc.  We must preserve
+        * o5 from here until we hit VISExitHalf.
         */
-       .align          64
-1:
+       VISEntryHalf
+
        /* Is 'dst' already aligned on an 64-byte boundary? */
+       andcc           %o0, 0x3f, %g2
        be,pt           %XCC, 2f
 
        /* Compute abs((dst & 0x3f) - 0x40) into %g2.  This is the number
         * of bytes to copy to make 'dst' 64-byte aligned.  We pre-
         * subtract this from 'len'.
         */
-        sub            %g2, 0x40, %g2
+        sub            %o0, %o1, %o4
+       sub             %g2, 0x40, %g2
        sub             %g0, %g2, %g2
        sub             %o2, %g2, %o2
+       andcc           %g2, 0x7, %g1
+       be,pt           %icc, 2f
+        and            %g2, 0x38, %g2
 
-       /* Copy %g2 bytes from src to dst, one byte at a time. */
-1:     ldub            [%o1 + 0x00], %o3
-       add             %o1, 0x1, %o1
-       add             %o0, 0x1, %o0
-       subcc           %g2, 0x1, %g2
+1:     subcc           %g1, 0x1, %g1
+       EX_LD(LOAD(ldub, %o1 + 0x00, %o3))
+       EX_ST(STORE(stb, %o3, %o1 + %o4))
+       bgu,pt          %XCC, 1b
+        add            %o1, 0x1, %o1
 
-       bg,pt           %XCC, 1b
-        stb            %o3, [%o0 + -1]
+       add             %o1, %o4, %o0
 
-2:     VISEntryHalf
+2:     cmp             %g2, 0x0
        and             %o1, 0x7, %g1
-       ba,pt           %xcc, 1f
+       be,pt           %icc, 3f
         alignaddr      %o1, %g0, %o1
 
-       .align          64
-1:
-       membar          #StoreLoad | #StoreStore | #LoadStore
-       prefetch        [%o1 + 0x000], #one_read
-       prefetch        [%o1 + 0x040], #one_read
+       EX_LD(LOAD(ldd, %o1, %f4))
+1:     EX_LD(LOAD(ldd, %o1 + 0x8, %f6))
+       add             %o1, 0x8, %o1
+       subcc           %g2, 0x8, %g2
+       faligndata      %f4, %f6, %f0
+       EX_ST(STORE(std, %f0, %o0))
+       be,pn           %icc, 3f
+        add            %o0, 0x8, %o0
+
+       EX_LD(LOAD(ldd, %o1 + 0x8, %f4))
+       add             %o1, 0x8, %o1
+       subcc           %g2, 0x8, %g2
+       faligndata      %f6, %f4, %f2
+       EX_ST(STORE(std, %f2, %o0))
+       bne,pt          %icc, 1b
+        add            %o0, 0x8, %o0
+
+3:     LOAD(prefetch, %o1 + 0x000, #one_read)
+       LOAD(prefetch, %o1 + 0x040, #one_read)
        andn            %o2, (0x40 - 1), %o4
-       prefetch        [%o1 + 0x080], #one_read
-       prefetch        [%o1 + 0x0c0], #one_read
-       ldd             [%o1 + 0x000], %f0
-       prefetch        [%o1 + 0x100], #one_read
-       ldd             [%o1 + 0x008], %f2
-       prefetch        [%o1 + 0x140], #one_read
-       ldd             [%o1 + 0x010], %f4
-       prefetch        [%o1 + 0x180], #one_read
+       LOAD(prefetch, %o1 + 0x080, #one_read)
+       LOAD(prefetch, %o1 + 0x0c0, #one_read)
+       LOAD(prefetch, %o1 + 0x100, #one_read)
+       EX_LD(LOAD(ldd, %o1 + 0x000, %f0))
+       LOAD(prefetch, %o1 + 0x140, #one_read)
+       EX_LD(LOAD(ldd, %o1 + 0x008, %f2))
+       LOAD(prefetch, %o1 + 0x180, #one_read)
+       EX_LD(LOAD(ldd, %o1 + 0x010, %f4))
+       LOAD(prefetch, %o1 + 0x1c0, #one_read)
        faligndata      %f0, %f2, %f16
-       ldd             [%o1 + 0x018], %f6
+       EX_LD(LOAD(ldd, %o1 + 0x018, %f6))
        faligndata      %f2, %f4, %f18
-       ldd             [%o1 + 0x020], %f8
+       EX_LD(LOAD(ldd, %o1 + 0x020, %f8))
        faligndata      %f4, %f6, %f20
-       ldd             [%o1 + 0x028], %f10
+       EX_LD(LOAD(ldd, %o1 + 0x028, %f10))
        faligndata      %f6, %f8, %f22
 
-       ldd             [%o1 + 0x030], %f12
+       EX_LD(LOAD(ldd, %o1 + 0x030, %f12))
        faligndata      %f8, %f10, %f24
-       ldd             [%o1 + 0x038], %f14
+       EX_LD(LOAD(ldd, %o1 + 0x038, %f14))
        faligndata      %f10, %f12, %f26
-       ldd             [%o1 + 0x040], %f0
+       EX_LD(LOAD(ldd, %o1 + 0x040, %f0))
 
-       sub             %o4, 0x80, %o4
+       subcc           %o4, 0x80, %o4
        add             %o1, 0x40, %o1
-       ba,pt           %xcc, 1f
+       bgu,pt          %XCC, 1f
         srl            %o4, 6, %o3
+       ba,pt           %xcc, 2f
+        nop
 
        .align          64
 1:
-       ldd             [%o1 + 0x008], %f2
+       EX_LD(LOAD(ldd, %o1 + 0x008, %f2))
        faligndata      %f12, %f14, %f28
-       ldd             [%o1 + 0x010], %f4
+       EX_LD(LOAD(ldd, %o1 + 0x010, %f4))
        faligndata      %f14, %f0, %f30
-       stda            %f16, [%o0] ASI_BLK_P
-       ldd             [%o1 + 0x018], %f6
+       EX_ST(STORE_BLK(%f16, %o0))
+       EX_LD(LOAD(ldd, %o1 + 0x018, %f6))
        faligndata      %f0, %f2, %f16
+       add             %o0, 0x40, %o0
 
-       ldd             [%o1 + 0x020], %f8
+       EX_LD(LOAD(ldd, %o1 + 0x020, %f8))
        faligndata      %f2, %f4, %f18
-       ldd             [%o1 + 0x028], %f10
+       EX_LD(LOAD(ldd, %o1 + 0x028, %f10))
        faligndata      %f4, %f6, %f20
-       ldd             [%o1 + 0x030], %f12
+       EX_LD(LOAD(ldd, %o1 + 0x030, %f12))
+       subcc           %o3, 0x01, %o3
        faligndata      %f6, %f8, %f22
-       ldd             [%o1 + 0x038], %f14
-       faligndata      %f8, %f10, %f24
+       EX_LD(LOAD(ldd, %o1 + 0x038, %f14))
 
-       ldd             [%o1 + 0x040], %f0
-       prefetch        [%o1 + 0x180], #one_read
+       faligndata      %f8, %f10, %f24
+       EX_LD(LOAD(ldd, %o1 + 0x040, %f0))
+       LOAD(prefetch, %o1 + 0x1c0, #one_read)
        faligndata      %f10, %f12, %f26
-       subcc           %o3, 0x01, %o3
-       add             %o1, 0x40, %o1
        bg,pt           %XCC, 1b
-        add            %o0, 0x40, %o0
+        add            %o1, 0x40, %o1
 
        /* Finally we copy the last full 64-byte block. */
-       ldd             [%o1 + 0x008], %f2
+2:
+       EX_LD(LOAD(ldd, %o1 + 0x008, %f2))
        faligndata      %f12, %f14, %f28
-       ldd             [%o1 + 0x010], %f4
+       EX_LD(LOAD(ldd, %o1 + 0x010, %f4))
        faligndata      %f14, %f0, %f30
-       stda            %f16, [%o0] ASI_BLK_P
-       ldd             [%o1 + 0x018], %f6
+       EX_ST(STORE_BLK(%f16, %o0))
+       EX_LD(LOAD(ldd, %o1 + 0x018, %f6))
        faligndata      %f0, %f2, %f16
-       ldd             [%o1 + 0x020], %f8
+       EX_LD(LOAD(ldd, %o1 + 0x020, %f8))
        faligndata      %f2, %f4, %f18
-       ldd             [%o1 + 0x028], %f10
+       EX_LD(LOAD(ldd, %o1 + 0x028, %f10))
        faligndata      %f4, %f6, %f20
-       ldd             [%o1 + 0x030], %f12
+       EX_LD(LOAD(ldd, %o1 + 0x030, %f12))
        faligndata      %f6, %f8, %f22
-       ldd             [%o1 + 0x038], %f14
+       EX_LD(LOAD(ldd, %o1 + 0x038, %f14))
        faligndata      %f8, %f10, %f24
        cmp             %g1, 0
        be,pt           %XCC, 1f
         add            %o0, 0x40, %o0
-       ldd             [%o1 + 0x040], %f0
+       EX_LD(LOAD(ldd, %o1 + 0x040, %f0))
 1:     faligndata      %f10, %f12, %f26
        faligndata      %f12, %f14, %f28
        faligndata      %f14, %f0, %f30
-       stda            %f16, [%o0] ASI_BLK_P
+       EX_ST(STORE_BLK(%f16, %o0))
        add             %o0, 0x40, %o0
        add             %o1, 0x40, %o1
        membar          #Sync
@@ -189,23 +246,22 @@ U3memcpy: /* %o0=dst, %o1=src, %o2=len */
        be,pn           %XCC, 2f
         cmp            %g1, 0
 
+       sub             %o2, %g2, %o2
        be,a,pt         %XCC, 1f
-        ldd            [%o1 + 0x00], %f0
+        EX_LD(LOAD(ldd, %o1 + 0x00, %f0))
 
-1:     ldd             [%o1 + 0x08], %f2
+1:     EX_LD(LOAD(ldd, %o1 + 0x08, %f2))
        add             %o1, 0x8, %o1
-       sub             %o2, 0x8, %o2
        subcc           %g2, 0x8, %g2
        faligndata      %f0, %f2, %f8
-       std             %f8, [%o0 + 0x00]
+       EX_ST(STORE(std, %f8, %o0))
        be,pn           %XCC, 2f
         add            %o0, 0x8, %o0
-       ldd             [%o1 + 0x08], %f0
+       EX_LD(LOAD(ldd, %o1 + 0x08, %f0))
        add             %o1, 0x8, %o1
-       sub             %o2, 0x8, %o2
        subcc           %g2, 0x8, %g2
        faligndata      %f2, %f0, %f8
-       std             %f8, [%o0 + 0x00]
+       EX_ST(STORE(std, %f8, %o0))
        bne,pn          %XCC, 1b
         add            %o0, 0x8, %o0
 
@@ -225,48 +281,60 @@ U3memcpy: /* %o0=dst, %o1=src, %o2=len */
         andcc          %o2, 0x8, %g0
        be,pt           %icc, 1f
         nop
-       ldx             [%o1], %o5
-       stx             %o5, [%o1 + %o3]
+       EX_LD(LOAD(ldx, %o1, %o5))
+       EX_ST(STORE(stx, %o5, %o1 + %o3))
        add             %o1, 0x8, %o1
 
 1:     andcc           %o2, 0x4, %g0
        be,pt           %icc, 1f
         nop
-       lduw            [%o1], %o5
-       stw             %o5, [%o1 + %o3]
+       EX_LD(LOAD(lduw, %o1, %o5))
+       EX_ST(STORE(stw, %o5, %o1 + %o3))
        add             %o1, 0x4, %o1
 
 1:     andcc           %o2, 0x2, %g0
        be,pt           %icc, 1f
         nop
-       lduh            [%o1], %o5
-       sth             %o5, [%o1 + %o3]
+       EX_LD(LOAD(lduh, %o1, %o5))
+       EX_ST(STORE(sth, %o5, %o1 + %o3))
        add             %o1, 0x2, %o1
 
 1:     andcc           %o2, 0x1, %g0
        be,pt           %icc, 85f
         nop
-       ldub            [%o1], %o5
+       EX_LD(LOAD(ldub, %o1, %o5))
        ba,pt           %xcc, 85f
-        stb            %o5, [%o1 + %o3]
+        EX_ST(STORE(stb, %o5, %o1 + %o3))
 
+       .align          64
 70: /* 16 < len <= 64 */
-       bne,pn          %XCC, 90f
+       bne,pn          %XCC, 75f
         sub            %o0, %o1, %o3
 
-       andn            %o2, 0x7, %o4
-       and             %o2, 0x7, %o2
-1:     subcc           %o4, 0x8, %o4
-       ldx             [%o1], %o5
-       stx             %o5, [%o1 + %o3]
+72:
+       andn            %o2, 0xf, %o4
+       and             %o2, 0xf, %o2
+1:     subcc           %o4, 0x10, %o4
+       EX_LD(LOAD(ldx, %o1 + 0x00, %o5))
+       EX_LD(LOAD(ldx, %o1 + 0x08, %g1))
+       EX_ST(STORE(stx, %o5, %o1 + %o3))
+       add             %o1, 0x8, %o1
+       EX_ST(STORE(stx, %g1, %o1 + %o3))
        bgu,pt          %XCC, 1b
         add            %o1, 0x8, %o1
-       andcc           %o2, 0x4, %g0
+73:    andcc           %o2, 0x8, %g0
+       be,pt           %XCC, 1f
+        nop
+       sub             %o2, 0x8, %o2
+       EX_LD(LOAD(ldx, %o1, %o5))
+       EX_ST(STORE(stx, %o5, %o1 + %o3))
+       add             %o1, 0x8, %o1
+1:     andcc           %o2, 0x4, %g0
        be,pt           %XCC, 1f
         nop
        sub             %o2, 0x4, %o2
-       lduw            [%o1], %o5
-       stw             %o5, [%o1 + %o3]
+       EX_LD(LOAD(lduw, %o1, %o5))
+       EX_ST(STORE(stw, %o5, %o1 + %o3))
        add             %o1, 0x4, %o1
 1:     cmp             %o2, 0
        be,pt           %XCC, 85f
@@ -274,6 +342,53 @@ U3memcpy:  /* %o0=dst, %o1=src, %o2=len */
        ba,pt           %xcc, 90f
         nop
 
+75:
+       andcc           %o0, 0x7, %g1
+       sub             %g1, 0x8, %g1
+       be,pn           %icc, 2f
+        sub            %g0, %g1, %g1
+       sub             %o2, %g1, %o2
+
+1:     subcc           %g1, 1, %g1
+       EX_LD(LOAD(ldub, %o1, %o5))
+       EX_ST(STORE(stb, %o5, %o1 + %o3))
+       bgu,pt          %icc, 1b
+        add            %o1, 1, %o1
+
+2:     add             %o1, %o3, %o0
+       andcc           %o1, 0x7, %g1
+       bne,pt          %icc, 8f
+        sll            %g1, 3, %g1
+
+       cmp             %o2, 16
+       bgeu,pt         %icc, 72b
+        nop
+       ba,a,pt         %xcc, 73b
+
+8:     mov             64, %o3
+       andn            %o1, 0x7, %o1
+       EX_LD(LOAD(ldx, %o1, %g2))
+       sub             %o3, %g1, %o3
+       andn            %o2, 0x7, %o4
+       sllx            %g2, %g1, %g2
+1:     EX_LD(LOAD(ldx, %o1 + 0x8, %g3))
+       subcc           %o4, 0x8, %o4
+       add             %o1, 0x8, %o1
+       srlx            %g3, %o3, %o5
+       or              %o5, %g2, %o5
+       EX_ST(STORE(stx, %o5, %o0))
+       add             %o0, 0x8, %o0
+       bgu,pt          %icc, 1b
+        sllx           %g3, %g1, %g2
+
+       srl             %g1, 3, %g1
+       andcc           %o2, 0x7, %o2
+       be,pn           %icc, 85f
+        add            %o1, %g1, %o1
+       ba,pt           %xcc, 90f
+        sub            %o0, %o1, %o3
+
+       .align          64
 80: /* 0 < len <= 16 */
        andcc           %o3, 0x3, %g0
        bne,pn          %XCC, 90f
@@ -281,34 +396,22 @@ U3memcpy: /* %o0=dst, %o1=src, %o2=len */
 
 1:
        subcc           %o2, 4, %o2
-       lduw            [%o1], %g1
-       stw             %g1, [%o1 + %o3]
+       EX_LD(LOAD(lduw, %o1, %g1))
+       EX_ST(STORE(stw, %g1, %o1 + %o3))
        bgu,pt          %XCC, 1b
         add            %o1, 4, %o1
 
 85:    retl
-        mov            %g5, %o0
+        mov            EX_RETVAL(%g5), %o0
 
-       .align  32
+       .align          32
 90:
        subcc           %o2, 1, %o2
-       ldub            [%o1], %g1
-       stb             %g1, [%o1 + %o3]
+       EX_LD(LOAD(ldub, %o1, %g1))
+       EX_ST(STORE(stb, %g1, %o1 + %o3))
        bgu,pt          %XCC, 90b
         add            %o1, 1, %o1
        retl
-        mov            %g5, %o0
+        mov            EX_RETVAL(%g5), %o0
 
-       /* Act like copy_{to,in}_user(), ie. return zero instead
-        * of original destination pointer.  This is invoked when
-        * copy_{to,in}_user() finds that %asi is kernel space.
-        */
-       .globl  U3memcpy_user_stub
-U3memcpy_user_stub:
-       save            %sp, -192, %sp
-       mov             %i0, %o0
-       mov             %i1, %o1
-       call            U3memcpy
-        mov            %i2, %o2
-       ret
-        restore        %g0, %g0, %o0
+       .size           FUNC_NAME, .-FUNC_NAME