1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/media/libjpeg/simd/jfss2int.asm Wed Dec 31 06:09:35 2014 +0100
1.3 @@ -0,0 +1,634 @@
1.4 +;
1.5 +; jfss2int.asm - accurate integer FDCT (SSE2)
1.6 +;
1.7 +; Copyright 2009 Pierre Ossman <ossman@cendio.se> for Cendio AB
1.8 +;
1.9 +; Based on
1.10 +; x86 SIMD extension for IJG JPEG library
1.11 +; Copyright (C) 1999-2006, MIYASAKA Masaru.
1.12 +; For conditions of distribution and use, see copyright notice in jsimdext.inc
1.13 +;
1.14 +; This file should be assembled with NASM (Netwide Assembler),
1.15 +; can *not* be assembled with Microsoft's MASM or any compatible
1.16 +; assembler (including Borland's Turbo Assembler).
1.17 +; NASM is available from http://nasm.sourceforge.net/ or
1.18 +; http://sourceforge.net/project/showfiles.php?group_id=6208
1.19 +;
1.20 +; This file contains a slow-but-accurate integer implementation of the
1.21 +; forward DCT (Discrete Cosine Transform). The following code is based
1.22 +; directly on the IJG's original jfdctint.c; see the jfdctint.c for
1.23 +; more details.
1.24 +;
1.25 +; [TAB8]
1.26 +
1.27 +%include "jsimdext.inc"
1.28 +%include "jdct.inc"
1.29 +
1.30 +; --------------------------------------------------------------------------
1.31 +
1.32 +%define CONST_BITS 13
1.33 +%define PASS1_BITS 2
1.34 +
1.35 +%define DESCALE_P1 (CONST_BITS-PASS1_BITS)
1.36 +%define DESCALE_P2 (CONST_BITS+PASS1_BITS)
1.37 +
1.38 +%if CONST_BITS == 13
1.39 +F_0_298 equ 2446 ; FIX(0.298631336)
1.40 +F_0_390 equ 3196 ; FIX(0.390180644)
1.41 +F_0_541 equ 4433 ; FIX(0.541196100)
1.42 +F_0_765 equ 6270 ; FIX(0.765366865)
1.43 +F_0_899 equ 7373 ; FIX(0.899976223)
1.44 +F_1_175 equ 9633 ; FIX(1.175875602)
1.45 +F_1_501 equ 12299 ; FIX(1.501321110)
1.46 +F_1_847 equ 15137 ; FIX(1.847759065)
1.47 +F_1_961 equ 16069 ; FIX(1.961570560)
1.48 +F_2_053 equ 16819 ; FIX(2.053119869)
1.49 +F_2_562 equ 20995 ; FIX(2.562915447)
1.50 +F_3_072 equ 25172 ; FIX(3.072711026)
1.51 +%else
1.52 +; NASM cannot do compile-time arithmetic on floating-point constants.
1.53 +%define DESCALE(x,n) (((x)+(1<<((n)-1)))>>(n))
1.54 +F_0_298 equ DESCALE( 320652955,30-CONST_BITS) ; FIX(0.298631336)
1.55 +F_0_390 equ DESCALE( 418953276,30-CONST_BITS) ; FIX(0.390180644)
1.56 +F_0_541 equ DESCALE( 581104887,30-CONST_BITS) ; FIX(0.541196100)
1.57 +F_0_765 equ DESCALE( 821806413,30-CONST_BITS) ; FIX(0.765366865)
1.58 +F_0_899 equ DESCALE( 966342111,30-CONST_BITS) ; FIX(0.899976223)
1.59 +F_1_175 equ DESCALE(1262586813,30-CONST_BITS) ; FIX(1.175875602)
1.60 +F_1_501 equ DESCALE(1612031267,30-CONST_BITS) ; FIX(1.501321110)
1.61 +F_1_847 equ DESCALE(1984016188,30-CONST_BITS) ; FIX(1.847759065)
1.62 +F_1_961 equ DESCALE(2106220350,30-CONST_BITS) ; FIX(1.961570560)
1.63 +F_2_053 equ DESCALE(2204520673,30-CONST_BITS) ; FIX(2.053119869)
1.64 +F_2_562 equ DESCALE(2751909506,30-CONST_BITS) ; FIX(2.562915447)
1.65 +F_3_072 equ DESCALE(3299298341,30-CONST_BITS) ; FIX(3.072711026)
1.66 +%endif
1.67 +
1.68 +; --------------------------------------------------------------------------
1.69 + SECTION SEG_CONST
1.70 +
1.71 + alignz 16
1.72 + global EXTN(jconst_fdct_islow_sse2)
1.73 +
1.74 +EXTN(jconst_fdct_islow_sse2):
1.75 +
1.76 +PW_F130_F054 times 4 dw (F_0_541+F_0_765), F_0_541
1.77 +PW_F054_MF130 times 4 dw F_0_541, (F_0_541-F_1_847)
1.78 +PW_MF078_F117 times 4 dw (F_1_175-F_1_961), F_1_175
1.79 +PW_F117_F078 times 4 dw F_1_175, (F_1_175-F_0_390)
1.80 +PW_MF060_MF089 times 4 dw (F_0_298-F_0_899),-F_0_899
1.81 +PW_MF089_F060 times 4 dw -F_0_899, (F_1_501-F_0_899)
1.82 +PW_MF050_MF256 times 4 dw (F_2_053-F_2_562),-F_2_562
1.83 +PW_MF256_F050 times 4 dw -F_2_562, (F_3_072-F_2_562)
1.84 +PD_DESCALE_P1 times 4 dd 1 << (DESCALE_P1-1)
1.85 +PD_DESCALE_P2 times 4 dd 1 << (DESCALE_P2-1)
1.86 +PW_DESCALE_P2X times 8 dw 1 << (PASS1_BITS-1)
1.87 +
1.88 + alignz 16
1.89 +
1.90 +; --------------------------------------------------------------------------
1.91 + SECTION SEG_TEXT
1.92 + BITS 32
1.93 +;
1.94 +; Perform the forward DCT on one block of samples.
1.95 +;
1.96 +; GLOBAL(void)
1.97 +; jsimd_fdct_islow_sse2 (DCTELEM * data)
1.98 +;
1.99 +
1.100 +%define data(b) (b)+8 ; DCTELEM * data
1.101 +
1.102 +%define original_ebp ebp+0
1.103 +%define wk(i) ebp-(WK_NUM-(i))*SIZEOF_XMMWORD ; xmmword wk[WK_NUM]
1.104 +%define WK_NUM 6
1.105 +
1.106 + align 16
1.107 + global EXTN(jsimd_fdct_islow_sse2)
1.108 +
1.109 +EXTN(jsimd_fdct_islow_sse2):
1.110 + push ebp
1.111 + mov eax,esp ; eax = original ebp
1.112 + sub esp, byte 4
1.113 + and esp, byte (-SIZEOF_XMMWORD) ; align to 128 bits
1.114 + mov [esp],eax
1.115 + mov ebp,esp ; ebp = aligned ebp
1.116 + lea esp, [wk(0)]
1.117 + pushpic ebx
1.118 +; push ecx ; unused
1.119 +; push edx ; need not be preserved
1.120 +; push esi ; unused
1.121 +; push edi ; unused
1.122 +
1.123 + get_GOT ebx ; get GOT address
1.124 +
1.125 + ; ---- Pass 1: process rows.
1.126 +
1.127 + mov edx, POINTER [data(eax)] ; (DCTELEM *)
1.128 +
1.129 + movdqa xmm0, XMMWORD [XMMBLOCK(0,0,edx,SIZEOF_DCTELEM)]
1.130 + movdqa xmm1, XMMWORD [XMMBLOCK(1,0,edx,SIZEOF_DCTELEM)]
1.131 + movdqa xmm2, XMMWORD [XMMBLOCK(2,0,edx,SIZEOF_DCTELEM)]
1.132 + movdqa xmm3, XMMWORD [XMMBLOCK(3,0,edx,SIZEOF_DCTELEM)]
1.133 +
1.134 + ; xmm0=(00 01 02 03 04 05 06 07), xmm2=(20 21 22 23 24 25 26 27)
1.135 + ; xmm1=(10 11 12 13 14 15 16 17), xmm3=(30 31 32 33 34 35 36 37)
1.136 +
1.137 + movdqa xmm4,xmm0 ; transpose coefficients(phase 1)
1.138 + punpcklwd xmm0,xmm1 ; xmm0=(00 10 01 11 02 12 03 13)
1.139 + punpckhwd xmm4,xmm1 ; xmm4=(04 14 05 15 06 16 07 17)
1.140 + movdqa xmm5,xmm2 ; transpose coefficients(phase 1)
1.141 + punpcklwd xmm2,xmm3 ; xmm2=(20 30 21 31 22 32 23 33)
1.142 + punpckhwd xmm5,xmm3 ; xmm5=(24 34 25 35 26 36 27 37)
1.143 +
1.144 + movdqa xmm6, XMMWORD [XMMBLOCK(4,0,edx,SIZEOF_DCTELEM)]
1.145 + movdqa xmm7, XMMWORD [XMMBLOCK(5,0,edx,SIZEOF_DCTELEM)]
1.146 + movdqa xmm1, XMMWORD [XMMBLOCK(6,0,edx,SIZEOF_DCTELEM)]
1.147 + movdqa xmm3, XMMWORD [XMMBLOCK(7,0,edx,SIZEOF_DCTELEM)]
1.148 +
1.149 + ; xmm6=( 4 12 20 28 36 44 52 60), xmm1=( 6 14 22 30 38 46 54 62)
1.150 + ; xmm7=( 5 13 21 29 37 45 53 61), xmm3=( 7 15 23 31 39 47 55 63)
1.151 +
1.152 + movdqa XMMWORD [wk(0)], xmm2 ; wk(0)=(20 30 21 31 22 32 23 33)
1.153 + movdqa XMMWORD [wk(1)], xmm5 ; wk(1)=(24 34 25 35 26 36 27 37)
1.154 +
1.155 + movdqa xmm2,xmm6 ; transpose coefficients(phase 1)
1.156 + punpcklwd xmm6,xmm7 ; xmm6=(40 50 41 51 42 52 43 53)
1.157 + punpckhwd xmm2,xmm7 ; xmm2=(44 54 45 55 46 56 47 57)
1.158 + movdqa xmm5,xmm1 ; transpose coefficients(phase 1)
1.159 + punpcklwd xmm1,xmm3 ; xmm1=(60 70 61 71 62 72 63 73)
1.160 + punpckhwd xmm5,xmm3 ; xmm5=(64 74 65 75 66 76 67 77)
1.161 +
1.162 + movdqa xmm7,xmm6 ; transpose coefficients(phase 2)
1.163 + punpckldq xmm6,xmm1 ; xmm6=(40 50 60 70 41 51 61 71)
1.164 + punpckhdq xmm7,xmm1 ; xmm7=(42 52 62 72 43 53 63 73)
1.165 + movdqa xmm3,xmm2 ; transpose coefficients(phase 2)
1.166 + punpckldq xmm2,xmm5 ; xmm2=(44 54 64 74 45 55 65 75)
1.167 + punpckhdq xmm3,xmm5 ; xmm3=(46 56 66 76 47 57 67 77)
1.168 +
1.169 + movdqa xmm1, XMMWORD [wk(0)] ; xmm1=(20 30 21 31 22 32 23 33)
1.170 + movdqa xmm5, XMMWORD [wk(1)] ; xmm5=(24 34 25 35 26 36 27 37)
1.171 + movdqa XMMWORD [wk(2)], xmm7 ; wk(2)=(42 52 62 72 43 53 63 73)
1.172 + movdqa XMMWORD [wk(3)], xmm2 ; wk(3)=(44 54 64 74 45 55 65 75)
1.173 +
1.174 + movdqa xmm7,xmm0 ; transpose coefficients(phase 2)
1.175 + punpckldq xmm0,xmm1 ; xmm0=(00 10 20 30 01 11 21 31)
1.176 + punpckhdq xmm7,xmm1 ; xmm7=(02 12 22 32 03 13 23 33)
1.177 + movdqa xmm2,xmm4 ; transpose coefficients(phase 2)
1.178 + punpckldq xmm4,xmm5 ; xmm4=(04 14 24 34 05 15 25 35)
1.179 + punpckhdq xmm2,xmm5 ; xmm2=(06 16 26 36 07 17 27 37)
1.180 +
1.181 + movdqa xmm1,xmm0 ; transpose coefficients(phase 3)
1.182 + punpcklqdq xmm0,xmm6 ; xmm0=(00 10 20 30 40 50 60 70)=data0
1.183 + punpckhqdq xmm1,xmm6 ; xmm1=(01 11 21 31 41 51 61 71)=data1
1.184 + movdqa xmm5,xmm2 ; transpose coefficients(phase 3)
1.185 + punpcklqdq xmm2,xmm3 ; xmm2=(06 16 26 36 46 56 66 76)=data6
1.186 + punpckhqdq xmm5,xmm3 ; xmm5=(07 17 27 37 47 57 67 77)=data7
1.187 +
1.188 + movdqa xmm6,xmm1
1.189 + movdqa xmm3,xmm0
1.190 + psubw xmm1,xmm2 ; xmm1=data1-data6=tmp6
1.191 + psubw xmm0,xmm5 ; xmm0=data0-data7=tmp7
1.192 + paddw xmm6,xmm2 ; xmm6=data1+data6=tmp1
1.193 + paddw xmm3,xmm5 ; xmm3=data0+data7=tmp0
1.194 +
1.195 + movdqa xmm2, XMMWORD [wk(2)] ; xmm2=(42 52 62 72 43 53 63 73)
1.196 + movdqa xmm5, XMMWORD [wk(3)] ; xmm5=(44 54 64 74 45 55 65 75)
1.197 + movdqa XMMWORD [wk(0)], xmm1 ; wk(0)=tmp6
1.198 + movdqa XMMWORD [wk(1)], xmm0 ; wk(1)=tmp7
1.199 +
1.200 + movdqa xmm1,xmm7 ; transpose coefficients(phase 3)
1.201 + punpcklqdq xmm7,xmm2 ; xmm7=(02 12 22 32 42 52 62 72)=data2
1.202 + punpckhqdq xmm1,xmm2 ; xmm1=(03 13 23 33 43 53 63 73)=data3
1.203 + movdqa xmm0,xmm4 ; transpose coefficients(phase 3)
1.204 + punpcklqdq xmm4,xmm5 ; xmm4=(04 14 24 34 44 54 64 74)=data4
1.205 + punpckhqdq xmm0,xmm5 ; xmm0=(05 15 25 35 45 55 65 75)=data5
1.206 +
1.207 + movdqa xmm2,xmm1
1.208 + movdqa xmm5,xmm7
1.209 + paddw xmm1,xmm4 ; xmm1=data3+data4=tmp3
1.210 + paddw xmm7,xmm0 ; xmm7=data2+data5=tmp2
1.211 + psubw xmm2,xmm4 ; xmm2=data3-data4=tmp4
1.212 + psubw xmm5,xmm0 ; xmm5=data2-data5=tmp5
1.213 +
1.214 + ; -- Even part
1.215 +
1.216 + movdqa xmm4,xmm3
1.217 + movdqa xmm0,xmm6
1.218 + paddw xmm3,xmm1 ; xmm3=tmp10
1.219 + paddw xmm6,xmm7 ; xmm6=tmp11
1.220 + psubw xmm4,xmm1 ; xmm4=tmp13
1.221 + psubw xmm0,xmm7 ; xmm0=tmp12
1.222 +
1.223 + movdqa xmm1,xmm3
1.224 + paddw xmm3,xmm6 ; xmm3=tmp10+tmp11
1.225 + psubw xmm1,xmm6 ; xmm1=tmp10-tmp11
1.226 +
1.227 + psllw xmm3,PASS1_BITS ; xmm3=data0
1.228 + psllw xmm1,PASS1_BITS ; xmm1=data4
1.229 +
1.230 + movdqa XMMWORD [wk(2)], xmm3 ; wk(2)=data0
1.231 + movdqa XMMWORD [wk(3)], xmm1 ; wk(3)=data4
1.232 +
1.233 + ; (Original)
1.234 + ; z1 = (tmp12 + tmp13) * 0.541196100;
1.235 + ; data2 = z1 + tmp13 * 0.765366865;
1.236 + ; data6 = z1 + tmp12 * -1.847759065;
1.237 + ;
1.238 + ; (This implementation)
1.239 + ; data2 = tmp13 * (0.541196100 + 0.765366865) + tmp12 * 0.541196100;
1.240 + ; data6 = tmp13 * 0.541196100 + tmp12 * (0.541196100 - 1.847759065);
1.241 +
1.242 + movdqa xmm7,xmm4 ; xmm4=tmp13
1.243 + movdqa xmm6,xmm4
1.244 + punpcklwd xmm7,xmm0 ; xmm0=tmp12
1.245 + punpckhwd xmm6,xmm0
1.246 + movdqa xmm4,xmm7
1.247 + movdqa xmm0,xmm6
1.248 + pmaddwd xmm7,[GOTOFF(ebx,PW_F130_F054)] ; xmm7=data2L
1.249 + pmaddwd xmm6,[GOTOFF(ebx,PW_F130_F054)] ; xmm6=data2H
1.250 + pmaddwd xmm4,[GOTOFF(ebx,PW_F054_MF130)] ; xmm4=data6L
1.251 + pmaddwd xmm0,[GOTOFF(ebx,PW_F054_MF130)] ; xmm0=data6H
1.252 +
1.253 + paddd xmm7,[GOTOFF(ebx,PD_DESCALE_P1)]
1.254 + paddd xmm6,[GOTOFF(ebx,PD_DESCALE_P1)]
1.255 + psrad xmm7,DESCALE_P1
1.256 + psrad xmm6,DESCALE_P1
1.257 + paddd xmm4,[GOTOFF(ebx,PD_DESCALE_P1)]
1.258 + paddd xmm0,[GOTOFF(ebx,PD_DESCALE_P1)]
1.259 + psrad xmm4,DESCALE_P1
1.260 + psrad xmm0,DESCALE_P1
1.261 +
1.262 + packssdw xmm7,xmm6 ; xmm7=data2
1.263 + packssdw xmm4,xmm0 ; xmm4=data6
1.264 +
1.265 + movdqa XMMWORD [wk(4)], xmm7 ; wk(4)=data2
1.266 + movdqa XMMWORD [wk(5)], xmm4 ; wk(5)=data6
1.267 +
1.268 + ; -- Odd part
1.269 +
1.270 + movdqa xmm3, XMMWORD [wk(0)] ; xmm3=tmp6
1.271 + movdqa xmm1, XMMWORD [wk(1)] ; xmm1=tmp7
1.272 +
1.273 + movdqa xmm6,xmm2 ; xmm2=tmp4
1.274 + movdqa xmm0,xmm5 ; xmm5=tmp5
1.275 + paddw xmm6,xmm3 ; xmm6=z3
1.276 + paddw xmm0,xmm1 ; xmm0=z4
1.277 +
1.278 + ; (Original)
1.279 + ; z5 = (z3 + z4) * 1.175875602;
1.280 + ; z3 = z3 * -1.961570560; z4 = z4 * -0.390180644;
1.281 + ; z3 += z5; z4 += z5;
1.282 + ;
1.283 + ; (This implementation)
1.284 + ; z3 = z3 * (1.175875602 - 1.961570560) + z4 * 1.175875602;
1.285 + ; z4 = z3 * 1.175875602 + z4 * (1.175875602 - 0.390180644);
1.286 +
1.287 + movdqa xmm7,xmm6
1.288 + movdqa xmm4,xmm6
1.289 + punpcklwd xmm7,xmm0
1.290 + punpckhwd xmm4,xmm0
1.291 + movdqa xmm6,xmm7
1.292 + movdqa xmm0,xmm4
1.293 + pmaddwd xmm7,[GOTOFF(ebx,PW_MF078_F117)] ; xmm7=z3L
1.294 + pmaddwd xmm4,[GOTOFF(ebx,PW_MF078_F117)] ; xmm4=z3H
1.295 + pmaddwd xmm6,[GOTOFF(ebx,PW_F117_F078)] ; xmm6=z4L
1.296 + pmaddwd xmm0,[GOTOFF(ebx,PW_F117_F078)] ; xmm0=z4H
1.297 +
1.298 + movdqa XMMWORD [wk(0)], xmm7 ; wk(0)=z3L
1.299 + movdqa XMMWORD [wk(1)], xmm4 ; wk(1)=z3H
1.300 +
1.301 + ; (Original)
1.302 + ; z1 = tmp4 + tmp7; z2 = tmp5 + tmp6;
1.303 + ; tmp4 = tmp4 * 0.298631336; tmp5 = tmp5 * 2.053119869;
1.304 + ; tmp6 = tmp6 * 3.072711026; tmp7 = tmp7 * 1.501321110;
1.305 + ; z1 = z1 * -0.899976223; z2 = z2 * -2.562915447;
1.306 + ; data7 = tmp4 + z1 + z3; data5 = tmp5 + z2 + z4;
1.307 + ; data3 = tmp6 + z2 + z3; data1 = tmp7 + z1 + z4;
1.308 + ;
1.309 + ; (This implementation)
1.310 + ; tmp4 = tmp4 * (0.298631336 - 0.899976223) + tmp7 * -0.899976223;
1.311 + ; tmp5 = tmp5 * (2.053119869 - 2.562915447) + tmp6 * -2.562915447;
1.312 + ; tmp6 = tmp5 * -2.562915447 + tmp6 * (3.072711026 - 2.562915447);
1.313 + ; tmp7 = tmp4 * -0.899976223 + tmp7 * (1.501321110 - 0.899976223);
1.314 + ; data7 = tmp4 + z3; data5 = tmp5 + z4;
1.315 + ; data3 = tmp6 + z3; data1 = tmp7 + z4;
1.316 +
1.317 + movdqa xmm7,xmm2
1.318 + movdqa xmm4,xmm2
1.319 + punpcklwd xmm7,xmm1
1.320 + punpckhwd xmm4,xmm1
1.321 + movdqa xmm2,xmm7
1.322 + movdqa xmm1,xmm4
1.323 + pmaddwd xmm7,[GOTOFF(ebx,PW_MF060_MF089)] ; xmm7=tmp4L
1.324 + pmaddwd xmm4,[GOTOFF(ebx,PW_MF060_MF089)] ; xmm4=tmp4H
1.325 + pmaddwd xmm2,[GOTOFF(ebx,PW_MF089_F060)] ; xmm2=tmp7L
1.326 + pmaddwd xmm1,[GOTOFF(ebx,PW_MF089_F060)] ; xmm1=tmp7H
1.327 +
1.328 + paddd xmm7, XMMWORD [wk(0)] ; xmm7=data7L
1.329 + paddd xmm4, XMMWORD [wk(1)] ; xmm4=data7H
1.330 + paddd xmm2,xmm6 ; xmm2=data1L
1.331 + paddd xmm1,xmm0 ; xmm1=data1H
1.332 +
1.333 + paddd xmm7,[GOTOFF(ebx,PD_DESCALE_P1)]
1.334 + paddd xmm4,[GOTOFF(ebx,PD_DESCALE_P1)]
1.335 + psrad xmm7,DESCALE_P1
1.336 + psrad xmm4,DESCALE_P1
1.337 + paddd xmm2,[GOTOFF(ebx,PD_DESCALE_P1)]
1.338 + paddd xmm1,[GOTOFF(ebx,PD_DESCALE_P1)]
1.339 + psrad xmm2,DESCALE_P1
1.340 + psrad xmm1,DESCALE_P1
1.341 +
1.342 + packssdw xmm7,xmm4 ; xmm7=data7
1.343 + packssdw xmm2,xmm1 ; xmm2=data1
1.344 +
1.345 + movdqa xmm4,xmm5
1.346 + movdqa xmm1,xmm5
1.347 + punpcklwd xmm4,xmm3
1.348 + punpckhwd xmm1,xmm3
1.349 + movdqa xmm5,xmm4
1.350 + movdqa xmm3,xmm1
1.351 + pmaddwd xmm4,[GOTOFF(ebx,PW_MF050_MF256)] ; xmm4=tmp5L
1.352 + pmaddwd xmm1,[GOTOFF(ebx,PW_MF050_MF256)] ; xmm1=tmp5H
1.353 + pmaddwd xmm5,[GOTOFF(ebx,PW_MF256_F050)] ; xmm5=tmp6L
1.354 + pmaddwd xmm3,[GOTOFF(ebx,PW_MF256_F050)] ; xmm3=tmp6H
1.355 +
1.356 + paddd xmm4,xmm6 ; xmm4=data5L
1.357 + paddd xmm1,xmm0 ; xmm1=data5H
1.358 + paddd xmm5, XMMWORD [wk(0)] ; xmm5=data3L
1.359 + paddd xmm3, XMMWORD [wk(1)] ; xmm3=data3H
1.360 +
1.361 + paddd xmm4,[GOTOFF(ebx,PD_DESCALE_P1)]
1.362 + paddd xmm1,[GOTOFF(ebx,PD_DESCALE_P1)]
1.363 + psrad xmm4,DESCALE_P1
1.364 + psrad xmm1,DESCALE_P1
1.365 + paddd xmm5,[GOTOFF(ebx,PD_DESCALE_P1)]
1.366 + paddd xmm3,[GOTOFF(ebx,PD_DESCALE_P1)]
1.367 + psrad xmm5,DESCALE_P1
1.368 + psrad xmm3,DESCALE_P1
1.369 +
1.370 + packssdw xmm4,xmm1 ; xmm4=data5
1.371 + packssdw xmm5,xmm3 ; xmm5=data3
1.372 +
1.373 + ; ---- Pass 2: process columns.
1.374 +
1.375 +; mov edx, POINTER [data(eax)] ; (DCTELEM *)
1.376 +
1.377 + movdqa xmm6, XMMWORD [wk(2)] ; xmm6=col0
1.378 + movdqa xmm0, XMMWORD [wk(4)] ; xmm0=col2
1.379 +
1.380 + ; xmm6=(00 10 20 30 40 50 60 70), xmm0=(02 12 22 32 42 52 62 72)
1.381 + ; xmm2=(01 11 21 31 41 51 61 71), xmm5=(03 13 23 33 43 53 63 73)
1.382 +
1.383 + movdqa xmm1,xmm6 ; transpose coefficients(phase 1)
1.384 + punpcklwd xmm6,xmm2 ; xmm6=(00 01 10 11 20 21 30 31)
1.385 + punpckhwd xmm1,xmm2 ; xmm1=(40 41 50 51 60 61 70 71)
1.386 + movdqa xmm3,xmm0 ; transpose coefficients(phase 1)
1.387 + punpcklwd xmm0,xmm5 ; xmm0=(02 03 12 13 22 23 32 33)
1.388 + punpckhwd xmm3,xmm5 ; xmm3=(42 43 52 53 62 63 72 73)
1.389 +
1.390 + movdqa xmm2, XMMWORD [wk(3)] ; xmm2=col4
1.391 + movdqa xmm5, XMMWORD [wk(5)] ; xmm5=col6
1.392 +
1.393 + ; xmm2=(04 14 24 34 44 54 64 74), xmm5=(06 16 26 36 46 56 66 76)
1.394 + ; xmm4=(05 15 25 35 45 55 65 75), xmm7=(07 17 27 37 47 57 67 77)
1.395 +
1.396 + movdqa XMMWORD [wk(0)], xmm0 ; wk(0)=(02 03 12 13 22 23 32 33)
1.397 + movdqa XMMWORD [wk(1)], xmm3 ; wk(1)=(42 43 52 53 62 63 72 73)
1.398 +
1.399 + movdqa xmm0,xmm2 ; transpose coefficients(phase 1)
1.400 + punpcklwd xmm2,xmm4 ; xmm2=(04 05 14 15 24 25 34 35)
1.401 + punpckhwd xmm0,xmm4 ; xmm0=(44 45 54 55 64 65 74 75)
1.402 + movdqa xmm3,xmm5 ; transpose coefficients(phase 1)
1.403 + punpcklwd xmm5,xmm7 ; xmm5=(06 07 16 17 26 27 36 37)
1.404 + punpckhwd xmm3,xmm7 ; xmm3=(46 47 56 57 66 67 76 77)
1.405 +
1.406 + movdqa xmm4,xmm2 ; transpose coefficients(phase 2)
1.407 + punpckldq xmm2,xmm5 ; xmm2=(04 05 06 07 14 15 16 17)
1.408 + punpckhdq xmm4,xmm5 ; xmm4=(24 25 26 27 34 35 36 37)
1.409 + movdqa xmm7,xmm0 ; transpose coefficients(phase 2)
1.410 + punpckldq xmm0,xmm3 ; xmm0=(44 45 46 47 54 55 56 57)
1.411 + punpckhdq xmm7,xmm3 ; xmm7=(64 65 66 67 74 75 76 77)
1.412 +
1.413 + movdqa xmm5, XMMWORD [wk(0)] ; xmm5=(02 03 12 13 22 23 32 33)
1.414 + movdqa xmm3, XMMWORD [wk(1)] ; xmm3=(42 43 52 53 62 63 72 73)
1.415 + movdqa XMMWORD [wk(2)], xmm4 ; wk(2)=(24 25 26 27 34 35 36 37)
1.416 + movdqa XMMWORD [wk(3)], xmm0 ; wk(3)=(44 45 46 47 54 55 56 57)
1.417 +
1.418 + movdqa xmm4,xmm6 ; transpose coefficients(phase 2)
1.419 + punpckldq xmm6,xmm5 ; xmm6=(00 01 02 03 10 11 12 13)
1.420 + punpckhdq xmm4,xmm5 ; xmm4=(20 21 22 23 30 31 32 33)
1.421 + movdqa xmm0,xmm1 ; transpose coefficients(phase 2)
1.422 + punpckldq xmm1,xmm3 ; xmm1=(40 41 42 43 50 51 52 53)
1.423 + punpckhdq xmm0,xmm3 ; xmm0=(60 61 62 63 70 71 72 73)
1.424 +
1.425 + movdqa xmm5,xmm6 ; transpose coefficients(phase 3)
1.426 + punpcklqdq xmm6,xmm2 ; xmm6=(00 01 02 03 04 05 06 07)=data0
1.427 + punpckhqdq xmm5,xmm2 ; xmm5=(10 11 12 13 14 15 16 17)=data1
1.428 + movdqa xmm3,xmm0 ; transpose coefficients(phase 3)
1.429 + punpcklqdq xmm0,xmm7 ; xmm0=(60 61 62 63 64 65 66 67)=data6
1.430 + punpckhqdq xmm3,xmm7 ; xmm3=(70 71 72 73 74 75 76 77)=data7
1.431 +
1.432 + movdqa xmm2,xmm5
1.433 + movdqa xmm7,xmm6
1.434 + psubw xmm5,xmm0 ; xmm5=data1-data6=tmp6
1.435 + psubw xmm6,xmm3 ; xmm6=data0-data7=tmp7
1.436 + paddw xmm2,xmm0 ; xmm2=data1+data6=tmp1
1.437 + paddw xmm7,xmm3 ; xmm7=data0+data7=tmp0
1.438 +
1.439 + movdqa xmm0, XMMWORD [wk(2)] ; xmm0=(24 25 26 27 34 35 36 37)
1.440 + movdqa xmm3, XMMWORD [wk(3)] ; xmm3=(44 45 46 47 54 55 56 57)
1.441 + movdqa XMMWORD [wk(0)], xmm5 ; wk(0)=tmp6
1.442 + movdqa XMMWORD [wk(1)], xmm6 ; wk(1)=tmp7
1.443 +
1.444 + movdqa xmm5,xmm4 ; transpose coefficients(phase 3)
1.445 + punpcklqdq xmm4,xmm0 ; xmm4=(20 21 22 23 24 25 26 27)=data2
1.446 + punpckhqdq xmm5,xmm0 ; xmm5=(30 31 32 33 34 35 36 37)=data3
1.447 + movdqa xmm6,xmm1 ; transpose coefficients(phase 3)
1.448 + punpcklqdq xmm1,xmm3 ; xmm1=(40 41 42 43 44 45 46 47)=data4
1.449 + punpckhqdq xmm6,xmm3 ; xmm6=(50 51 52 53 54 55 56 57)=data5
1.450 +
1.451 + movdqa xmm0,xmm5
1.452 + movdqa xmm3,xmm4
1.453 + paddw xmm5,xmm1 ; xmm5=data3+data4=tmp3
1.454 + paddw xmm4,xmm6 ; xmm4=data2+data5=tmp2
1.455 + psubw xmm0,xmm1 ; xmm0=data3-data4=tmp4
1.456 + psubw xmm3,xmm6 ; xmm3=data2-data5=tmp5
1.457 +
1.458 + ; -- Even part
1.459 +
1.460 + movdqa xmm1,xmm7
1.461 + movdqa xmm6,xmm2
1.462 + paddw xmm7,xmm5 ; xmm7=tmp10
1.463 + paddw xmm2,xmm4 ; xmm2=tmp11
1.464 + psubw xmm1,xmm5 ; xmm1=tmp13
1.465 + psubw xmm6,xmm4 ; xmm6=tmp12
1.466 +
1.467 + movdqa xmm5,xmm7
1.468 + paddw xmm7,xmm2 ; xmm7=tmp10+tmp11
1.469 + psubw xmm5,xmm2 ; xmm5=tmp10-tmp11
1.470 +
1.471 + paddw xmm7,[GOTOFF(ebx,PW_DESCALE_P2X)]
1.472 + paddw xmm5,[GOTOFF(ebx,PW_DESCALE_P2X)]
1.473 + psraw xmm7,PASS1_BITS ; xmm7=data0
1.474 + psraw xmm5,PASS1_BITS ; xmm5=data4
1.475 +
1.476 + movdqa XMMWORD [XMMBLOCK(0,0,edx,SIZEOF_DCTELEM)], xmm7
1.477 + movdqa XMMWORD [XMMBLOCK(4,0,edx,SIZEOF_DCTELEM)], xmm5
1.478 +
1.479 + ; (Original)
1.480 + ; z1 = (tmp12 + tmp13) * 0.541196100;
1.481 + ; data2 = z1 + tmp13 * 0.765366865;
1.482 + ; data6 = z1 + tmp12 * -1.847759065;
1.483 + ;
1.484 + ; (This implementation)
1.485 + ; data2 = tmp13 * (0.541196100 + 0.765366865) + tmp12 * 0.541196100;
1.486 + ; data6 = tmp13 * 0.541196100 + tmp12 * (0.541196100 - 1.847759065);
1.487 +
1.488 + movdqa xmm4,xmm1 ; xmm1=tmp13
1.489 + movdqa xmm2,xmm1
1.490 + punpcklwd xmm4,xmm6 ; xmm6=tmp12
1.491 + punpckhwd xmm2,xmm6
1.492 + movdqa xmm1,xmm4
1.493 + movdqa xmm6,xmm2
1.494 + pmaddwd xmm4,[GOTOFF(ebx,PW_F130_F054)] ; xmm4=data2L
1.495 + pmaddwd xmm2,[GOTOFF(ebx,PW_F130_F054)] ; xmm2=data2H
1.496 + pmaddwd xmm1,[GOTOFF(ebx,PW_F054_MF130)] ; xmm1=data6L
1.497 + pmaddwd xmm6,[GOTOFF(ebx,PW_F054_MF130)] ; xmm6=data6H
1.498 +
1.499 + paddd xmm4,[GOTOFF(ebx,PD_DESCALE_P2)]
1.500 + paddd xmm2,[GOTOFF(ebx,PD_DESCALE_P2)]
1.501 + psrad xmm4,DESCALE_P2
1.502 + psrad xmm2,DESCALE_P2
1.503 + paddd xmm1,[GOTOFF(ebx,PD_DESCALE_P2)]
1.504 + paddd xmm6,[GOTOFF(ebx,PD_DESCALE_P2)]
1.505 + psrad xmm1,DESCALE_P2
1.506 + psrad xmm6,DESCALE_P2
1.507 +
1.508 + packssdw xmm4,xmm2 ; xmm4=data2
1.509 + packssdw xmm1,xmm6 ; xmm1=data6
1.510 +
1.511 + movdqa XMMWORD [XMMBLOCK(2,0,edx,SIZEOF_DCTELEM)], xmm4
1.512 + movdqa XMMWORD [XMMBLOCK(6,0,edx,SIZEOF_DCTELEM)], xmm1
1.513 +
1.514 + ; -- Odd part
1.515 +
1.516 + movdqa xmm7, XMMWORD [wk(0)] ; xmm7=tmp6
1.517 + movdqa xmm5, XMMWORD [wk(1)] ; xmm5=tmp7
1.518 +
1.519 + movdqa xmm2,xmm0 ; xmm0=tmp4
1.520 + movdqa xmm6,xmm3 ; xmm3=tmp5
1.521 + paddw xmm2,xmm7 ; xmm2=z3
1.522 + paddw xmm6,xmm5 ; xmm6=z4
1.523 +
1.524 + ; (Original)
1.525 + ; z5 = (z3 + z4) * 1.175875602;
1.526 + ; z3 = z3 * -1.961570560; z4 = z4 * -0.390180644;
1.527 + ; z3 += z5; z4 += z5;
1.528 + ;
1.529 + ; (This implementation)
1.530 + ; z3 = z3 * (1.175875602 - 1.961570560) + z4 * 1.175875602;
1.531 + ; z4 = z3 * 1.175875602 + z4 * (1.175875602 - 0.390180644);
1.532 +
1.533 + movdqa xmm4,xmm2
1.534 + movdqa xmm1,xmm2
1.535 + punpcklwd xmm4,xmm6
1.536 + punpckhwd xmm1,xmm6
1.537 + movdqa xmm2,xmm4
1.538 + movdqa xmm6,xmm1
1.539 + pmaddwd xmm4,[GOTOFF(ebx,PW_MF078_F117)] ; xmm4=z3L
1.540 + pmaddwd xmm1,[GOTOFF(ebx,PW_MF078_F117)] ; xmm1=z3H
1.541 + pmaddwd xmm2,[GOTOFF(ebx,PW_F117_F078)] ; xmm2=z4L
1.542 + pmaddwd xmm6,[GOTOFF(ebx,PW_F117_F078)] ; xmm6=z4H
1.543 +
1.544 + movdqa XMMWORD [wk(0)], xmm4 ; wk(0)=z3L
1.545 + movdqa XMMWORD [wk(1)], xmm1 ; wk(1)=z3H
1.546 +
1.547 + ; (Original)
1.548 + ; z1 = tmp4 + tmp7; z2 = tmp5 + tmp6;
1.549 + ; tmp4 = tmp4 * 0.298631336; tmp5 = tmp5 * 2.053119869;
1.550 + ; tmp6 = tmp6 * 3.072711026; tmp7 = tmp7 * 1.501321110;
1.551 + ; z1 = z1 * -0.899976223; z2 = z2 * -2.562915447;
1.552 + ; data7 = tmp4 + z1 + z3; data5 = tmp5 + z2 + z4;
1.553 + ; data3 = tmp6 + z2 + z3; data1 = tmp7 + z1 + z4;
1.554 + ;
1.555 + ; (This implementation)
1.556 + ; tmp4 = tmp4 * (0.298631336 - 0.899976223) + tmp7 * -0.899976223;
1.557 + ; tmp5 = tmp5 * (2.053119869 - 2.562915447) + tmp6 * -2.562915447;
1.558 + ; tmp6 = tmp5 * -2.562915447 + tmp6 * (3.072711026 - 2.562915447);
1.559 + ; tmp7 = tmp4 * -0.899976223 + tmp7 * (1.501321110 - 0.899976223);
1.560 + ; data7 = tmp4 + z3; data5 = tmp5 + z4;
1.561 + ; data3 = tmp6 + z3; data1 = tmp7 + z4;
1.562 +
1.563 + movdqa xmm4,xmm0
1.564 + movdqa xmm1,xmm0
1.565 + punpcklwd xmm4,xmm5
1.566 + punpckhwd xmm1,xmm5
1.567 + movdqa xmm0,xmm4
1.568 + movdqa xmm5,xmm1
1.569 + pmaddwd xmm4,[GOTOFF(ebx,PW_MF060_MF089)] ; xmm4=tmp4L
1.570 + pmaddwd xmm1,[GOTOFF(ebx,PW_MF060_MF089)] ; xmm1=tmp4H
1.571 + pmaddwd xmm0,[GOTOFF(ebx,PW_MF089_F060)] ; xmm0=tmp7L
1.572 + pmaddwd xmm5,[GOTOFF(ebx,PW_MF089_F060)] ; xmm5=tmp7H
1.573 +
1.574 + paddd xmm4, XMMWORD [wk(0)] ; xmm4=data7L
1.575 + paddd xmm1, XMMWORD [wk(1)] ; xmm1=data7H
1.576 + paddd xmm0,xmm2 ; xmm0=data1L
1.577 + paddd xmm5,xmm6 ; xmm5=data1H
1.578 +
1.579 + paddd xmm4,[GOTOFF(ebx,PD_DESCALE_P2)]
1.580 + paddd xmm1,[GOTOFF(ebx,PD_DESCALE_P2)]
1.581 + psrad xmm4,DESCALE_P2
1.582 + psrad xmm1,DESCALE_P2
1.583 + paddd xmm0,[GOTOFF(ebx,PD_DESCALE_P2)]
1.584 + paddd xmm5,[GOTOFF(ebx,PD_DESCALE_P2)]
1.585 + psrad xmm0,DESCALE_P2
1.586 + psrad xmm5,DESCALE_P2
1.587 +
1.588 + packssdw xmm4,xmm1 ; xmm4=data7
1.589 + packssdw xmm0,xmm5 ; xmm0=data1
1.590 +
1.591 + movdqa XMMWORD [XMMBLOCK(7,0,edx,SIZEOF_DCTELEM)], xmm4
1.592 + movdqa XMMWORD [XMMBLOCK(1,0,edx,SIZEOF_DCTELEM)], xmm0
1.593 +
1.594 + movdqa xmm1,xmm3
1.595 + movdqa xmm5,xmm3
1.596 + punpcklwd xmm1,xmm7
1.597 + punpckhwd xmm5,xmm7
1.598 + movdqa xmm3,xmm1
1.599 + movdqa xmm7,xmm5
1.600 + pmaddwd xmm1,[GOTOFF(ebx,PW_MF050_MF256)] ; xmm1=tmp5L
1.601 + pmaddwd xmm5,[GOTOFF(ebx,PW_MF050_MF256)] ; xmm5=tmp5H
1.602 + pmaddwd xmm3,[GOTOFF(ebx,PW_MF256_F050)] ; xmm3=tmp6L
1.603 + pmaddwd xmm7,[GOTOFF(ebx,PW_MF256_F050)] ; xmm7=tmp6H
1.604 +
1.605 + paddd xmm1,xmm2 ; xmm1=data5L
1.606 + paddd xmm5,xmm6 ; xmm5=data5H
1.607 + paddd xmm3, XMMWORD [wk(0)] ; xmm3=data3L
1.608 + paddd xmm7, XMMWORD [wk(1)] ; xmm7=data3H
1.609 +
1.610 + paddd xmm1,[GOTOFF(ebx,PD_DESCALE_P2)]
1.611 + paddd xmm5,[GOTOFF(ebx,PD_DESCALE_P2)]
1.612 + psrad xmm1,DESCALE_P2
1.613 + psrad xmm5,DESCALE_P2
1.614 + paddd xmm3,[GOTOFF(ebx,PD_DESCALE_P2)]
1.615 + paddd xmm7,[GOTOFF(ebx,PD_DESCALE_P2)]
1.616 + psrad xmm3,DESCALE_P2
1.617 + psrad xmm7,DESCALE_P2
1.618 +
1.619 + packssdw xmm1,xmm5 ; xmm1=data5
1.620 + packssdw xmm3,xmm7 ; xmm3=data3
1.621 +
1.622 + movdqa XMMWORD [XMMBLOCK(5,0,edx,SIZEOF_DCTELEM)], xmm1
1.623 + movdqa XMMWORD [XMMBLOCK(3,0,edx,SIZEOF_DCTELEM)], xmm3
1.624 +
1.625 +; pop edi ; unused
1.626 +; pop esi ; unused
1.627 +; pop edx ; need not be preserved
1.628 +; pop ecx ; unused
1.629 + poppic ebx
1.630 + mov esp,ebp ; esp <- aligned ebp
1.631 + pop esp ; esp <- original ebp
1.632 + pop ebp
1.633 + ret
1.634 +
1.635 +; For some reason, the OS X linker does not honor the request to align the
1.636 +; segment unless we do this.
1.637 + align 16
