atomics.s raw
1 /* Contract for all versions is same as cas.l r2,r3,@r0
2 * pr and r1 are also clobbered (by jsr & r1 as temp).
3 * r0,r2,r4-r15 must be preserved.
4 * r3 contains result (==r2 iff cas succeeded). */
5
6 .align 2
7 .global __sh_cas_gusa
8 .hidden __sh_cas_gusa
9 __sh_cas_gusa:
10 mov.l r5,@-r15
11 mov.l r4,@-r15
12 mov r0,r4
13 mova 1f,r0
14 mov r15,r1
15 mov #(0f-1f),r15
16 0: mov.l @r4,r5
17 cmp/eq r5,r2
18 bf 1f
19 mov.l r3,@r4
20 1: mov r1,r15
21 mov r5,r3
22 mov r4,r0
23 mov.l @r15+,r4
24 rts
25 mov.l @r15+,r5
26
27 .global __sh_cas_llsc
28 .hidden __sh_cas_llsc
29 __sh_cas_llsc:
30 mov r0,r1
31 .word 0x00ab /* synco */
32 0: .word 0x0163 /* movli.l @r1,r0 */
33 cmp/eq r0,r2
34 bf 1f
35 mov r3,r0
36 .word 0x0173 /* movco.l r0,@r1 */
37 bf 0b
38 mov r2,r0
39 1: .word 0x00ab /* synco */
40 mov r0,r3
41 rts
42 mov r1,r0
43
44 .global __sh_cas_imask
45 .hidden __sh_cas_imask
46 __sh_cas_imask:
47 mov r0,r1
48 stc sr,r0
49 mov.l r0,@-r15
50 or #0xf0,r0
51 ldc r0,sr
52 mov.l @r1,r0
53 cmp/eq r0,r2
54 bf 1f
55 mov.l r3,@r1
56 1: ldc.l @r15+,sr
57 mov r0,r3
58 rts
59 mov r1,r0
60
61 .global __sh_cas_cas_l
62 .hidden __sh_cas_cas_l
63 __sh_cas_cas_l:
64 rts
65 .word 0x2323 /* cas.l r2,r3,@r0 */
66