csum_ipv6_magic.S 2.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115
  1. /*
  2. * arch/alpha/lib/csum_ipv6_magic.S
  3. * Contributed by Richard Henderson <rth@tamu.edu>
  4. *
  5. * unsigned short csum_ipv6_magic(struct in6_addr *saddr,
  6. * struct in6_addr *daddr,
  7. * __u32 len,
  8. * unsigned short proto,
  9. * unsigned int csum);
  10. *
  11. * Misalignment handling (which costs 16 instructions / 8 cycles)
  12. * added by Ivan Kokshaysky <ink@jurassic.park.msu.ru>
  13. */
  14. .globl csum_ipv6_magic
  15. .align 4
  16. .ent csum_ipv6_magic
  17. .frame $30,0,$26,0
  18. csum_ipv6_magic:
  19. .prologue 0
  20. ldq_u $0,0($16) # e0 : load src & dst addr words
  21. zapnot $20,15,$20 # .. e1 : zero extend incoming csum
  22. extqh $18,1,$4 # e0 : byte swap len & proto while we wait
  23. ldq_u $21,7($16) # .. e1 : handle misalignment
  24. extbl $18,1,$5 # e0 :
  25. ldq_u $1,8($16) # .. e1 :
  26. extbl $18,2,$6 # e0 :
  27. ldq_u $22,15($16) # .. e1 :
  28. extbl $18,3,$18 # e0 :
  29. ldq_u $2,0($17) # .. e1 :
  30. sra $4,32,$4 # e0 :
  31. ldq_u $23,7($17) # .. e1 :
  32. extql $0,$16,$0 # e0 :
  33. ldq_u $3,8($17) # .. e1 :
  34. extqh $21,$16,$21 # e0 :
  35. ldq_u $24,15($17) # .. e1 :
  36. sll $5,16,$5 # e0 :
  37. or $0,$21,$0 # .. e1 : 1st src word complete
  38. extql $1,$16,$1 # e0 :
  39. addq $20,$0,$20 # .. e1 : begin summing the words
  40. extqh $22,$16,$22 # e0 :
  41. cmpult $20,$0,$0 # .. e1 :
  42. sll $6,8,$6 # e0 :
  43. or $1,$22,$1 # .. e1 : 2nd src word complete
  44. extql $2,$17,$2 # e0 :
  45. or $4,$18,$18 # .. e1 :
  46. extqh $23,$17,$23 # e0 :
  47. or $5,$6,$5 # .. e1 :
  48. extql $3,$17,$3 # e0 :
  49. or $2,$23,$2 # .. e1 : 1st dst word complete
  50. extqh $24,$17,$24 # e0 :
  51. or $18,$5,$18 # .. e1 : len complete
  52. extwh $19,7,$7 # e0 :
  53. or $3,$24,$3 # .. e1 : 2nd dst word complete
  54. extbl $19,1,$19 # e0 :
  55. addq $20,$1,$20 # .. e1 :
  56. or $19,$7,$19 # e0 :
  57. cmpult $20,$1,$1 # .. e1 :
  58. sll $19,48,$19 # e0 :
  59. nop # .. e0 :
  60. sra $19,32,$19 # e0 : proto complete
  61. addq $20,$2,$20 # .. e1 :
  62. cmpult $20,$2,$2 # e0 :
  63. addq $20,$3,$20 # .. e1 :
  64. cmpult $20,$3,$3 # e0 :
  65. addq $20,$18,$20 # .. e1 :
  66. cmpult $20,$18,$18 # e0 :
  67. addq $20,$19,$20 # .. e1 :
  68. cmpult $20,$19,$19 # e0 :
  69. addq $0,$1,$0 # .. e1 : merge the carries back into the csum
  70. addq $2,$3,$2 # e0 :
  71. addq $18,$19,$18 # .. e1 :
  72. addq $0,$2,$0 # e0 :
  73. addq $20,$18,$20 # .. e1 :
  74. addq $0,$20,$0 # e0 :
  75. unop # :
  76. extwl $0,2,$2 # e0 : begin folding the 64-bit value
  77. zapnot $0,3,$3 # .. e1 :
  78. extwl $0,4,$1 # e0 :
  79. addq $2,$3,$3 # .. e1 :
  80. extwl $0,6,$0 # e0 :
  81. addq $3,$1,$3 # .. e1 :
  82. addq $0,$3,$0 # e0 :
  83. unop # :
  84. extwl $0,2,$1 # e0 : fold 18-bit value
  85. zapnot $0,3,$0 # .. e1 :
  86. addq $0,$1,$0 # e0 :
  87. unop # :
  88. extwl $0,2,$1 # e0 : fold 17-bit value
  89. zapnot $0,3,$0 # .. e1 :
  90. addq $0,$1,$0 # e0 :
  91. not $0,$0 # .. e1 : and complement.
  92. zapnot $0,3,$0 # e0 :
  93. ret # .. e1 :
  94. .end csum_ipv6_magic