/arch/sparc64/lib/bitops.S

https://bitbucket.org/evzijst/gittest · Assembly · 145 lines · 127 code · 9 blank · 9 comment · 0 complexity · a6419ed0e68bc9489d5c8965e3dbba86 MD5 · raw file 

    

  1. /* $Id: bitops.S,v 1.3 2001/11/18 00:12:56 davem Exp $
    2. 

  2.  * bitops.S: Sparc64 atomic bit operations.
    3. 

  3.  *
    4. 

  4.  * Copyright (C) 2000 David S. Miller (davem@redhat.com)
    5. 

  5.  */
    6. 

  6. 

  7. #include <linux/config.h>
    8. 

  8. #include <asm/asi.h>
    9. 

  9. 

  10. 	/* On SMP we need to use memory barriers to ensure
    11. 

  11. 	 * correct memory operation ordering, nop these out
    12. 

  12. 	 * for uniprocessor.
    13. 

  13. 	 */
    14. 

  14. #ifdef CONFIG_SMP
    15. 

  15. #define BITOP_PRE_BARRIER	membar #StoreLoad | #LoadLoad
    16. 

  16. #define BITOP_POST_BARRIER	membar #StoreLoad | #StoreStore
    17. 

  17. #else
    18. 

  18. #define BITOP_PRE_BARRIER	nop
    19. 

  19. #define BITOP_POST_BARRIER	nop
    20. 

  20. #endif
    21. 

  21. 

  22. 	.text
    23. 

  23. 

  24. 	.globl	test_and_set_bit
    25. 

  25. 	.type	test_and_set_bit,#function
    26. 

  26. test_and_set_bit:	/* %o0=nr, %o1=addr */
    27. 

  27. 	BITOP_PRE_BARRIER
    28. 

  28. 	srlx	%o0, 6, %g1
    29. 

  29. 	mov	1, %o2
    30. 

  30. 	sllx	%g1, 3, %g3
    31. 

  31. 	and	%o0, 63, %g2
    32. 

  32. 	sllx	%o2, %g2, %o2
    33. 

  33. 	add	%o1, %g3, %o1
    34. 

  34. 1:	ldx	[%o1], %g7
    35. 

  35. 	or	%g7, %o2, %g1
    36. 

  36. 	casx	[%o1], %g7, %g1
    37. 

  37. 	cmp	%g7, %g1
    38. 

  38. 	bne,pn	%xcc, 1b
    39. 

  39. 	 and	%g7, %o2, %g2
    40. 

  40. 	BITOP_POST_BARRIER
    41. 

  41. 	clr	%o0
    42. 

  42. 	retl
    43. 

  43. 	 movrne	%g2, 1, %o0
    44. 

  44. 	.size	test_and_set_bit, .-test_and_set_bit
    45. 

  45. 

  46. 	.globl	test_and_clear_bit
    47. 

  47. 	.type	test_and_clear_bit,#function
    48. 

  48. test_and_clear_bit:	/* %o0=nr, %o1=addr */
    49. 

  49. 	BITOP_PRE_BARRIER
    50. 

  50. 	srlx	%o0, 6, %g1
    51. 

  51. 	mov	1, %o2
    52. 

  52. 	sllx	%g1, 3, %g3
    53. 

  53. 	and	%o0, 63, %g2
    54. 

  54. 	sllx	%o2, %g2, %o2
    55. 

  55. 	add	%o1, %g3, %o1
    56. 

  56. 1:	ldx	[%o1], %g7
    57. 

  57. 	andn	%g7, %o2, %g1
    58. 

  58. 	casx	[%o1], %g7, %g1
    59. 

  59. 	cmp	%g7, %g1
    60. 

  60. 	bne,pn	%xcc, 1b
    61. 

  61. 	 and	%g7, %o2, %g2
    62. 

  62. 	BITOP_POST_BARRIER
    63. 

  63. 	clr	%o0
    64. 

  64. 	retl
    65. 

  65. 	 movrne	%g2, 1, %o0
    66. 

  66. 	.size	test_and_clear_bit, .-test_and_clear_bit
    67. 

  67. 

  68. 	.globl	test_and_change_bit
    69. 

  69. 	.type	test_and_change_bit,#function
    70. 

  70. test_and_change_bit:	/* %o0=nr, %o1=addr */
    71. 

  71. 	BITOP_PRE_BARRIER
    72. 

  72. 	srlx	%o0, 6, %g1
    73. 

  73. 	mov	1, %o2
    74. 

  74. 	sllx	%g1, 3, %g3
    75. 

  75. 	and	%o0, 63, %g2
    76. 

  76. 	sllx	%o2, %g2, %o2
    77. 

  77. 	add	%o1, %g3, %o1
    78. 

  78. 1:	ldx	[%o1], %g7
    79. 

  79. 	xor	%g7, %o2, %g1
    80. 

  80. 	casx	[%o1], %g7, %g1
    81. 

  81. 	cmp	%g7, %g1
    82. 

  82. 	bne,pn	%xcc, 1b
    83. 

  83. 	 and	%g7, %o2, %g2
    84. 

  84. 	BITOP_POST_BARRIER
    85. 

  85. 	clr	%o0
    86. 

  86. 	retl
    87. 

  87. 	 movrne	%g2, 1, %o0
    88. 

  88. 	.size	test_and_change_bit, .-test_and_change_bit
    89. 

  89. 

  90. 	.globl	set_bit
    91. 

  91. 	.type	set_bit,#function
    92. 

  92. set_bit:		/* %o0=nr, %o1=addr */
    93. 

  93. 	srlx	%o0, 6, %g1
    94. 

  94. 	mov	1, %o2
    95. 

  95. 	sllx	%g1, 3, %g3
    96. 

  96. 	and	%o0, 63, %g2
    97. 

  97. 	sllx	%o2, %g2, %o2
    98. 

  98. 	add	%o1, %g3, %o1
    99. 

  99. 1:	ldx	[%o1], %g7
    100. 

  100. 	or	%g7, %o2, %g1
    101. 

  101. 	casx	[%o1], %g7, %g1
    102. 

  102. 	cmp	%g7, %g1
    103. 

  103. 	bne,pn	%xcc, 1b
    104. 

  104. 	 nop
    105. 

  105. 	retl
    106. 

  106. 	 nop
    107. 

  107. 	.size	set_bit, .-set_bit
    108. 

  108. 

  109. 	.globl	clear_bit
    110. 

  110. 	.type	clear_bit,#function
    111. 

  111. clear_bit:		/* %o0=nr, %o1=addr */
    112. 

  112. 	srlx	%o0, 6, %g1
    113. 

  113. 	mov	1, %o2
    114. 

  114. 	sllx	%g1, 3, %g3
    115. 

  115. 	and	%o0, 63, %g2
    116. 

  116. 	sllx	%o2, %g2, %o2
    117. 

  117. 	add	%o1, %g3, %o1
    118. 

  118. 1:	ldx	[%o1], %g7
    119. 

  119. 	andn	%g7, %o2, %g1
    120. 

  120. 	casx	[%o1], %g7, %g1
    121. 

  121. 	cmp	%g7, %g1
    122. 

  122. 	bne,pn	%xcc, 1b
    123. 

  123. 	 nop
    124. 

  124. 	retl
    125. 

  125. 	 nop
    126. 

  126. 	.size	clear_bit, .-clear_bit
    127. 

  127. 

  128. 	.globl	change_bit
    129. 

  129. 	.type	change_bit,#function
    130. 

  130. change_bit:		/* %o0=nr, %o1=addr */
    131. 

  131. 	srlx	%o0, 6, %g1
    132. 

  132. 	mov	1, %o2
    133. 

  133. 	sllx	%g1, 3, %g3
    134. 

  134. 	and	%o0, 63, %g2
    135. 

  135. 	sllx	%o2, %g2, %o2
    136. 

  136. 	add	%o1, %g3, %o1
    137. 

  137. 1:	ldx	[%o1], %g7
    138. 

  138. 	xor	%g7, %o2, %g1
    139. 

  139. 	casx	[%o1], %g7, %g1
    140. 

  140. 	cmp	%g7, %g1
    141. 

  141. 	bne,pn	%xcc, 1b
    142. 

  142. 	 nop
    143. 

  143. 	retl
    144. 

  144. 	 nop
    145. 

  145. 	.size	change_bit, .-change_bit
    146.