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