1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
|
.section ".text", #alloc, #execinstr
.align 8
.skip 16
.global segflush
.type segflush, #function
! The flush instruction works on 8-byte chunks.
! We truncate the pointer and increase the count
! to make sure we flush the right range.
! SPARC requires 5 instructions after flush to
! let the caches settle. The loop code supplies
! the delay instructions.
segflush: ! int segflush(void *p, ulong len)
and %o0,-8,%o0 ! clear low 3 bits of p
add %o1, 7, %o1 ! len += 7
1:
flush %o0 ! synchronize cache
sub %o1, 8, %o1 ! len -= 8
cmp %o1, 0 ! if len > 0, repeat
bg 1b
add %o0, 8, %o0 ! p += 8 in delay slot
retl
add %g0, %g0, %o0 ! return 0
.size segflush,(.-segflush)
.section ".text", #alloc, #execinstr
.align 8
.skip 16
.global FPsave
.type FPsave, #function
FPsave:
retl
st %fsr,[%o0]
.size FPsave,(.-FPsave)
.section ".text", #alloc, #execinstr
.align 8
.skip 16
.global FPrestore
.type FPrestore, #function
FPrestore:
retl
ld [%o0],%fsr
.size FPrestore,(.-FPrestore)
.section ".text", #alloc, #execinstr
.align 8
.skip 16
.global getcallerpc
.type getcallerpc, #function
getcallerpc: ! ignore argument
retl
add %i7,0,%o0
.size getcallerpc,(.-getcallerpc)
.section ".text", #alloc, #execinstr
.align 8
.skip 16
.global _tas
.type _tas, #function
_tas:
or %g0,1,%o1
swap [%o0],%o1
retl
or %g0,%o1,%o0
.size _tas,(.-_tas)
|
