memset.S
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:3k
源码类别:

嵌入式Linux

开发平台:

Unix_Linux

  1. /*
  2.  * linux/arch/alpha/memset.S
  3.  *
  4.  * This is an efficient (and small) implementation of the C library "memset()"
  5.  * function for the alpha.
  6.  *
  7.  * (C) Copyright 1996 Linus Torvalds
  8.  *
  9.  * This routine is "moral-ware": you are free to use it any way you wish, and
  10.  * the only obligation I put on you is a moral one: if you make any improvements
  11.  * to the routine, please send me your improvements for me to use similarly.
  12.  *
  13.  * The scheduling comments are according to the EV5 documentation (and done by 
  14.  * hand, so they might well be incorrect, please do tell me about it..)
  15.  */
  16. .set noat
  17. .set noreorder
  18. .text
  19. .globl __memset
  20. .globl __memsetw
  21. .globl __constant_c_memset
  22. .ent __memset
  23. .align 5
  24. __memset:
  25. .frame $30,0,$26,0
  26. .prologue 0
  27. and $17,255,$1 /* E1 */
  28. insbl $17,1,$17 /* .. E0 */
  29. bis $17,$1,$17 /* E0 (p-c latency, next cycle) */
  30. sll $17,16,$1 /* E1 (p-c latency, next cycle) */
  31. bis $17,$1,$17 /* E0 (p-c latency, next cycle) */
  32. sll $17,32,$1 /* E1 (p-c latency, next cycle) */
  33. bis $17,$1,$17 /* E0 (p-c latency, next cycle) */
  34. ldq_u $31,0($30) /* .. E1 */
  35. .align 5
  36. __constant_c_memset:
  37. addq $18,$16,$6 /* E0 */
  38. bis $16,$16,$0 /* .. E1 */
  39. xor $16,$6,$1 /* E0 */
  40. ble $18,end /* .. E1 */
  41. bic $1,7,$1 /* E0 */
  42. beq $1,within_one_quad /* .. E1 (note EV5 zero-latency forwarding) */
  43. and $16,7,$3 /* E0 */
  44. beq $3,aligned /* .. E1 (note EV5 zero-latency forwarding) */
  45. ldq_u $4,0($16) /* E0 */
  46. bis $16,$16,$5 /* .. E1 */
  47. insql $17,$16,$2 /* E0 */
  48. subq $3,8,$3 /* .. E1 */
  49. addq $18,$3,$18 /* E0 $18 is new count ($3 is negative) */
  50. mskql $4,$16,$4 /* .. E1 (and possible load stall) */
  51. subq $16,$3,$16 /* E0  $16 is new aligned destination */
  52. bis $2,$4,$1 /* .. E1 */
  53. bis $31,$31,$31 /* E0 */
  54. ldq_u $31,0($30) /* .. E1 */
  55. stq_u $1,0($5) /* E0 */
  56. bis $31,$31,$31 /* .. E1 */
  57. .align 4
  58. aligned:
  59. sra $18,3,$3 /* E0 */
  60. and $18,7,$18 /* .. E1 */
  61. bis $16,$16,$5 /* E0 */
  62. beq $3,no_quad /* .. E1 */
  63. .align 3
  64. loop:
  65. stq $17,0($5) /* E0 */
  66. subq $3,1,$3 /* .. E1 */
  67. addq $5,8,$5 /* E0 */
  68. bne $3,loop /* .. E1 */
  69. no_quad:
  70. bis $31,$31,$31 /* E0 */
  71. beq $18,end /* .. E1 */
  72. ldq $7,0($5) /* E0 */
  73. mskqh $7,$6,$2 /* .. E1 (and load stall) */
  74. insqh $17,$6,$4 /* E0 */
  75. bis $2,$4,$1 /* .. E1 */
  76. stq $1,0($5) /* E0 */
  77. ret $31,($26),1 /* .. E1 */
  78. .align 3
  79. within_one_quad:
  80. ldq_u $1,0($16) /* E0 */
  81. insql $17,$16,$2 /* E1 */
  82. mskql $1,$16,$4 /* E0 (after load stall) */
  83. bis $2,$4,$2 /* E0 */
  84. mskql $2,$6,$4 /* E0 */
  85. mskqh $1,$6,$2 /* .. E1 */
  86. bis $2,$4,$1 /* E0 */
  87. stq_u $1,0($16) /* E0 */
  88. end:
  89. ret $31,($26),1 /* E1 */
  90. .end __memset
  91. .align 5
  92. .ent __memsetw
  93. __memsetw:
  94. .prologue 0
  95. inswl $17,0,$1 /* E0 */
  96. inswl $17,2,$2 /* E0 */
  97. inswl $17,4,$3 /* E0 */
  98. or $1,$2,$1 /* .. E1 */
  99. inswl $17,6,$4 /* E0 */
  100. or $1,$3,$1 /* .. E1 */
  101. or $1,$4,$17 /* E0 */
  102. br __constant_c_memset /* .. E1 */
  103. .end __memsetw
  104. #ifdef __ELF__
  105.  .weak memset; memset = __memset
  106. #else
  107.  .weakext memset, __memset
  108. #endif