Subversion Repositories or1k

/* $Id: U3copy_from_user.S,v 1.1.1.1 2004-04-15 01:33:43 phoenix Exp $
 * U3memcpy.S: UltraSparc-III optimized copy from userspace.
 *
 * Copyright (C) 1999, 2000 David S. Miller (davem@redhat.com)
 */

#ifdef __KERNEL__
#include <asm/visasm.h>
#include <asm/asi.h>
#include <asm/dcu.h>
#include <asm/spitfire.h>
#undef SMALL_COPY_USES_FPU
#define EXNV(x,y,a,b)                   \
98:     x,y;                            \
        .section .fixup;                \
        .align 4;                       \
99:     VISExitHalf;                    \
        ba U3cfu_fixup;                 \
         a, b, %o1;                     \
        .section __ex_table;            \
        .align 4;                       \
        .word 98b, 99b;                 \
        .text;                          \
        .align 4;
#define EX(x,y,a,b)                     \
98:     x,y;                            \
        .section .fixup;                \
        .align 4;                       \
99:     VISExitHalf;                    \
        ba U3cfu_fixup;                 \
         a, b, %o1;                     \
        .section __ex_table;            \
        .align 4;                       \
        .word 98b, 99b;                 \
        .text;                          \
        .align 4;
#define EX2(x,y)                        \
98:     x,y;                            \
        .section .fixup;                \
        .align 4;                       \
99:     VISExitHalf;                    \
        and %o2, (0x40 - 1), %o1;       \
        add %o1, %o4, %o1;              \
        ba U3cfu_fixup;                 \
         add %o1, 0x1c0, %o1;           \
        .section __ex_table;            \
        .align 4;                       \
        .word 98b, 99b;                 \
        .text;                          \
        .align 4;
#define EX3(x,y)                        \
98:     x,y;                            \
        .section .fixup;                \
        .align 4;                       \
99:     VISExitHalf;                    \
        and %o2, (0x40 - 1), %o1;       \
        sll %g3, 6, %g3;                \
        add %o1, 0x80, %o1;             \
        ba U3cfu_fixup;                 \
         add %o1, %g3, %o1;             \
        .section __ex_table;            \
        .align 4;                       \
        .word 98b, 99b;                 \
        .text;                          \
        .align 4;
#define EX4(x,y)                        \
98:     x,y;                            \
        .section .fixup;                \
        .align 4;                       \
99:     VISExitHalf;                    \
        and %o2, (0x40 - 1), %o1;       \
        add %o1, 0x40, %o1;             \
        ba U3cfu_fixup;                 \
         add %o1, %g3, %o1;             \
        .section __ex_table;            \
        .align 4;                       \
        .word 98b, 99b;                 \
        .text;                          \
        .align 4;
#else
#define ASI_BLK_P 0xf0
#define FPRS_FEF  0x04
#define VISEntryHalf rd %fprs, %o5; wr %g0, FPRS_FEF, %fprs
#define VISExitHalf and %o5, FPRS_FEF, %o5; wr %o5, 0x0, %fprs
#define SMALL_COPY_USES_FPU
#define EXNV(x,y,a,b)   x,y;
#define EX(x,y,a,b)     x,y;
#define EX2(x,y)        x,y;
#define EX3(x,y)        x,y;
#define EX4(x,y)        x,y;
#endif

        /* Special/non-trivial issues of this code:
         *
         * 1) %o5 is preserved from VISEntryHalf to VISExitHalf
         * 2) Only low 32 FPU registers are used so that only the
         *    lower half of the FPU register set is dirtied by this
         *    code.  This is especially important in the kernel.
         * 3) This code never prefetches cachelines past the end
         *    of the source buffer.
         */

        .text
        .align  32

        /* The cheetah's flexible spine, oversized liver, enlarged heart,
         * slender muscular body, and claws make it the swiftest hunter
         * in Africa and the fastest animal on land.  Can reach speeds
         * of up to 2.4GB per second.
         */

        .globl          U3copy_from_user
U3copy_from_user: /* %o0=dst, %o1=src, %o2=len */
#ifndef __KERNEL__
        /* Save away original 'dst' for memcpy return value. */
        mov             %o0, %g3                        ! A0    Group
#endif
        /* Anything to copy at all? */
        cmp             %o2, 0                          ! A1
        ble,pn          %icc, U3copy_from_user_short_ret! BR

        /* Extremely small copy? */
         cmp            %o2, 31                         ! A0    Group
        ble,pn          %icc, U3copy_from_user_short    ! BR

        /* Large enough to use unrolled prefetch loops? */
         cmp            %o2, 0x100                      ! A1
        bge,a,pt        %icc, U3copy_from_user_enter    ! BR    Group
         andcc          %o0, 0x3f, %g2                  ! A0

        ba,pt           %xcc, U3copy_from_user_toosmall ! BR    Group
         andcc          %o0, 0x7, %g2                   ! A0

        .align          32
U3copy_from_user_short:
        /* Copy %o2 bytes from src to dst, one byte at a time. */
        EXNV(lduba [%o1 + 0x00] %asi, %o3, add %o2, %g0)! MS    Group
        add             %o1, 0x1, %o1                   ! A0
        add             %o0, 0x1, %o0                   ! A1
        subcc           %o2, 1, %o2                     ! A0    Group

        bg,pt           %icc, U3copy_from_user_short    ! BR
         stb            %o3, [%o0 + -1]                 ! MS    Group (1-cycle stall)

U3copy_from_user_short_ret:
#ifdef __KERNEL__
        retl                                            ! BR    Group (0-4 cycle stall)
         clr            %o0                             ! A0
#else
        retl                                            ! BR    Group (0-4 cycle stall)
         mov            %g3, %o0                        ! A0
#endif

        /* Here len >= (6 * 64) and condition codes reflect execution
         * of "andcc %o0, 0x7, %g2", done by caller.
         */
        .align          64
U3copy_from_user_enter:
        /* Is 'dst' already aligned on an 64-byte boundary? */
        be,pt           %xcc, 2f                        ! BR

        /* 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                  ! A0    Group
        sub             %g0, %g2, %g2                   ! A0    Group
        sub             %o2, %g2, %o2                   ! A0    Group

        /* Copy %g2 bytes from src to dst, one byte at a time. */
1:      EXNV(lduba [%o1 + 0x00] %asi, %o3, add %o2, %g2)! MS    (Group)
        add             %o1, 0x1, %o1                   ! A1
        add             %o0, 0x1, %o0                   ! A0    Group
        subcc           %g2, 0x1, %g2                   ! A1

        bg,pt           %icc, 1b                        ! BR    Group
         stb            %o3, [%o0 + -1]                 ! MS    Group

2:      VISEntryHalf                                    ! MS+MS
        and             %o1, 0x7, %g1                   ! A1
        ba,pt           %xcc, U3copy_from_user_begin            ! BR
         alignaddr      %o1, %g0, %o1                   ! MS          (Break-after)

        .align          64
U3copy_from_user_begin:
#ifdef __KERNEL__
        .globl          U3copy_from_user_nop_1_6
U3copy_from_user_nop_1_6:
        ldxa            [%g0] ASI_DCU_CONTROL_REG, %g3
        sethi           %uhi(DCU_PE), %o3
        sllx            %o3, 32, %o3
        or              %g3, %o3, %o3
        stxa            %o3, [%g0] ASI_DCU_CONTROL_REG  ! Enable P-cache
        membar          #Sync
#endif
        prefetcha       [%o1 + 0x000] %asi, #one_read   ! MS    Group1
        prefetcha       [%o1 + 0x040] %asi, #one_read   ! MS    Group2
        andn            %o2, (0x40 - 1), %o4            ! A0
        prefetcha       [%o1 + 0x080] %asi, #one_read   ! MS    Group3
        cmp             %o4, 0x140                      ! A0
        prefetcha       [%o1 + 0x0c0] %asi, #one_read   ! MS    Group4
        EX(ldda [%o1 + 0x000] %asi, %f0, add %o2, %g0)  ! MS    Group5 (%f0 results at G8)
        bge,a,pt        %icc, 1f                        ! BR

        prefetcha       [%o1 + 0x100] %asi, #one_read   ! MS    Group6
1:      EX(ldda [%o1 + 0x008] %asi, %f2, add %o2, %g0)  ! AX           (%f2 results at G9)
        cmp             %o4, 0x180                      ! A1
        bge,a,pt        %icc, 1f                        ! BR
         prefetcha      [%o1 + 0x140] %asi, #one_read   ! MS    Group7
1:      EX(ldda [%o1 + 0x010] %asi, %f4, add %o2, %g0)  ! AX           (%f4 results at G10)
        cmp             %o4, 0x1c0                      ! A1
        bge,a,pt        %icc, 1f                        ! BR

         prefetcha      [%o1 + 0x180] %asi, #one_read   ! MS    Group8
1:      faligndata      %f0, %f2, %f16                  ! FGA   Group9 (%f16 at G12)
        EX(ldda [%o1 + 0x018] %asi, %f6, add %o2, %g0)  ! AX           (%f6 results at G12)
        faligndata      %f2, %f4, %f18                  ! FGA   Group10 (%f18 results at G13)
        EX(ldda [%o1 + 0x020] %asi, %f8, add %o2, %g0)  ! MS            (%f8 results at G13)
        faligndata      %f4, %f6, %f20                  ! FGA   Group12 (1-cycle stall,%f20 at G15)
        EX(ldda [%o1 + 0x028] %asi, %f10, add %o2, %g0) ! MS            (%f10 results at G15)
        faligndata      %f6, %f8, %f22                  ! FGA   Group13 (%f22 results at G16)

        EX(ldda [%o1 + 0x030] %asi, %f12, add %o2, %g0) ! MS            (%f12 results at G16)
        faligndata      %f8, %f10, %f24                 ! FGA   Group15 (1-cycle stall,%f24 at G18)
        EX(ldda [%o1 + 0x038] %asi, %f14, add %o2, %g0) ! MS            (%f14 results at G18)
        faligndata      %f10, %f12, %f26                ! FGA   Group16 (%f26 results at G19)
        EX(ldda [%o1 + 0x040] %asi, %f0, add %o2, %g0)  ! MS            (%f0 results at G19)

        /* We only use the first loop if len > (7 * 64). */
        subcc           %o4, 0x1c0, %o4                 ! A0    Group17
        bg,pt           %icc, U3copy_from_user_loop1    ! BR
         add            %o1, 0x40, %o1                  ! A1

        add             %o4, 0x140, %o4                 ! A0    Group18
        ba,pt           %xcc, U3copy_from_user_loop2    ! BR
         srl            %o4, 6, %o3                     ! A0    Group19
        nop
        nop
        nop
        nop
        nop

        nop
        nop

        /* This loop performs the copy and queues new prefetches.
         * We drop into the second loop when len <= (5 * 64).  Note
         * that this (5 * 64) factor has been subtracted from len
         * already.
         */
U3copy_from_user_loop1:
        EX2(ldda [%o1 + 0x008] %asi, %f2)               ! MS    Group2  (%f2 results at G5)
        faligndata      %f12, %f14, %f28                ! FGA           (%f28 results at G5)
        EX2(ldda [%o1 + 0x010] %asi, %f4)               ! MS    Group3  (%f4 results at G6)
        faligndata      %f14, %f0, %f30                 ! FGA   Group4  (1-cycle stall, %f30 at G7)
        stda            %f16, [%o0] ASI_BLK_P           ! MS
        EX2(ldda [%o1 + 0x018] %asi, %f6)               ! AX            (%f6 results at G7)

        faligndata      %f0, %f2, %f16                  ! FGA   Group12 (7-cycle stall)
        EX2(ldda [%o1 + 0x020] %asi, %f8)               ! MS            (%f8 results at G15)
        faligndata      %f2, %f4, %f18                  ! FGA   Group13 (%f18 results at G16)
        EX2(ldda [%o1 + 0x028] %asi, %f10)              ! MS            (%f10 results at G16)
        faligndata      %f4, %f6, %f20                  ! FGA   Group14 (%f20 results at G17)
        EX2(ldda [%o1 + 0x030] %asi, %f12)              ! MS            (%f12 results at G17)
        faligndata      %f6, %f8, %f22                  ! FGA   Group15 (%f22 results at G18)
        EX2(ldda [%o1 + 0x038] %asi, %f14)              ! MS            (%f14 results at G18)

        faligndata      %f8, %f10, %f24                 ! FGA   Group16 (%f24 results at G19)
        EX2(ldda [%o1 + 0x040] %asi, %f0)               ! AX            (%f0 results at G19)
        prefetcha       [%o1 + 0x180] %asi, #one_read   ! MS
        faligndata      %f10, %f12, %f26                ! FGA   Group17 (%f26 results at G20)
        subcc           %o4, 0x40, %o4                  ! A0
        add             %o1, 0x40, %o1                  ! A1
        bg,pt           %xcc, U3copy_from_user_loop1    ! BR
         add            %o0, 0x40, %o0                  ! A0    Group18

U3copy_from_user_loop2_enter:
        mov             5, %o3                          ! A1

        /* This loop performs on the copy, no new prefetches are
         * queued.  We do things this way so that we do not perform
         * any spurious prefetches past the end of the src buffer.
         */
U3copy_from_user_loop2:
        EX3(ldda [%o1 + 0x008] %asi, %f2)               ! MS
        faligndata      %f12, %f14, %f28                ! FGA   Group2
        EX3(ldda [%o1 + 0x010] %asi, %f4)               ! MS
        faligndata      %f14, %f0, %f30                 ! FGA   Group4  (1-cycle stall)
        stda            %f16, [%o0] ASI_BLK_P           ! MS
        EX3(ldda [%o1 + 0x018] %asi, %f6)               ! AX
        faligndata      %f0, %f2, %f16                  ! FGA   Group12 (7-cycle stall)

        EX3(ldda [%o1 + 0x020] %asi, %f8)               ! MS
        faligndata      %f2, %f4, %f18                  ! FGA   Group13
        EX3(ldda [%o1 + 0x028] %asi, %f10)              ! MS
        faligndata      %f4, %f6, %f20                  ! FGA   Group14
        EX3(ldda [%o1 + 0x030] %asi, %f12)              ! MS
        faligndata      %f6, %f8, %f22                  ! FGA   Group15
        EX3(ldda [%o1 + 0x038] %asi, %f14)              ! MS
        faligndata      %f8, %f10, %f24                 ! FGA   Group16

        EX3(ldda [%o1 + 0x040] %asi, %f0)               ! AX
        faligndata      %f10, %f12, %f26                ! FGA   Group17
        subcc           %o3, 0x01, %o3                  ! A0
        add             %o1, 0x40, %o1                  ! A1
        bg,pt           %xcc, U3copy_from_user_loop2    ! BR
         add            %o0, 0x40, %o0                  ! A0    Group18

        /* Finally we copy the last full 64-byte block. */
U3copy_from_user_loopfini:
        EX3(ldda [%o1 + 0x008] %asi, %f2)               ! MS
        faligndata      %f12, %f14, %f28                ! FGA
        EX3(ldda [%o1 + 0x010] %asi, %f4)               ! MS    Group19
        faligndata      %f14, %f0, %f30                 ! FGA
        stda            %f16, [%o0] ASI_BLK_P           ! MS    Group20
        EX3(ldda [%o1 + 0x018] %asi, %f6)               ! AX
        faligndata      %f0, %f2, %f16                  ! FGA   Group11 (7-cycle stall)
        EX3(ldda [%o1 + 0x020] %asi, %f8)               ! MS
        faligndata      %f2, %f4, %f18                  ! FGA   Group12
        EX3(ldda [%o1 + 0x028] %asi, %f10)              ! MS
        faligndata      %f4, %f6, %f20                  ! FGA   Group13
        EX3(ldda [%o1 + 0x030] %asi, %f12)              ! MS
        faligndata      %f6, %f8, %f22                  ! FGA   Group14
        EX3(ldda [%o1 + 0x038] %asi, %f14)              ! MS
        faligndata      %f8, %f10, %f24                 ! FGA   Group15
        cmp             %g1, 0                          ! A0
        be,pt           %icc, 1f                        ! BR
         add            %o0, 0x40, %o0                  ! A1
        EX4(ldda [%o1 + 0x040] %asi, %f0)               ! MS
1:      faligndata      %f10, %f12, %f26                ! FGA   Group16
        faligndata      %f12, %f14, %f28                ! FGA   Group17
        faligndata      %f14, %f0, %f30                 ! FGA   Group18
        stda            %f16, [%o0] ASI_BLK_P           ! MS
        add             %o0, 0x40, %o0                  ! A0
        add             %o1, 0x40, %o1                  ! A1
#ifdef __KERNEL__
        .globl          U3copy_from_user_nop_2_3
U3copy_from_user_nop_2_3:
        mov             PRIMARY_CONTEXT, %o3
        stxa            %g0, [%o3] ASI_DMMU             ! Flush P-cache
        stxa            %g3, [%g0] ASI_DCU_CONTROL_REG  ! Disable P-cache
#endif
        membar          #Sync                           ! MS    Group26 (7-cycle stall)

        /* Now we copy the (len modulo 64) bytes at the end.
         * Note how we borrow the %f0 loaded above.
         *
         * Also notice how this code is careful not to perform a
         * load past the end of the src buffer just like similar
         * code found in U3copy_from_user_toosmall processing.
         */
U3copy_from_user_loopend:
        and             %o2, 0x3f, %o2                  ! A0    Group
        andcc           %o2, 0x38, %g2                  ! A0    Group
        be,pn           %icc, U3copy_from_user_endcruft ! BR
         subcc          %g2, 0x8, %g2                   ! A1
        be,pn           %icc, U3copy_from_user_endcruft ! BR    Group
         cmp            %g1, 0                          ! A0

        be,a,pt         %icc, 1f                        ! BR    Group
         EX(ldda [%o1 + 0x00] %asi, %f0, add %o2, %g0)  ! MS

1:      EX(ldda [%o1 + 0x08] %asi, %f2, add %o2, %g0)   ! MS    Group
        add             %o1, 0x8, %o1                   ! A0
        sub             %o2, 0x8, %o2                   ! A1
        subcc           %g2, 0x8, %g2                   ! A0    Group
        faligndata      %f0, %f2, %f8                   ! FGA   Group
        std             %f8, [%o0 + 0x00]               ! MS    (XXX does it stall here? XXX)
        be,pn           %icc, U3copy_from_user_endcruft ! BR
         add            %o0, 0x8, %o0                   ! A0
        EX(ldda [%o1 + 0x08] %asi, %f0, add %o2, %g0)   ! MS    Group
        add             %o1, 0x8, %o1                   ! A0
        sub             %o2, 0x8, %o2                   ! A1
        subcc           %g2, 0x8, %g2                   ! A0    Group
        faligndata      %f2, %f0, %f8                   ! FGA
        std             %f8, [%o0 + 0x00]               ! MS    (XXX does it stall here? XXX)
        bne,pn          %icc, 1b                        ! BR
         add            %o0, 0x8, %o0                   ! A0    Group

        /* If anything is left, we copy it one byte at a time.
         * Note that %g1 is (src & 0x3) saved above before the
         * alignaddr was performed.
         */
U3copy_from_user_endcruft:
        cmp             %o2, 0
        add             %o1, %g1, %o1
        VISExitHalf
        be,pn           %icc, U3copy_from_user_short_ret
         nop
        ba,a,pt         %xcc, U3copy_from_user_short

        /* If we get here, then 32 <= len < (6 * 64) */
U3copy_from_user_toosmall:

#ifdef SMALL_COPY_USES_FPU

        /* Is 'dst' already aligned on an 8-byte boundary? */
        be,pt           %xcc, 2f                        ! BR    Group

        /* Compute abs((dst & 7) - 8) into %g2.  This is the number
         * of bytes to copy to make 'dst' 8-byte aligned.  We pre-
         * subtract this from 'len'.
         */
         sub            %g2, 0x8, %g2                   ! A0
        sub             %g0, %g2, %g2                   ! A0    Group (reg-dep)
        sub             %o2, %g2, %o2                   ! A0    Group (reg-dep)

        /* Copy %g2 bytes from src to dst, one byte at a time. */
1:      EXNV(lduba [%o1 + 0x00] %asi, %o3, add %o2, %g2)! MS    (Group) (%o3 in 3 cycles)
        add             %o1, 0x1, %o1                   ! A1
        add             %o0, 0x1, %o0                   ! A0    Group
        subcc           %g2, 0x1, %g2                   ! A1

        bg,pt           %icc, 1b                        ! BR    Group
         stb            %o3, [%o0 + -1]                 ! MS    Group

2:      VISEntryHalf                                    ! MS+MS

        /* Compute (len - (len % 8)) into %g2.  This is guarenteed
         * to be nonzero.
         */
        andn            %o2, 0x7, %g2                   ! A0    Group

        /* You may read this and believe that it allows reading
         * one 8-byte longword past the end of src.  It actually
         * does not, as %g2 is subtracted as loads are done from
         * src, so we always stop before running off the end.
         * Also, we are guarenteed to have at least 0x10 bytes
         * to move here.
         */
        sub             %g2, 0x8, %g2                   ! A0    Group (reg-dep)
        alignaddr       %o1, %g0, %g1                   ! MS          (Break-after)
        EX(ldda [%g1 + 0x00] %asi, %f0, add %o2, %g0)   ! MS    Group (1-cycle stall)
        add             %g1, 0x8, %g1                   ! A0

1:      EX(ldda [%g1 + 0x00] %asi, %f2, add %o2, %g0)   ! MS    Group
        add             %g1, 0x8, %g1                   ! A0
        sub             %o2, 0x8, %o2                   ! A1
        subcc           %g2, 0x8, %g2                   ! A0    Group

        faligndata      %f0, %f2, %f8                   ! FGA   Group (1-cycle stall)
        std             %f8, [%o0 + 0x00]               ! MS    Group (2-cycle stall)
        add             %o1, 0x8, %o1                   ! A0
        be,pn           %icc, 2f                        ! BR

         add            %o0, 0x8, %o0                   ! A1
        EX(ldda [%g1 + 0x00] %asi, %f0, add %o2, %g0)   ! MS    Group
        add             %g1, 0x8, %g1                   ! A0
        sub             %o2, 0x8, %o2                   ! A1

        subcc           %g2, 0x8, %g2                   ! A0    Group
        faligndata      %f2, %f0, %f8                   ! FGA   Group (1-cycle stall)
        std             %f8, [%o0 + 0x00]               ! MS    Group (2-cycle stall)
        add             %o1, 0x8, %o1                   ! A0

        bne,pn          %icc, 1b                        ! BR
         add            %o0, 0x8, %o0                   ! A1

        /* Nothing left to copy? */
2:      cmp             %o2, 0                          ! A0    Group
        VISExitHalf                                     ! A0+MS
        be,pn           %icc, U3copy_from_user_short_ret! BR    Group
         nop                                            ! A0
        ba,a,pt         %xcc, U3copy_from_user_short    ! BR    Group

#else /* !(SMALL_COPY_USES_FPU) */

        xor             %o1, %o0, %g2
        andcc           %g2, 0x7, %g0
        bne,pn          %icc, U3copy_from_user_short
         andcc          %o1, 0x7, %g2

        be,pt           %xcc, 2f
         sub            %g2, 0x8, %g2
        sub             %g0, %g2, %g2
        sub             %o2, %g2, %o2

1:      EXNV(lduba [%o1 + 0x00] %asi, %o3, add %o2, %g2)
        add             %o1, 0x1, %o1
        add             %o0, 0x1, %o0
        subcc           %g2, 0x1, %g2
        bg,pt           %icc, 1b
         stb            %o3, [%o0 + -1]

2:      andn            %o2, 0x7, %g2
        sub             %o2, %g2, %o2

3:      EXNV(ldxa [%o1 + 0x00] %asi, %o3, add %o2, %g2)
        add             %o1, 0x8, %o1
        add             %o0, 0x8, %o0
        subcc           %g2, 0x8, %g2
        bg,pt           %icc, 3b
         stx            %o3, [%o0 + -8]

        cmp             %o2, 0
        bne,pn          %icc, U3copy_from_user_short
         nop
        ba,a,pt         %xcc, U3copy_from_user_short_ret

#endif /* !(SMALL_COPY_USES_FPU) */

#ifdef __KERNEL__
        .globl          U3cfu_fixup
U3cfu_fixup:
        /* Since this is copy_from_user(), zero out the rest of the
         * kernel buffer.
         */
        cmp             %o1, 0
        ble,pn          %icc, 2f
         mov            %o1, %g2

1:      subcc           %g2, 1, %g2
        stb             %g0, [%o0]
        bne,pt          %icc, 1b
         add            %o0, 1, %o0

2:      retl
         mov            %o1, %o0
#endif