jquanti-avx2.asm 5.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162
  1. ;
  2. ; jquanti.asm - sample data conversion and quantization (64-bit AVX2)
  3. ;
  4. ; Copyright 2009 Pierre Ossman <ossman@cendio.se> for Cendio AB
  5. ; Copyright (C) 2009, 2016, 2018, D. R. Commander.
  6. ; Copyright (C) 2016, Matthieu Darbois.
  7. ;
  8. ; Based on the x86 SIMD extension for IJG JPEG library
  9. ; Copyright (C) 1999-2006, MIYASAKA Masaru.
  10. ; For conditions of distribution and use, see copyright notice in jsimdext.inc
  11. ;
  12. ; This file should be assembled with NASM (Netwide Assembler),
  13. ; can *not* be assembled with Microsoft's MASM or any compatible
  14. ; assembler (including Borland's Turbo Assembler).
  15. ; NASM is available from http://nasm.sourceforge.net/ or
  16. ; http://sourceforge.net/project/showfiles.php?group_id=6208
  17. %include "jsimdext.inc"
  18. %include "jdct.inc"
  19. ; --------------------------------------------------------------------------
  20. SECTION SEG_TEXT
  21. BITS 64
  22. ;
  23. ; Load data into workspace, applying unsigned->signed conversion
  24. ;
  25. ; GLOBAL(void)
  26. ; jsimd_convsamp_avx2(JSAMPARRAY sample_data, JDIMENSION start_col,
  27. ; DCTELEM *workspace);
  28. ;
  29. ; r10 = JSAMPARRAY sample_data
  30. ; r11d = JDIMENSION start_col
  31. ; r12 = DCTELEM *workspace
  32. align 32
  33. GLOBAL_FUNCTION(jsimd_convsamp_avx2)
  34. EXTN(jsimd_convsamp_avx2):
  35. push rbp
  36. mov rax, rsp
  37. mov rbp, rsp
  38. collect_args 3
  39. mov eax, r11d
  40. mov rsi, JSAMPROW [r10+0*SIZEOF_JSAMPROW] ; (JSAMPLE *)
  41. mov rdi, JSAMPROW [r10+1*SIZEOF_JSAMPROW] ; (JSAMPLE *)
  42. movq xmm0, XMM_MMWORD [rsi+rax*SIZEOF_JSAMPLE]
  43. pinsrq xmm0, XMM_MMWORD [rdi+rax*SIZEOF_JSAMPLE], 1
  44. mov rsi, JSAMPROW [r10+2*SIZEOF_JSAMPROW] ; (JSAMPLE *)
  45. mov rdi, JSAMPROW [r10+3*SIZEOF_JSAMPROW] ; (JSAMPLE *)
  46. movq xmm1, XMM_MMWORD [rsi+rax*SIZEOF_JSAMPLE]
  47. pinsrq xmm1, XMM_MMWORD [rdi+rax*SIZEOF_JSAMPLE], 1
  48. mov rsi, JSAMPROW [r10+4*SIZEOF_JSAMPROW] ; (JSAMPLE *)
  49. mov rdi, JSAMPROW [r10+5*SIZEOF_JSAMPROW] ; (JSAMPLE *)
  50. movq xmm2, XMM_MMWORD [rsi+rax*SIZEOF_JSAMPLE]
  51. pinsrq xmm2, XMM_MMWORD [rdi+rax*SIZEOF_JSAMPLE], 1
  52. mov rsi, JSAMPROW [r10+6*SIZEOF_JSAMPROW] ; (JSAMPLE *)
  53. mov rdi, JSAMPROW [r10+7*SIZEOF_JSAMPROW] ; (JSAMPLE *)
  54. movq xmm3, XMM_MMWORD [rsi+rax*SIZEOF_JSAMPLE]
  55. pinsrq xmm3, XMM_MMWORD [rdi+rax*SIZEOF_JSAMPLE], 1
  56. vpmovzxbw ymm0, xmm0 ; ymm0=(00 01 02 03 04 05 06 07 10 11 12 13 14 15 16 17)
  57. vpmovzxbw ymm1, xmm1 ; ymm1=(20 21 22 23 24 25 26 27 30 31 32 33 34 35 36 37)
  58. vpmovzxbw ymm2, xmm2 ; ymm2=(40 41 42 43 44 45 46 47 50 51 52 53 54 55 56 57)
  59. vpmovzxbw ymm3, xmm3 ; ymm3=(60 61 62 63 64 65 66 67 70 71 72 73 74 75 76 77)
  60. vpcmpeqw ymm7, ymm7, ymm7
  61. vpsllw ymm7, ymm7, 7 ; ymm7={0xFF80 0xFF80 0xFF80 0xFF80 ..}
  62. vpaddw ymm0, ymm0, ymm7
  63. vpaddw ymm1, ymm1, ymm7
  64. vpaddw ymm2, ymm2, ymm7
  65. vpaddw ymm3, ymm3, ymm7
  66. vmovdqu YMMWORD [YMMBLOCK(0,0,r12,SIZEOF_DCTELEM)], ymm0
  67. vmovdqu YMMWORD [YMMBLOCK(2,0,r12,SIZEOF_DCTELEM)], ymm1
  68. vmovdqu YMMWORD [YMMBLOCK(4,0,r12,SIZEOF_DCTELEM)], ymm2
  69. vmovdqu YMMWORD [YMMBLOCK(6,0,r12,SIZEOF_DCTELEM)], ymm3
  70. vzeroupper
  71. uncollect_args 3
  72. pop rbp
  73. ret
  74. ; --------------------------------------------------------------------------
  75. ;
  76. ; Quantize/descale the coefficients, and store into coef_block
  77. ;
  78. ; This implementation is based on an algorithm described in
  79. ; "How to optimize for the Pentium family of microprocessors"
  80. ; (http://www.agner.org/assem/).
  81. ;
  82. ; GLOBAL(void)
  83. ; jsimd_quantize_avx2(JCOEFPTR coef_block, DCTELEM *divisors,
  84. ; DCTELEM *workspace);
  85. ;
  86. %define RECIPROCAL(m, n, b) \
  87. YMMBLOCK(DCTSIZE * 0 + (m), (n), (b), SIZEOF_DCTELEM)
  88. %define CORRECTION(m, n, b) \
  89. YMMBLOCK(DCTSIZE * 1 + (m), (n), (b), SIZEOF_DCTELEM)
  90. %define SCALE(m, n, b) \
  91. YMMBLOCK(DCTSIZE * 2 + (m), (n), (b), SIZEOF_DCTELEM)
  92. ; r10 = JCOEFPTR coef_block
  93. ; r11 = DCTELEM *divisors
  94. ; r12 = DCTELEM *workspace
  95. align 32
  96. GLOBAL_FUNCTION(jsimd_quantize_avx2)
  97. EXTN(jsimd_quantize_avx2):
  98. push rbp
  99. mov rax, rsp
  100. mov rbp, rsp
  101. collect_args 3
  102. vmovdqu ymm4, [YMMBLOCK(0,0,r12,SIZEOF_DCTELEM)]
  103. vmovdqu ymm5, [YMMBLOCK(2,0,r12,SIZEOF_DCTELEM)]
  104. vmovdqu ymm6, [YMMBLOCK(4,0,r12,SIZEOF_DCTELEM)]
  105. vmovdqu ymm7, [YMMBLOCK(6,0,r12,SIZEOF_DCTELEM)]
  106. vpabsw ymm0, ymm4
  107. vpabsw ymm1, ymm5
  108. vpabsw ymm2, ymm6
  109. vpabsw ymm3, ymm7
  110. vpaddw ymm0, YMMWORD [CORRECTION(0,0,r11)] ; correction + roundfactor
  111. vpaddw ymm1, YMMWORD [CORRECTION(2,0,r11)]
  112. vpaddw ymm2, YMMWORD [CORRECTION(4,0,r11)]
  113. vpaddw ymm3, YMMWORD [CORRECTION(6,0,r11)]
  114. vpmulhuw ymm0, YMMWORD [RECIPROCAL(0,0,r11)] ; reciprocal
  115. vpmulhuw ymm1, YMMWORD [RECIPROCAL(2,0,r11)]
  116. vpmulhuw ymm2, YMMWORD [RECIPROCAL(4,0,r11)]
  117. vpmulhuw ymm3, YMMWORD [RECIPROCAL(6,0,r11)]
  118. vpmulhuw ymm0, YMMWORD [SCALE(0,0,r11)] ; scale
  119. vpmulhuw ymm1, YMMWORD [SCALE(2,0,r11)]
  120. vpmulhuw ymm2, YMMWORD [SCALE(4,0,r11)]
  121. vpmulhuw ymm3, YMMWORD [SCALE(6,0,r11)]
  122. vpsignw ymm0, ymm0, ymm4
  123. vpsignw ymm1, ymm1, ymm5
  124. vpsignw ymm2, ymm2, ymm6
  125. vpsignw ymm3, ymm3, ymm7
  126. vmovdqu [YMMBLOCK(0,0,r10,SIZEOF_DCTELEM)], ymm0
  127. vmovdqu [YMMBLOCK(2,0,r10,SIZEOF_DCTELEM)], ymm1
  128. vmovdqu [YMMBLOCK(4,0,r10,SIZEOF_DCTELEM)], ymm2
  129. vmovdqu [YMMBLOCK(6,0,r10,SIZEOF_DCTELEM)], ymm3
  130. vzeroupper
  131. uncollect_args 3
  132. pop rbp
  133. ret
  134. ; For some reason, the OS X linker does not honor the request to align the
  135. ; segment unless we do this.
  136. align 32