160 строки
2.8 KiB
NASM
160 строки
2.8 KiB
NASM
START_FILE
|
|
TEXT
|
|
|
|
ALIGN(4)
|
|
START_FUNC(opal_atomic_mb)
|
|
sync
|
|
blr
|
|
END_FUNC(opal_atomic_mb)
|
|
|
|
|
|
START_FUNC(opal_atomic_rmb)
|
|
lwsync
|
|
blr
|
|
END_FUNC(opal_atomic_rmb)
|
|
|
|
|
|
START_FUNC(opal_atomic_wmb)
|
|
eieio
|
|
blr
|
|
END_FUNC(opal_atomic_wmb)
|
|
|
|
|
|
START_FUNC(opal_atomic_cmpset_32)
|
|
LSYM(1) lwarx r0, 0, r3
|
|
cmpw 0, r0, r4
|
|
bne- REFLSYM(2)
|
|
stwcx. r5, 0, r3
|
|
bne- REFLSYM(1)
|
|
LSYM(2)
|
|
cmpw cr7,r0,r4
|
|
mfcr r3
|
|
rlwinm r3,r3,31,1
|
|
blr
|
|
END_FUNC(opal_atomic_cmpset_32)
|
|
|
|
|
|
START_FUNC(opal_atomic_cmpset_acq_32)
|
|
mflr r0
|
|
std r29,-24(r1)
|
|
std r0,16(r1)
|
|
stdu r1,-144(r1)
|
|
bl REFGSYM(opal_atomic_cmpset_32)
|
|
mr r29,r3
|
|
bl REFGSYM(opal_atomic_rmb)
|
|
mr r3,r29
|
|
addi r1,r1,144
|
|
ld r0,16(r1)
|
|
mtlr r0
|
|
ld r29,-24(r1)
|
|
blr
|
|
END_FUNC(opal_atomic_cmpset_acq_32)
|
|
|
|
|
|
START_FUNC(opal_atomic_cmpset_rel_32)
|
|
mflr r0
|
|
std r27,-40(r1)
|
|
std r28,-32(r1)
|
|
std r29,-24(r1)
|
|
std r0,16(r1)
|
|
stdu r1,-160(r1)
|
|
mr r29,r3
|
|
mr r28,r4
|
|
mr r27,r5
|
|
bl REFGSYM(opal_atomic_wmb)
|
|
mr r3,r29
|
|
mr r4,r28
|
|
mr r5,r27
|
|
bl REFGSYM(opal_atomic_cmpset_32)
|
|
addi r1,r1,160
|
|
ld r0,16(r1)
|
|
mtlr r0
|
|
ld r27,-40(r1)
|
|
ld r28,-32(r1)
|
|
ld r29,-24(r1)
|
|
blr
|
|
END_FUNC(opal_atomic_cmpset_rel_32)
|
|
|
|
|
|
START_FUNC(opal_atomic_cmpset_64)
|
|
LSYM(3) ldarx r0, 0, r3
|
|
cmpd 0, r0, r4
|
|
bne- REFLSYM(4)
|
|
stdcx. r5, 0, r3
|
|
bne- REFLSYM(3)
|
|
LSYM(4)
|
|
xor r3,r4,r0
|
|
subfic r5,r3,0
|
|
adde r3,r5,r3
|
|
blr
|
|
END_FUNC(opal_atomic_cmpset_64)
|
|
|
|
|
|
START_FUNC(opal_atomic_cmpset_acq_64)
|
|
LSYM(7) ldarx r0, 0, r3
|
|
cmpd 0, r0, r4
|
|
bne- REFLSYM(8)
|
|
stdcx. r5, 0, r3
|
|
bne- REFLSYM(7)
|
|
LSYM(8)
|
|
lwsync
|
|
xor r3,r4,r0
|
|
subfic r5,r3,0
|
|
adde r3,r5,r3
|
|
blr
|
|
END_FUNC(opal_atomic_cmpset_acq_64)
|
|
|
|
|
|
START_FUNC(opal_atomic_cmpset_rel_64)
|
|
eieio
|
|
LSYM(9) ldarx r0, 0, r3
|
|
cmpd 0, r0, r4
|
|
bne- REFLSYM(10)
|
|
stdcx. r5, 0, r3
|
|
bne- REFLSYM(9)
|
|
LSYM(10)
|
|
xor r3,r4,r0
|
|
subfic r5,r3,0
|
|
adde r3,r5,r3
|
|
blr
|
|
END_FUNC(opal_atomic_cmpset_rel_64)
|
|
|
|
|
|
START_FUNC(opal_atomic_add_32)
|
|
LSYM(5) lwarx r0, 0, r3
|
|
add r0, r4, r0
|
|
stwcx. r0, 0, r3
|
|
bne- REFLSYM(5)
|
|
|
|
lwz r3,0(r3)
|
|
extsw r3,r3
|
|
blr
|
|
END_FUNC(opal_atomic_add_32)
|
|
|
|
|
|
START_FUNC(opal_atomic_sub_32)
|
|
LSYM(6) lwarx r0,0,r3
|
|
subf r0,r4,r0
|
|
stwcx. r0,0,r3
|
|
bne- REFLSYM(6)
|
|
|
|
lwz r3,0(r3)
|
|
extsw r3,r3
|
|
blr
|
|
END_FUNC(opal_atomic_sub_32)
|
|
|
|
START_FUNC(opal_sys_timer_get_cycles)
|
|
LSYM(11)
|
|
mftbu r2
|
|
rldicl r2,r2,0,32
|
|
mftb r0
|
|
rldicl r9,r0,0,32
|
|
mftbu r0
|
|
rldicl r0,r0,0,32
|
|
cmpw cr7,r0,r2
|
|
bne cr7,REFLSYM(11)
|
|
sldi r3,r0,32
|
|
or r3,r3,r9
|
|
blr
|
|
END_FUNC(opal_sys_timer_get_cycles)
|