mirror of
https://github.com/FEX-Emu/linux.git
synced 2024-12-22 17:33:01 +00:00
1da177e4c3
Initial git repository build. I'm not bothering with the full history, even though we have it. We can create a separate "historical" git archive of that later if we want to, and in the meantime it's about 3.2GB when imported into git - space that would just make the early git days unnecessarily complicated, when we don't have a lot of good infrastructure for it. Let it rip!
493 lines
10 KiB
ArmAsm
493 lines
10 KiB
ArmAsm
/* copy_user.S: Sparc optimized copy_from_user and copy_to_user code.
|
|
*
|
|
* Copyright(C) 1995 Linus Torvalds
|
|
* Copyright(C) 1996 David S. Miller
|
|
* Copyright(C) 1996 Eddie C. Dost
|
|
* Copyright(C) 1996,1998 Jakub Jelinek
|
|
*
|
|
* derived from:
|
|
* e-mail between David and Eddie.
|
|
*
|
|
* Returns 0 if successful, otherwise count of bytes not copied yet
|
|
*/
|
|
|
|
#include <asm/ptrace.h>
|
|
#include <asm/asmmacro.h>
|
|
#include <asm/page.h>
|
|
|
|
/* Work around cpp -rob */
|
|
#define ALLOC #alloc
|
|
#define EXECINSTR #execinstr
|
|
#define EX(x,y,a,b) \
|
|
98: x,y; \
|
|
.section .fixup,ALLOC,EXECINSTR; \
|
|
.align 4; \
|
|
99: ba fixupretl; \
|
|
a, b, %g3; \
|
|
.section __ex_table,ALLOC; \
|
|
.align 4; \
|
|
.word 98b, 99b; \
|
|
.text; \
|
|
.align 4
|
|
|
|
#define EX2(x,y,c,d,e,a,b) \
|
|
98: x,y; \
|
|
.section .fixup,ALLOC,EXECINSTR; \
|
|
.align 4; \
|
|
99: c, d, e; \
|
|
ba fixupretl; \
|
|
a, b, %g3; \
|
|
.section __ex_table,ALLOC; \
|
|
.align 4; \
|
|
.word 98b, 99b; \
|
|
.text; \
|
|
.align 4
|
|
|
|
#define EXO2(x,y) \
|
|
98: x, y; \
|
|
.section __ex_table,ALLOC; \
|
|
.align 4; \
|
|
.word 98b, 97f; \
|
|
.text; \
|
|
.align 4
|
|
|
|
#define EXT(start,end,handler) \
|
|
.section __ex_table,ALLOC; \
|
|
.align 4; \
|
|
.word start, 0, end, handler; \
|
|
.text; \
|
|
.align 4
|
|
|
|
/* Please do not change following macros unless you change logic used
|
|
* in .fixup at the end of this file as well
|
|
*/
|
|
|
|
/* Both these macros have to start with exactly the same insn */
|
|
#define MOVE_BIGCHUNK(src, dst, offset, t0, t1, t2, t3, t4, t5, t6, t7) \
|
|
ldd [%src + (offset) + 0x00], %t0; \
|
|
ldd [%src + (offset) + 0x08], %t2; \
|
|
ldd [%src + (offset) + 0x10], %t4; \
|
|
ldd [%src + (offset) + 0x18], %t6; \
|
|
st %t0, [%dst + (offset) + 0x00]; \
|
|
st %t1, [%dst + (offset) + 0x04]; \
|
|
st %t2, [%dst + (offset) + 0x08]; \
|
|
st %t3, [%dst + (offset) + 0x0c]; \
|
|
st %t4, [%dst + (offset) + 0x10]; \
|
|
st %t5, [%dst + (offset) + 0x14]; \
|
|
st %t6, [%dst + (offset) + 0x18]; \
|
|
st %t7, [%dst + (offset) + 0x1c];
|
|
|
|
#define MOVE_BIGALIGNCHUNK(src, dst, offset, t0, t1, t2, t3, t4, t5, t6, t7) \
|
|
ldd [%src + (offset) + 0x00], %t0; \
|
|
ldd [%src + (offset) + 0x08], %t2; \
|
|
ldd [%src + (offset) + 0x10], %t4; \
|
|
ldd [%src + (offset) + 0x18], %t6; \
|
|
std %t0, [%dst + (offset) + 0x00]; \
|
|
std %t2, [%dst + (offset) + 0x08]; \
|
|
std %t4, [%dst + (offset) + 0x10]; \
|
|
std %t6, [%dst + (offset) + 0x18];
|
|
|
|
#define MOVE_LASTCHUNK(src, dst, offset, t0, t1, t2, t3) \
|
|
ldd [%src - (offset) - 0x10], %t0; \
|
|
ldd [%src - (offset) - 0x08], %t2; \
|
|
st %t0, [%dst - (offset) - 0x10]; \
|
|
st %t1, [%dst - (offset) - 0x0c]; \
|
|
st %t2, [%dst - (offset) - 0x08]; \
|
|
st %t3, [%dst - (offset) - 0x04];
|
|
|
|
#define MOVE_HALFCHUNK(src, dst, offset, t0, t1, t2, t3) \
|
|
lduh [%src + (offset) + 0x00], %t0; \
|
|
lduh [%src + (offset) + 0x02], %t1; \
|
|
lduh [%src + (offset) + 0x04], %t2; \
|
|
lduh [%src + (offset) + 0x06], %t3; \
|
|
sth %t0, [%dst + (offset) + 0x00]; \
|
|
sth %t1, [%dst + (offset) + 0x02]; \
|
|
sth %t2, [%dst + (offset) + 0x04]; \
|
|
sth %t3, [%dst + (offset) + 0x06];
|
|
|
|
#define MOVE_SHORTCHUNK(src, dst, offset, t0, t1) \
|
|
ldub [%src - (offset) - 0x02], %t0; \
|
|
ldub [%src - (offset) - 0x01], %t1; \
|
|
stb %t0, [%dst - (offset) - 0x02]; \
|
|
stb %t1, [%dst - (offset) - 0x01];
|
|
|
|
.text
|
|
.align 4
|
|
|
|
.globl __copy_user_begin
|
|
__copy_user_begin:
|
|
|
|
.globl __copy_user
|
|
dword_align:
|
|
andcc %o1, 1, %g0
|
|
be 4f
|
|
andcc %o1, 2, %g0
|
|
|
|
EXO2(ldub [%o1], %g2)
|
|
add %o1, 1, %o1
|
|
EXO2(stb %g2, [%o0])
|
|
sub %o2, 1, %o2
|
|
bne 3f
|
|
add %o0, 1, %o0
|
|
|
|
EXO2(lduh [%o1], %g2)
|
|
add %o1, 2, %o1
|
|
EXO2(sth %g2, [%o0])
|
|
sub %o2, 2, %o2
|
|
b 3f
|
|
add %o0, 2, %o0
|
|
4:
|
|
EXO2(lduh [%o1], %g2)
|
|
add %o1, 2, %o1
|
|
EXO2(sth %g2, [%o0])
|
|
sub %o2, 2, %o2
|
|
b 3f
|
|
add %o0, 2, %o0
|
|
|
|
__copy_user: /* %o0=dst %o1=src %o2=len */
|
|
xor %o0, %o1, %o4
|
|
1:
|
|
andcc %o4, 3, %o5
|
|
2:
|
|
bne cannot_optimize
|
|
cmp %o2, 15
|
|
|
|
bleu short_aligned_end
|
|
andcc %o1, 3, %g0
|
|
|
|
bne dword_align
|
|
3:
|
|
andcc %o1, 4, %g0
|
|
|
|
be 2f
|
|
mov %o2, %g1
|
|
|
|
EXO2(ld [%o1], %o4)
|
|
sub %g1, 4, %g1
|
|
EXO2(st %o4, [%o0])
|
|
add %o1, 4, %o1
|
|
add %o0, 4, %o0
|
|
2:
|
|
andcc %g1, 0xffffff80, %g7
|
|
be 3f
|
|
andcc %o0, 4, %g0
|
|
|
|
be ldd_std + 4
|
|
5:
|
|
MOVE_BIGCHUNK(o1, o0, 0x00, o2, o3, o4, o5, g2, g3, g4, g5)
|
|
MOVE_BIGCHUNK(o1, o0, 0x20, o2, o3, o4, o5, g2, g3, g4, g5)
|
|
MOVE_BIGCHUNK(o1, o0, 0x40, o2, o3, o4, o5, g2, g3, g4, g5)
|
|
MOVE_BIGCHUNK(o1, o0, 0x60, o2, o3, o4, o5, g2, g3, g4, g5)
|
|
80:
|
|
EXT(5b, 80b, 50f)
|
|
subcc %g7, 128, %g7
|
|
add %o1, 128, %o1
|
|
bne 5b
|
|
add %o0, 128, %o0
|
|
3:
|
|
andcc %g1, 0x70, %g7
|
|
be copy_user_table_end
|
|
andcc %g1, 8, %g0
|
|
|
|
sethi %hi(copy_user_table_end), %o5
|
|
srl %g7, 1, %o4
|
|
add %g7, %o4, %o4
|
|
add %o1, %g7, %o1
|
|
sub %o5, %o4, %o5
|
|
jmpl %o5 + %lo(copy_user_table_end), %g0
|
|
add %o0, %g7, %o0
|
|
|
|
copy_user_table:
|
|
MOVE_LASTCHUNK(o1, o0, 0x60, g2, g3, g4, g5)
|
|
MOVE_LASTCHUNK(o1, o0, 0x50, g2, g3, g4, g5)
|
|
MOVE_LASTCHUNK(o1, o0, 0x40, g2, g3, g4, g5)
|
|
MOVE_LASTCHUNK(o1, o0, 0x30, g2, g3, g4, g5)
|
|
MOVE_LASTCHUNK(o1, o0, 0x20, g2, g3, g4, g5)
|
|
MOVE_LASTCHUNK(o1, o0, 0x10, g2, g3, g4, g5)
|
|
MOVE_LASTCHUNK(o1, o0, 0x00, g2, g3, g4, g5)
|
|
copy_user_table_end:
|
|
EXT(copy_user_table, copy_user_table_end, 51f)
|
|
be copy_user_last7
|
|
andcc %g1, 4, %g0
|
|
|
|
EX(ldd [%o1], %g2, and %g1, 0xf)
|
|
add %o0, 8, %o0
|
|
add %o1, 8, %o1
|
|
EX(st %g2, [%o0 - 0x08], and %g1, 0xf)
|
|
EX2(st %g3, [%o0 - 0x04], and %g1, 0xf, %g1, sub %g1, 4)
|
|
copy_user_last7:
|
|
be 1f
|
|
andcc %g1, 2, %g0
|
|
|
|
EX(ld [%o1], %g2, and %g1, 7)
|
|
add %o1, 4, %o1
|
|
EX(st %g2, [%o0], and %g1, 7)
|
|
add %o0, 4, %o0
|
|
1:
|
|
be 1f
|
|
andcc %g1, 1, %g0
|
|
|
|
EX(lduh [%o1], %g2, and %g1, 3)
|
|
add %o1, 2, %o1
|
|
EX(sth %g2, [%o0], and %g1, 3)
|
|
add %o0, 2, %o0
|
|
1:
|
|
be 1f
|
|
nop
|
|
|
|
EX(ldub [%o1], %g2, add %g0, 1)
|
|
EX(stb %g2, [%o0], add %g0, 1)
|
|
1:
|
|
retl
|
|
clr %o0
|
|
|
|
ldd_std:
|
|
MOVE_BIGALIGNCHUNK(o1, o0, 0x00, o2, o3, o4, o5, g2, g3, g4, g5)
|
|
MOVE_BIGALIGNCHUNK(o1, o0, 0x20, o2, o3, o4, o5, g2, g3, g4, g5)
|
|
MOVE_BIGALIGNCHUNK(o1, o0, 0x40, o2, o3, o4, o5, g2, g3, g4, g5)
|
|
MOVE_BIGALIGNCHUNK(o1, o0, 0x60, o2, o3, o4, o5, g2, g3, g4, g5)
|
|
81:
|
|
EXT(ldd_std, 81b, 52f)
|
|
subcc %g7, 128, %g7
|
|
add %o1, 128, %o1
|
|
bne ldd_std
|
|
add %o0, 128, %o0
|
|
|
|
andcc %g1, 0x70, %g7
|
|
be copy_user_table_end
|
|
andcc %g1, 8, %g0
|
|
|
|
sethi %hi(copy_user_table_end), %o5
|
|
srl %g7, 1, %o4
|
|
add %g7, %o4, %o4
|
|
add %o1, %g7, %o1
|
|
sub %o5, %o4, %o5
|
|
jmpl %o5 + %lo(copy_user_table_end), %g0
|
|
add %o0, %g7, %o0
|
|
|
|
cannot_optimize:
|
|
bleu short_end
|
|
cmp %o5, 2
|
|
|
|
bne byte_chunk
|
|
and %o2, 0xfffffff0, %o3
|
|
|
|
andcc %o1, 1, %g0
|
|
be 10f
|
|
nop
|
|
|
|
EXO2(ldub [%o1], %g2)
|
|
add %o1, 1, %o1
|
|
EXO2(stb %g2, [%o0])
|
|
sub %o2, 1, %o2
|
|
andcc %o2, 0xfffffff0, %o3
|
|
be short_end
|
|
add %o0, 1, %o0
|
|
10:
|
|
MOVE_HALFCHUNK(o1, o0, 0x00, g2, g3, g4, g5)
|
|
MOVE_HALFCHUNK(o1, o0, 0x08, g2, g3, g4, g5)
|
|
82:
|
|
EXT(10b, 82b, 53f)
|
|
subcc %o3, 0x10, %o3
|
|
add %o1, 0x10, %o1
|
|
bne 10b
|
|
add %o0, 0x10, %o0
|
|
b 2f
|
|
and %o2, 0xe, %o3
|
|
|
|
byte_chunk:
|
|
MOVE_SHORTCHUNK(o1, o0, -0x02, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, -0x04, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, -0x06, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, -0x08, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, -0x0a, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, -0x0c, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, -0x0e, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, -0x10, g2, g3)
|
|
83:
|
|
EXT(byte_chunk, 83b, 54f)
|
|
subcc %o3, 0x10, %o3
|
|
add %o1, 0x10, %o1
|
|
bne byte_chunk
|
|
add %o0, 0x10, %o0
|
|
|
|
short_end:
|
|
and %o2, 0xe, %o3
|
|
2:
|
|
sethi %hi(short_table_end), %o5
|
|
sll %o3, 3, %o4
|
|
add %o0, %o3, %o0
|
|
sub %o5, %o4, %o5
|
|
add %o1, %o3, %o1
|
|
jmpl %o5 + %lo(short_table_end), %g0
|
|
andcc %o2, 1, %g0
|
|
84:
|
|
MOVE_SHORTCHUNK(o1, o0, 0x0c, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, 0x0a, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, 0x08, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, 0x06, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, 0x04, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, 0x02, g2, g3)
|
|
MOVE_SHORTCHUNK(o1, o0, 0x00, g2, g3)
|
|
short_table_end:
|
|
EXT(84b, short_table_end, 55f)
|
|
be 1f
|
|
nop
|
|
EX(ldub [%o1], %g2, add %g0, 1)
|
|
EX(stb %g2, [%o0], add %g0, 1)
|
|
1:
|
|
retl
|
|
clr %o0
|
|
|
|
short_aligned_end:
|
|
bne short_end
|
|
andcc %o2, 8, %g0
|
|
|
|
be 1f
|
|
andcc %o2, 4, %g0
|
|
|
|
EXO2(ld [%o1 + 0x00], %g2)
|
|
EXO2(ld [%o1 + 0x04], %g3)
|
|
add %o1, 8, %o1
|
|
EXO2(st %g2, [%o0 + 0x00])
|
|
EX(st %g3, [%o0 + 0x04], sub %o2, 4)
|
|
add %o0, 8, %o0
|
|
1:
|
|
b copy_user_last7
|
|
mov %o2, %g1
|
|
|
|
.section .fixup,#alloc,#execinstr
|
|
.align 4
|
|
97:
|
|
mov %o2, %g3
|
|
fixupretl:
|
|
sethi %hi(PAGE_OFFSET), %g1
|
|
cmp %o0, %g1
|
|
blu 1f
|
|
cmp %o1, %g1
|
|
bgeu 1f
|
|
nop
|
|
save %sp, -64, %sp
|
|
mov %i0, %o0
|
|
call __bzero
|
|
mov %g3, %o1
|
|
restore
|
|
1: retl
|
|
mov %g3, %o0
|
|
|
|
/* exception routine sets %g2 to (broken_insn - first_insn)>>2 */
|
|
50:
|
|
/* This magic counts how many bytes are left when crash in MOVE_BIGCHUNK
|
|
* happens. This is derived from the amount ldd reads, st stores, etc.
|
|
* x = g2 % 12;
|
|
* g3 = g1 + g7 - ((g2 / 12) * 32 + (x < 4) ? 0 : (x - 4) * 4);
|
|
* o0 += (g2 / 12) * 32;
|
|
*/
|
|
cmp %g2, 12
|
|
add %o0, %g7, %o0
|
|
bcs 1f
|
|
cmp %g2, 24
|
|
bcs 2f
|
|
cmp %g2, 36
|
|
bcs 3f
|
|
nop
|
|
sub %g2, 12, %g2
|
|
sub %g7, 32, %g7
|
|
3: sub %g2, 12, %g2
|
|
sub %g7, 32, %g7
|
|
2: sub %g2, 12, %g2
|
|
sub %g7, 32, %g7
|
|
1: cmp %g2, 4
|
|
bcs,a 60f
|
|
clr %g2
|
|
sub %g2, 4, %g2
|
|
sll %g2, 2, %g2
|
|
60: and %g1, 0x7f, %g3
|
|
sub %o0, %g7, %o0
|
|
add %g3, %g7, %g3
|
|
ba fixupretl
|
|
sub %g3, %g2, %g3
|
|
51:
|
|
/* i = 41 - g2; j = i % 6;
|
|
* g3 = (g1 & 15) + (i / 6) * 16 + (j < 4) ? (j + 1) * 4 : 16;
|
|
* o0 -= (i / 6) * 16 + 16;
|
|
*/
|
|
neg %g2
|
|
and %g1, 0xf, %g1
|
|
add %g2, 41, %g2
|
|
add %o0, %g1, %o0
|
|
1: cmp %g2, 6
|
|
bcs,a 2f
|
|
cmp %g2, 4
|
|
add %g1, 16, %g1
|
|
b 1b
|
|
sub %g2, 6, %g2
|
|
2: bcc,a 2f
|
|
mov 16, %g2
|
|
inc %g2
|
|
sll %g2, 2, %g2
|
|
2: add %g1, %g2, %g3
|
|
ba fixupretl
|
|
sub %o0, %g3, %o0
|
|
52:
|
|
/* g3 = g1 + g7 - (g2 / 8) * 32 + (g2 & 4) ? (g2 & 3) * 8 : 0;
|
|
o0 += (g2 / 8) * 32 */
|
|
andn %g2, 7, %g4
|
|
add %o0, %g7, %o0
|
|
andcc %g2, 4, %g0
|
|
and %g2, 3, %g2
|
|
sll %g4, 2, %g4
|
|
sll %g2, 3, %g2
|
|
bne 60b
|
|
sub %g7, %g4, %g7
|
|
ba 60b
|
|
clr %g2
|
|
53:
|
|
/* g3 = o3 + (o2 & 15) - (g2 & 8) - (g2 & 4) ? (g2 & 3) * 2 : 0;
|
|
o0 += (g2 & 8) */
|
|
and %g2, 3, %g4
|
|
andcc %g2, 4, %g0
|
|
and %g2, 8, %g2
|
|
sll %g4, 1, %g4
|
|
be 1f
|
|
add %o0, %g2, %o0
|
|
add %g2, %g4, %g2
|
|
1: and %o2, 0xf, %g3
|
|
add %g3, %o3, %g3
|
|
ba fixupretl
|
|
sub %g3, %g2, %g3
|
|
54:
|
|
/* g3 = o3 + (o2 & 15) - (g2 / 4) * 2 - (g2 & 2) ? (g2 & 1) : 0;
|
|
o0 += (g2 / 4) * 2 */
|
|
srl %g2, 2, %o4
|
|
and %g2, 1, %o5
|
|
srl %g2, 1, %g2
|
|
add %o4, %o4, %o4
|
|
and %o5, %g2, %o5
|
|
and %o2, 0xf, %o2
|
|
add %o0, %o4, %o0
|
|
sub %o3, %o5, %o3
|
|
sub %o2, %o4, %o2
|
|
ba fixupretl
|
|
add %o2, %o3, %g3
|
|
55:
|
|
/* i = 27 - g2;
|
|
g3 = (o2 & 1) + i / 4 * 2 + !(i & 3);
|
|
o0 -= i / 4 * 2 + 1 */
|
|
neg %g2
|
|
and %o2, 1, %o2
|
|
add %g2, 27, %g2
|
|
srl %g2, 2, %o5
|
|
andcc %g2, 3, %g0
|
|
mov 1, %g2
|
|
add %o5, %o5, %o5
|
|
be,a 1f
|
|
clr %g2
|
|
1: add %g2, %o5, %g3
|
|
sub %o0, %g3, %o0
|
|
ba fixupretl
|
|
add %g3, %o2, %g3
|
|
|
|
.globl __copy_user_end
|
|
__copy_user_end:
|