/* SPDX-License-Identifier: GPL-2.0 */
/*
 * linux/arch/alpha/lib/memset.S
 *
 * This is an efficient (and small) implementation of the C library "memset()"
 * function for the alpha.
 *
 *      (C) Copyright 1996 Linus Torvalds
 *
 * This routine is "moral-ware": you are free to use it any way you wish, and
 * the only obligation I put on you is a moral one: if you make any improvements
 * to the routine, please send me your improvements for me to use similarly.
 *
 * The scheduling comments are according to the EV5 documentation (and done by 
 * hand, so they might well be incorrect, please do tell me about it..)
 */
#include <linux/export.h>
        .set noat
        .set noreorder
.text
        .globl memset
        .globl __memset
        .globl ___memset
        .globl __memset16
        .globl __constant_c_memset

        .ent ___memset
.align 5
___memset:
        .frame $30,0,$26,0
        .prologue 0

        and $17,255,$1          /* E1 */
        insbl $17,1,$17         /* .. E0 */
        bis $17,$1,$17          /* E0 (p-c latency, next cycle) */
        sll $17,16,$1           /* E1 (p-c latency, next cycle) */

        bis $17,$1,$17          /* E0 (p-c latency, next cycle) */
        sll $17,32,$1           /* E1 (p-c latency, next cycle) */
        bis $17,$1,$17          /* E0 (p-c latency, next cycle) */
        ldq_u $31,0($30)        /* .. E1 */

.align 5
__constant_c_memset:
        addq $18,$16,$6         /* E0 */
        bis $16,$16,$0          /* .. E1 */
        xor $16,$6,$1           /* E0 */
        ble $18,end             /* .. E1 */

        bic $1,7,$1             /* E0 */
        beq $1,within_one_quad  /* .. E1 (note EV5 zero-latency forwarding) */
        and $16,7,$3            /* E0 */
        beq $3,aligned          /* .. E1 (note EV5 zero-latency forwarding) */

        ldq_u $4,0($16)         /* E0 */
        bis $16,$16,$5          /* .. E1 */
        insql $17,$16,$2        /* E0 */
        subq $3,8,$3            /* .. E1 */

        addq $18,$3,$18         /* E0   $18 is new count ($3 is negative) */
        mskql $4,$16,$4         /* .. E1 (and possible load stall) */
        subq $16,$3,$16         /* E0   $16 is new aligned destination */
        bis $2,$4,$1            /* .. E1 */

        bis $31,$31,$31         /* E0 */
        ldq_u $31,0($30)        /* .. E1 */
        stq_u $1,0($5)          /* E0 */
        bis $31,$31,$31         /* .. E1 */

.align 4
aligned:
        sra $18,3,$3            /* E0 */
        and $18,7,$18           /* .. E1 */
        bis $16,$16,$5          /* E0 */
        beq $3,no_quad          /* .. E1 */

.align 3
loop:
        stq $17,0($5)           /* E0 */
        subq $3,1,$3            /* .. E1 */
        addq $5,8,$5            /* E0 */
        bne $3,loop             /* .. E1 */

no_quad:
        bis $31,$31,$31         /* E0 */
        beq $18,end             /* .. E1 */
        ldq $7,0($5)            /* E0 */
        mskqh $7,$6,$2          /* .. E1 (and load stall) */

        insqh $17,$6,$4         /* E0 */
        bis $2,$4,$1            /* .. E1 */
        stq $1,0($5)            /* E0 */
        ret $31,($26),1         /* .. E1 */

.align 3
within_one_quad:
        ldq_u $1,0($16)         /* E0 */
        insql $17,$16,$2        /* E1 */
        mskql $1,$16,$4         /* E0 (after load stall) */
        bis $2,$4,$2            /* E0 */

        mskql $2,$6,$4          /* E0 */
        mskqh $1,$6,$2          /* .. E1 */
        bis $2,$4,$1            /* E0 */
        stq_u $1,0($16)         /* E0 */

end:
        ret $31,($26),1         /* E1 */
        .end ___memset
EXPORT_SYMBOL(___memset)
EXPORT_SYMBOL(__constant_c_memset)

        .align 5
        .ent __memset16
__memset16:
        .prologue 0

        inswl $17,0,$1          /* E0 */
        inswl $17,2,$2          /* E0 */
        inswl $17,4,$3          /* E0 */
        or $1,$2,$1             /* .. E1 */
        inswl $17,6,$4          /* E0 */
        or $1,$3,$1             /* .. E1 */
        or $1,$4,$17            /* E0 */
        br __constant_c_memset  /* .. E1 */

        .end __memset16
EXPORT_SYMBOL(__memset16)

memset = ___memset
__memset = ___memset
        EXPORT_SYMBOL(memset)
        EXPORT_SYMBOL(__memset)