diff options
| author | Taru Karttunen <taruti@taruti.net> | 2011-03-30 15:46:40 +0300 |
|---|---|---|
| committer | Taru Karttunen <taruti@taruti.net> | 2011-03-30 15:46:40 +0300 |
| commit | e5888a1ffdae813d7575f5fb02275c6bb07e5199 (patch) | |
| tree | d8d51eac403f07814b9e936eed0c9a79195e2450 /sys/src/ape/lib/ap/sparc/strcpy.s | |
Import sources from 2011-03-30 iso image
Diffstat (limited to 'sys/src/ape/lib/ap/sparc/strcpy.s')
| -rwxr-xr-x | sys/src/ape/lib/ap/sparc/strcpy.s | 84 |
1 files changed, 84 insertions, 0 deletions
diff --git a/sys/src/ape/lib/ap/sparc/strcpy.s b/sys/src/ape/lib/ap/sparc/strcpy.s new file mode 100755 index 000000000..6fd6aef05 --- /dev/null +++ b/sys/src/ape/lib/ap/sparc/strcpy.s @@ -0,0 +1,84 @@ + TEXT strcpy(SB), $0 + +MOVW R7, 0(FP) + MOVW s1+0(FP), R9 /* R9 is to pointer */ + MOVW s2+4(FP), R10 /* R10 is from pointer */ + +/* + * test if both pointers + * are similarly word aligned + */ + XOR R9,R10, R7 + ANDCC $3,R7, R0 + BNE una + +/* + * make byte masks + */ + MOVW $0xff, R17 + SLL $8,R17, R16 + SLL $16,R17, R13 + SLL $24,R17, R12 + +/* + * byte at a time to word align + */ +al1: + ANDCC $3,R10, R0 + BE al2 + MOVB (R10), R11 + ADD $1, R10 + MOVB R11, (R9) + ADD $1, R9 + SUBCC R0,R11, R0 + BNE al1 + JMP out + +/* + * word at a time + */ +al2: + ADD $4, R9 + MOVW (R10), R11 /* fetch */ + ADD $4, R10 + ANDCC R12,R11, R0 /* is it byte 0 */ + BE b0 + ANDCC R13,R11, R0 /* is it byte 1 */ + BE b1 + ANDCC R16,R11, R0 /* is it byte 2 */ + BE b2 + MOVW R11, -4(R9) /* store */ + ANDCC R17,R11, R0 /* is it byte 3 */ + BNE al2 + + JMP out + +b0: + MOVB R0, -4(R9) + JMP out + +b1: + SRL $24, R11 + MOVB R11, -4(R9) + MOVB R0, -3(R9) + JMP out + +b2: + SRL $24,R11, R7 + MOVB R7, -4(R9) + SRL $16, R11 + MOVB R11, -3(R9) + MOVB R0, -2(R9) + JMP out + +una: + MOVB (R10), R11 + ADD $1, R10 + MOVB R11, (R9) + ADD $1, R9 + SUBCC R0,R11, R0 + BNE una + +out: + MOVW s1+0(FP),R7 + RETURN |