OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [linux/] [linux-2.4/] [arch/] [alpha/] [lib/] [strcat.S] - Rev 1765

Compare with Previous | Blame | View Log

/*
 * arch/alpha/lib/strcat.S
 * Contributed by Richard Henderson (rth@tamu.edu)
 *
 * Append a null-terminated string from SRC to DST.
 */

        .text

        .align 3
        .globl strcat
        .ent strcat
strcat:
        .frame $30, 0, $26
        .prologue 0

        mov     $16, $0         # set up return value

        /* Find the end of the string.  */

        ldq_u   $1, 0($16)      # load first quadword (a0 may be misaligned)
        lda     $2, -1
        insqh   $2, $16, $2
        andnot  $16, 7, $16
        or      $2, $1, $1
        cmpbge  $31, $1, $2     # bits set iff byte == 0
        bne     $2, $found

$loop:  ldq     $1, 8($16)
        addq    $16, 8, $16
        cmpbge  $31, $1, $2
        beq     $2, $loop

$found: negq    $2, $3          # clear all but least set bit
        and     $2, $3, $2

        and     $2, 0xf0, $3    # binary search for that set bit
        and     $2, 0xcc, $4
        and     $2, 0xaa, $5
        cmovne  $3, 4, $3
        cmovne  $4, 2, $4
        cmovne  $5, 1, $5
        addq    $3, $4, $3
        addq    $16, $5, $16
        addq    $16, $3, $16

        /* Now do the append.  */

        mov     $26, $23
        br      __stxcpy

        .end strcat

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2025 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.