nsz Git - musl/blob - src/thread/sh/atomics.s

   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 */