[cvs] / xvidcore / src / dct / x86_asm / idct_mmx.asm Repository:
ViewVC logotype

Diff of /xvidcore/src/dct/x86_asm/idct_mmx.asm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1.1.1, Fri Mar 8 02:44:43 2002 UTC revision 1.15, Wed Sep 16 17:07:58 2009 UTC
# Line 1  Line 1 
1    ;/****************************************************************************
2    ; *
3    ; *  XVID MPEG-4 VIDEO CODEC
4    ; *  - MMX and XMM forward discrete cosine transform -
5    ; *
6    ; *  Copyright(C) 2001 Peter Ross <pross@xvid.org>
7    ; *
8    ; *  This program is free software; you can redistribute it and/or modify it
9    ; *  under the terms of the GNU General Public License as published by
10    ; *  the Free Software Foundation; either version 2 of the License, or
11    ; *  (at your option) any later version.
12    ; *
13    ; *  This program is distributed in the hope that it will be useful,
14    ; *  but WITHOUT ANY WARRANTY; without even the implied warranty of
15    ; *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    ; *  GNU General Public License for more details.
17    ; *
18    ; *  You should have received a copy of the GNU General Public License
19    ; *  along with this program; if not, write to the Free Software
20    ; *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
21    ; *
22    ; * $Id$
23    ; *
24    ; ***************************************************************************/
25    
26    ; ****************************************************************************
27    ;
28  ; Originally provided by Intel at AP-922  ; Originally provided by Intel at AP-922
29  ; http://developer.intel.com/vtune/cbts/strmsimd/922down.htm  ; http://developer.intel.com/vtune/cbts/strmsimd/922down.htm
30  ; (See more app notes at http://developer.intel.com/vtune/cbts/strmsimd/appnotes.htm)  ; (See more app notes at http://developer.intel.com/vtune/cbts/strmsimd/appnotes.htm)
# Line 5  Line 32 
32  ; New macro implements a column part for precise iDCT  ; New macro implements a column part for precise iDCT
33  ; The routine precision now satisfies IEEE standard 1180-1990.  ; The routine precision now satisfies IEEE standard 1180-1990.
34  ;  ;
35  ; Copyright (c) 2000-2001 Peter Gubanov <peter@elecard.net.ru>  ; Copyright(C) 2000-2001 Peter Gubanov <peter@elecard.net.ru>
36  ; Rounding trick Copyright (c) 2000 Michel Lespinasse <walken@zoy.org>  ; Rounding trick Copyright(C) 2000 Michel Lespinasse <walken@zoy.org>
37  ;  ;
38  ; http://www.elecard.com/peter/idct.html  ; http://www.elecard.com/peter/idct.html
39  ; http://www.linuxvideo.org/mpeg2dec/  ; http://www.linuxvideo.org/mpeg2dec/
40  ;  ;
41  ;=============================================================================  ; ***************************************************************************/
42  ;  ;
43  ; These examples contain code fragments for first stage iDCT 8x8  ; These examples contain code fragments for first stage iDCT 8x8
44  ; (for rows) and first stage DCT 8x8 (for columns)  ; (for rows) and first stage DCT 8x8 (for columns)
45  ;  ;
 ;=============================================================================  
 ;  
 ; 04.11.2001  nasm conversion; peter ross <pross@cs.rmit.edu.au>  
 ;  
46    
47  bits 32  ;=============================================================================
48    ; Macros and other preprocessor constants
49    ;=============================================================================
50    
51  %macro cglobal 1  %include "nasm.inc"
         %ifdef PREFIX  
                 global _%1  
                 %define %1 _%1  
         %else  
                 global %1  
         %endif  
 %endmacro  
52    
53  %define BITS_INV_ACC    5                        ; 4 or 5 for IEEE  %define BITS_INV_ACC    5                        ; 4 or 5 for IEEE
54  %define SHIFT_INV_ROW   16 - BITS_INV_ACC  %define SHIFT_INV_ROW   16 - BITS_INV_ACC
# Line 44  Line 62 
62  %define SHIFT_FRW_ROW   BITS_FRW_ACC + 17  %define SHIFT_FRW_ROW   BITS_FRW_ACC + 17
63  %define RND_FRW_ROW     262144 * (BITS_FRW_ACC - 1)       ; 1 << (SHIFT_FRW_ROW-1)  %define RND_FRW_ROW     262144 * (BITS_FRW_ACC - 1)       ; 1 << (SHIFT_FRW_ROW-1)
64    
65    ;=============================================================================
66    ; Local Data (Read Only)
67    ;=============================================================================
68    
69  section .data  DATA
   
 align 16  
70    
71  one_corr        dw            1,            1,            1,            1  ;-----------------------------------------------------------------------------
72  round_inv_row   dd  RND_INV_ROW,  RND_INV_ROW  ; Various memory constants (trigonometric values or rounding values)
73  round_inv_col   dw  RND_INV_COL,  RND_INV_COL,  RND_INV_COL, RND_INV_COL  ;-----------------------------------------------------------------------------
 round_inv_corr  dw  RND_INV_CORR, RND_INV_CORR, RND_INV_CORR, RND_INV_CORR  
 round_frw_row   dd  RND_FRW_ROW,  RND_FRW_ROW  
   tg_1_16       dw  13036,  13036,  13036,  13036    ; tg * (2<<16) + 0.5  
   tg_2_16       dw  27146,  27146,  27146,  27146    ; tg * (2<<16) + 0.5  
   tg_3_16       dw -21746, -21746, -21746, -21746    ; tg * (2<<16) + 0.5  
  cos_4_16       dw -19195, -19195, -19195, -19195    ; cos * (2<<16) + 0.5  
 ocos_4_16       dw  23170,  23170,  23170,  23170    ; cos * (2<<15) + 0.5  
74    
75   otg_3_16       dw  21895, 21895, 21895, 21895       ; tg * (2<<16) + 0.5  ALIGN SECTION_ALIGN
76    one_corr:
77      dw 1, 1, 1, 1
78    round_inv_row:
79      dd RND_INV_ROW,  RND_INV_ROW
80    round_inv_col:
81      dw RND_INV_COL,  RND_INV_COL,  RND_INV_COL, RND_INV_COL
82    round_inv_corr:
83      dw RND_INV_CORR, RND_INV_CORR, RND_INV_CORR, RND_INV_CORR
84    round_frw_row:
85      dd RND_FRW_ROW,  RND_FRW_ROW
86    tg_1_16:
87      dw 13036,  13036,  13036,  13036    ; tg * (2<<16) + 0.5
88    tg_2_16:
89      dw 27146,  27146,  27146,  27146    ; tg * (2<<16) + 0.5
90    tg_3_16:
91      dw -21746, -21746, -21746, -21746    ; tg * (2<<16) + 0.5
92    cos_4_16:
93      dw -19195, -19195, -19195, -19195    ; cos * (2<<16) + 0.5
94    ocos_4_16:
95      dw 23170,  23170,  23170,  23170    ; cos * (2<<15) + 0.5
96    otg_3_16:
97      dw 21895, 21895, 21895, 21895       ; tg * (2<<16) + 0.5
98    
99  %if SHIFT_INV_ROW == 12   ; assume SHIFT_INV_ROW == 12  %if SHIFT_INV_ROW == 12   ; assume SHIFT_INV_ROW == 12
100  rounder_0      dd  65536, 65536  rounder_0:
101  rounder_4      dd      0,     0    dd 65536, 65536
102  rounder_1      dd   7195,  7195  rounder_4:
103  rounder_7      dd   1024,  1024    dd 0, 0
104  rounder_2      dd   4520,  4520  rounder_1:
105  rounder_6      dd   1024,  1024    dd 7195, 7195
106  rounder_3      dd   2407,  2407  rounder_7
107  rounder_5      dd    240,   240    dd 1024, 1024
108    rounder_2:
109      dd 4520, 4520
110    rounder_6:
111      dd 1024, 1024
112    rounder_3:
113      dd 2407, 2407
114    rounder_5:
115      dd 240, 240
116    
117  %elif SHIFT_INV_ROW == 11   ; assume SHIFT_INV_ROW == 11  %elif SHIFT_INV_ROW == 11   ; assume SHIFT_INV_ROW == 11
118  rounder_0      dd  65536, 65536  rounder_0:
119  rounder_4      dd      0,     0    dd 65536, 65536
120  rounder_1      dd   3597,  3597  rounder_4:
121  rounder_7      dd    512,   512    dd 0, 0
122  rounder_2      dd   2260,  2260  rounder_1:
123  rounder_6      dd    512,   512    dd 3597, 3597
124  rounder_3      dd   1203,  1203  rounder_7:
125  rounder_5      dd    120,   120    dd 512, 512
126    rounder_2:
127      dd 2260, 2260
128    rounder_6:
129      dd 512, 512
130    rounder_3:
131      dd 1203, 1203
132    rounder_5:
133      dd 120, 120
134  %else  %else
135    
136  %error invalid _SHIFT_INV_ROW_  %error invalid SHIFT_INV_ROW
137    
138  %endif  %endif
139    
140  ;=============================================================================  ;-----------------------------------------------------------------------------
141  ;  ;
142  ; The first stage iDCT 8x8 - inverse DCTs of rows  ; The first stage iDCT 8x8 - inverse DCTs of rows
143  ;  ;
# Line 140  Line 190 
190  ; For the constants used,  ; For the constants used,
191  ;       FIX(float_const) = (short) (float_const * (1<<15) + 0.5)  ;       FIX(float_const) = (short) (float_const * (1<<15) + 0.5)
192  ;  ;
193  ;=============================================================================  ;-----------------------------------------------------------------------------
194    
195  ;=============================================================================  ;-----------------------------------------------------------------------------
196  ; MMX code  ; Tables for mmx processors
197  ;=============================================================================  ;-----------------------------------------------------------------------------
198    
199  ; Table for rows 0,4 - constants are multiplied by cos_4_16  ; Table for rows 0,4 - constants are multiplied by cos_4_16
200    tab_i_04_mmx:
201  tab_i_04        dw  16384,  16384,  16384, -16384    ; movq-> w06 w04 w02 w00    dw  16384,  16384,  16384, -16384    ; movq-> w06 w04 w02 w00
202                  dw  21407,   8867,   8867, -21407    ; w07 w05 w03 w01                  dw  21407,   8867,   8867, -21407    ; w07 w05 w03 w01
203                  dw  16384, -16384,  16384,  16384    ; w14 w12 w10 w08                  dw  16384, -16384,  16384,  16384    ; w14 w12 w10 w08
204                  dw  -8867,  21407, -21407,  -8867    ; w15 w13 w11 w09                  dw  -8867,  21407, -21407,  -8867    ; w15 w13 w11 w09
# Line 158  Line 208 
208                  dw -22725,  19266, -12873, -22725    ; w31 w29 w27 w25                  dw -22725,  19266, -12873, -22725    ; w31 w29 w27 w25
209    
210  ; Table for rows 1,7 - constants are multiplied by cos_1_16  ; Table for rows 1,7 - constants are multiplied by cos_1_16
211    tab_i_17_mmx:
212  tab_i_17        dw  22725,  22725,  22725, -22725    ; movq-> w06 w04 w02 w00    dw  22725,  22725,  22725, -22725    ; movq-> w06 w04 w02 w00
213                  dw  29692,  12299,  12299, -29692    ; w07 w05 w03 w01                  dw  29692,  12299,  12299, -29692    ; w07 w05 w03 w01
214                  dw  22725, -22725,  22725,  22725    ; w14 w12 w10 w08                  dw  22725, -22725,  22725,  22725    ; w14 w12 w10 w08
215                  dw -12299,  29692, -29692, -12299    ; w15 w13 w11 w09                  dw -12299,  29692, -29692, -12299    ; w15 w13 w11 w09
# Line 169  Line 219 
219                  dw -31521,  26722, -17855, -31521    ; w31 w29 w27 w25                  dw -31521,  26722, -17855, -31521    ; w31 w29 w27 w25
220    
221  ; Table for rows 2,6 - constants are multiplied by cos_2_16  ; Table for rows 2,6 - constants are multiplied by cos_2_16
222    tab_i_26_mmx:
223  tab_i_26        dw  21407,  21407,  21407, -21407    ; movq-> w06 w04 w02 w00    dw  21407,  21407,  21407, -21407    ; movq-> w06 w04 w02 w00
224                  dw  27969,  11585,  11585, -27969    ; w07 w05 w03 w01                  dw  27969,  11585,  11585, -27969    ; w07 w05 w03 w01
225                  dw  21407, -21407,  21407,  21407    ; w14 w12 w10 w08                  dw  21407, -21407,  21407,  21407    ; w14 w12 w10 w08
226                  dw -11585,  27969, -27969, -11585    ; w15 w13 w11 w09                  dw -11585,  27969, -27969, -11585    ; w15 w13 w11 w09
# Line 180  Line 230 
230                  dw -29692,  25172, -16819, -29692    ; w31 w29 w27 w25                  dw -29692,  25172, -16819, -29692    ; w31 w29 w27 w25
231    
232  ; Table for rows 3,5 - constants are multiplied by cos_3_16  ; Table for rows 3,5 - constants are multiplied by cos_3_16
233    tab_i_35_mmx:
234  tab_i_35        dw  19266,  19266,  19266, -19266    ; movq-> w06 w04 w02 w00    dw  19266,  19266,  19266, -19266    ; movq-> w06 w04 w02 w00
235                  dw  25172,  10426,  10426, -25172    ; w07 w05 w03 w01                  dw  25172,  10426,  10426, -25172    ; w07 w05 w03 w01
236                  dw  19266, -19266,  19266,  19266    ; w14 w12 w10 w08                  dw  19266, -19266,  19266,  19266    ; w14 w12 w10 w08
237                  dw -10426,  25172, -25172, -10426    ; w15 w13 w11 w09                  dw -10426,  25172, -25172, -10426    ; w15 w13 w11 w09
# Line 191  Line 241 
241                  dw -26722,  22654, -15137, -26722    ; w31 w29 w27 w25                  dw -26722,  22654, -15137, -26722    ; w31 w29 w27 w25
242    
243  ;-----------------------------------------------------------------------------  ;-----------------------------------------------------------------------------
244    ; Tables for xmm processors
245    ;-----------------------------------------------------------------------------
246    
247  ;  ; %3 for rows 0,4 - constants are multiplied by cos_4_16
248  ; DCT_8_INV_ROW_1  INP, OUT, TABLE, ROUNDER  tab_i_04_xmm:
249  ;    dw  16384,  21407,  16384,   8867 ; movq-> w05 w04 w01 w00
250      dw  16384,   8867, -16384, -21407 ; w07 w06 w03 w02
251      dw  16384,  -8867,  16384, -21407 ; w13 w12 w09 w08
252      dw -16384,  21407,  16384,  -8867 ; w15 w14 w11 w10
253      dw  22725,  19266,  19266,  -4520 ; w21 w20 w17 w16
254      dw  12873,   4520, -22725, -12873 ; w23 w22 w19 w18
255      dw  12873, -22725,   4520, -12873 ; w29 w28 w25 w24
256      dw   4520,  19266,  19266, -22725 ; w31 w30 w27 w26
257    
258  %macro  DCT_8_INV_ROW_1         4  ; %3 for rows 1,7 - constants are multiplied by cos_1_16
259    tab_i_17_xmm:
260      dw  22725,  29692,  22725,  12299 ; movq-> w05 w04 w01 w00
261      dw  22725,  12299, -22725, -29692 ; w07 w06 w03 w02
262      dw  22725, -12299,  22725, -29692 ; w13 w12 w09 w08
263      dw -22725,  29692,  22725, -12299 ; w15 w14 w11 w10
264      dw  31521,  26722,  26722,  -6270 ; w21 w20 w17 w16
265      dw  17855,   6270, -31521, -17855 ; w23 w22 w19 w18
266      dw  17855, -31521,   6270, -17855 ; w29 w28 w25 w24
267      dw   6270,  26722,  26722, -31521 ; w31 w30 w27 w26
268    
269          movq mm0, [%1]            ; 0     ; x3 x2 x1 x0  ; %3 for rows 2,6 - constants are multiplied by cos_2_16
270    tab_i_26_xmm:
271      dw  21407,  27969,  21407,  11585 ; movq-> w05 w04 w01 w00
272      dw  21407,  11585, -21407, -27969 ; w07 w06 w03 w02
273      dw  21407, -11585,  21407, -27969 ; w13 w12 w09 w08
274      dw -21407,  27969,  21407, -11585 ; w15 w14 w11 w10
275      dw  29692,  25172,  25172,  -5906 ; w21 w20 w17 w16
276      dw  16819,   5906, -29692, -16819 ; w23 w22 w19 w18
277      dw  16819, -29692,   5906, -16819 ; w29 w28 w25 w24
278      dw   5906,  25172,  25172, -29692 ; w31 w30 w27 w26
279    
280    ; %3 for rows 3,5 - constants are multiplied by cos_3_16
281    tab_i_35_xmm:
282      dw  19266,  25172,  19266,  10426 ; movq-> w05 w04 w01 w00
283      dw  19266,  10426, -19266, -25172 ; w07 w06 w03 w02
284      dw  19266, -10426,  19266, -25172 ; w13 w12 w09 w08
285      dw -19266,  25172,  19266, -10426 ; w15 w14 w11 w10
286      dw  26722,  22654,  22654,  -5315 ; w21 w20 w17 w16
287      dw  15137,   5315, -26722, -15137 ; w23 w22 w19 w18
288      dw  15137, -26722,   5315, -15137 ; w29 w28 w25 w24
289      dw   5315,  22654,  22654, -26722 ; w31 w30 w27 w26
290    
291    ;=============================================================================
292    ; Helper macros for the code
293    ;=============================================================================
294    
295    ;-----------------------------------------------------------------------------
296    ; DCT_8_INV_ROW_MMX  INP, OUT, TABLE, ROUNDER
297    ;-----------------------------------------------------------------------------
298    
299    %macro DCT_8_INV_ROW_MMX 4
300      movq mm0, [%1]            ; 0 ; x3 x2 x1 x0
301          movq mm1, [%1+8]          ; 1     ; x7 x6 x5 x4          movq mm1, [%1+8]          ; 1     ; x7 x6 x5 x4
302          movq mm2, mm0                   ; 2     ; x3 x2 x1 x0          movq mm2, mm0                   ; 2     ; x3 x2 x1 x0
   
303          movq mm3, [%3]          ; 3     ; w06 w04 w02 w00          movq mm3, [%3]          ; 3     ; w06 w04 w02 w00
304          punpcklwd mm0, mm1                      ; x5 x1 x4 x0          punpcklwd mm0, mm1                      ; x5 x1 x4 x0
   
305          movq mm5, mm0                   ; 5     ; x5 x1 x4 x0          movq mm5, mm0                   ; 5     ; x5 x1 x4 x0
306          punpckldq mm0, mm0                      ; x4 x0 x4 x0          punpckldq mm0, mm0                      ; x4 x0 x4 x0
   
307          movq mm4, [%3+8]        ; 4     ; w07 w05 w03 w01          movq mm4, [%3+8]        ; 4     ; w07 w05 w03 w01
308          punpckhwd mm2, mm1              ; 1     ; x7 x3 x6 x2          punpckhwd mm2, mm1              ; 1     ; x7 x3 x6 x2
   
309          pmaddwd mm3, mm0                        ; x4*w06+x0*w04 x4*w02+x0*w00          pmaddwd mm3, mm0                        ; x4*w06+x0*w04 x4*w02+x0*w00
310          movq mm6, mm2                   ; 6     ; x7 x3 x6 x2          movq mm6, mm2                   ; 6     ; x7 x3 x6 x2
   
311          movq mm1, [%3+32]       ; 1     ; w22 w20 w18 w16          movq mm1, [%3+32]       ; 1     ; w22 w20 w18 w16
312          punpckldq mm2, mm2                      ; x6 x2 x6 x2          punpckldq mm2, mm2                      ; x6 x2 x6 x2
   
313          pmaddwd mm4, mm2                        ; x6*w07+x2*w05 x6*w03+x2*w01          pmaddwd mm4, mm2                        ; x6*w07+x2*w05 x6*w03+x2*w01
314          punpckhdq mm5, mm5                      ; x5 x1 x5 x1          punpckhdq mm5, mm5                      ; x5 x1 x5 x1
   
315          pmaddwd mm0, [%3+16]            ; x4*w14+x0*w12 x4*w10+x0*w08          pmaddwd mm0, [%3+16]            ; x4*w14+x0*w12 x4*w10+x0*w08
316          punpckhdq mm6, mm6                      ; x7 x3 x7 x3          punpckhdq mm6, mm6                      ; x7 x3 x7 x3
   
317          movq mm7, [%3+40]       ; 7     ; w23 w21 w19 w17          movq mm7, [%3+40]       ; 7     ; w23 w21 w19 w17
318          pmaddwd mm1, mm5                        ; x5*w22+x1*w20 x5*w18+x1*w16          pmaddwd mm1, mm5                        ; x5*w22+x1*w20 x5*w18+x1*w16
   
319          paddd mm3, [%4]               ; +%4          paddd mm3, [%4]               ; +%4
320          pmaddwd mm7, mm6                        ; x7*w23+x3*w21 x7*w19+x3*w17          pmaddwd mm7, mm6                        ; x7*w23+x3*w21 x7*w19+x3*w17
   
321          pmaddwd mm2, [%3+24]            ; x6*w15+x2*w13 x6*w11+x2*w09          pmaddwd mm2, [%3+24]            ; x6*w15+x2*w13 x6*w11+x2*w09
322          paddd mm3, mm4                  ; 4     ; a1=sum(even1) a0=sum(even0)          paddd mm3, mm4                  ; 4     ; a1=sum(even1) a0=sum(even0)
   
323          pmaddwd mm5, [%3+48]            ; x5*w30+x1*w28 x5*w26+x1*w24          pmaddwd mm5, [%3+48]            ; x5*w30+x1*w28 x5*w26+x1*w24
324          movq mm4, mm3                   ; 4     ; a1 a0          movq mm4, mm3                   ; 4     ; a1 a0
   
325          pmaddwd mm6, [%3+56]            ; x7*w31+x3*w29 x7*w27+x3*w25          pmaddwd mm6, [%3+56]            ; x7*w31+x3*w29 x7*w27+x3*w25
326          paddd mm1, mm7                  ; 7     ; b1=sum(odd1) b0=sum(odd0)          paddd mm1, mm7                  ; 7     ; b1=sum(odd1) b0=sum(odd0)
   
327          paddd mm0, [%4]               ; +%4          paddd mm0, [%4]               ; +%4
328          psubd mm3, mm1                          ; a1-b1 a0-b0          psubd mm3, mm1                          ; a1-b1 a0-b0
   
329          psrad mm3, SHIFT_INV_ROW                ; y6=a1-b1 y7=a0-b0          psrad mm3, SHIFT_INV_ROW                ; y6=a1-b1 y7=a0-b0
330          paddd mm1, mm4                  ; 4     ; a1+b1 a0+b0          paddd mm1, mm4                  ; 4     ; a1+b1 a0+b0
   
331          paddd mm0, mm2                  ; 2     ; a3=sum(even3) a2=sum(even2)          paddd mm0, mm2                  ; 2     ; a3=sum(even3) a2=sum(even2)
332          psrad mm1, SHIFT_INV_ROW                ; y1=a1+b1 y0=a0+b0          psrad mm1, SHIFT_INV_ROW                ; y1=a1+b1 y0=a0+b0
   
333          paddd mm5, mm6                  ; 6     ; b3=sum(odd3) b2=sum(odd2)          paddd mm5, mm6                  ; 6     ; b3=sum(odd3) b2=sum(odd2)
334          movq mm4, mm0                   ; 4     ; a3 a2          movq mm4, mm0                   ; 4     ; a3 a2
   
335          paddd mm0, mm5                          ; a3+b3 a2+b2          paddd mm0, mm5                          ; a3+b3 a2+b2
336          psubd mm4, mm5                  ; 5     ; a3-b3 a2-b2          psubd mm4, mm5                  ; 5     ; a3-b3 a2-b2
   
337          psrad mm0, SHIFT_INV_ROW                ; y3=a3+b3 y2=a2+b2          psrad mm0, SHIFT_INV_ROW                ; y3=a3+b3 y2=a2+b2
338          psrad mm4, SHIFT_INV_ROW                ; y4=a3-b3 y5=a2-b2          psrad mm4, SHIFT_INV_ROW                ; y4=a3-b3 y5=a2-b2
   
339          packssdw mm1, mm0               ; 0     ; y3 y2 y1 y0          packssdw mm1, mm0               ; 0     ; y3 y2 y1 y0
340          packssdw mm4, mm3               ; 3     ; y6 y7 y4 y5          packssdw mm4, mm3               ; 3     ; y6 y7 y4 y5
   
341          movq mm7, mm4                   ; 7     ; y6 y7 y4 y5          movq mm7, mm4                   ; 7     ; y6 y7 y4 y5
342          psrld mm4, 16                           ; 0 y6 0 y4          psrld mm4, 16                           ; 0 y6 0 y4
   
343          pslld mm7, 16                           ; y7 0 y5 0          pslld mm7, 16                           ; y7 0 y5 0
344          movq [%2], mm1            ; 1     ; save y3 y2 y1 y0          movq [%2], mm1            ; 1     ; save y3 y2 y1 y0
   
345          por mm7, mm4                    ; 4     ; y7 y6 y5 y4          por mm7, mm4                    ; 4     ; y7 y6 y5 y4
346          movq [%2+8], mm7          ; 7     ; save y7 y6 y5 y4          movq [%2+8], mm7          ; 7     ; save y7 y6 y5 y4
347  %endmacro  %endmacro
348    
349    ;-----------------------------------------------------------------------------
350    ; DCT_8_INV_ROW_XMM  INP, OUT, TABLE, ROUNDER
   
 ;=============================================================================  
 ; code for Pentium III  
 ;=============================================================================  
   
 ; %3 for rows 0,4 - constants are multiplied by cos_4_16  
   
 tab_i_04_sse    dw 16384, 21407, 16384, 8867 ; movq-> w05 w04 w01 w00  
                 dw 16384, 8867, -16384, -21407 ; w07 w06 w03 w02  
                 dw 16384, -8867, 16384, -21407 ; w13 w12 w09 w08  
                 dw -16384, 21407, 16384, -8867 ; w15 w14 w11 w10  
                 dw 22725, 19266, 19266, -4520 ; w21 w20 w17 w16  
                 dw 12873, 4520, -22725, -12873 ; w23 w22 w19 w18  
                 dw 12873, -22725, 4520, -12873 ; w29 w28 w25 w24  
                 dw 4520, 19266, 19266, -22725 ; w31 w30 w27 w26  
   
 ; %3 for rows 1,7 - constants are multiplied by cos_1_16  
   
 tab_i_17_sse    dw 22725, 29692, 22725, 12299 ; movq-> w05 w04 w01 w00  
                 dw 22725, 12299, -22725, -29692 ; w07 w06 w03 w02  
                 dw 22725, -12299, 22725, -29692 ; w13 w12 w09 w08  
                 dw -22725, 29692, 22725, -12299 ; w15 w14 w11 w10  
                 dw 31521, 26722, 26722, -6270 ; w21 w20 w17 w16  
                 dw 17855, 6270, -31521, -17855 ; w23 w22 w19 w18  
                 dw 17855, -31521, 6270, -17855 ; w29 w28 w25 w24  
                 dw 6270, 26722, 26722, -31521 ; w31 w30 w27 w26  
   
 ; %3 for rows 2,6 - constants are multiplied by cos_2_16  
   
 tab_i_26_sse    dw 21407, 27969, 21407, 11585 ; movq-> w05 w04 w01 w00  
                 dw 21407, 11585, -21407, -27969 ; w07 w06 w03 w02  
                 dw 21407, -11585, 21407, -27969 ; w13 w12 w09 w08  
                 dw -21407, 27969, 21407, -11585 ; w15 w14 w11 w10  
                 dw 29692, 25172, 25172, -5906 ; w21 w20 w17 w16  
                 dw 16819, 5906, -29692, -16819 ; w23 w22 w19 w18  
                 dw 16819, -29692, 5906, -16819 ; w29 w28 w25 w24  
                 dw 5906, 25172, 25172, -29692 ; w31 w30 w27 w26  
   
 ; %3 for rows 3,5 - constants are multiplied by cos_3_16  
   
 tab_i_35_sse    dw 19266, 25172, 19266, 10426 ; movq-> w05 w04 w01 w00  
                 dw 19266, 10426, -19266, -25172 ; w07 w06 w03 w02  
                 dw 19266, -10426, 19266, -25172 ; w13 w12 w09 w08  
                 dw -19266, 25172, 19266, -10426 ; w15 w14 w11 w10  
                 dw 26722, 22654, 22654, -5315 ; w21 w20 w17 w16  
                 dw 15137, 5315, -26722, -15137 ; w23 w22 w19 w18  
                 dw 15137, -26722, 5315, -15137 ; w29 w28 w25 w24  
                 dw 5315, 22654, 22654, -26722 ; w31 w30 w27 w26  
   
351  ;-----------------------------------------------------------------------------  ;-----------------------------------------------------------------------------
352    
353  ;  %macro DCT_8_INV_ROW_XMM 4
 ; DCT_8_INV_ROW_1_sse  INP, OUT, TABLE, ROUNDER  
 ;  
   
 %macro DCT_8_INV_ROW_1_sse  4  
   
354          movq    mm0, [%1]         ; 0     ; x3 x2 x1 x0          movq    mm0, [%1]         ; 0     ; x3 x2 x1 x0
   
355          movq    mm1, [%1+8]       ; 1     ; x7 x6 x5 x4          movq    mm1, [%1+8]       ; 1     ; x7 x6 x5 x4
356          movq    mm2, mm0                ; 2     ; x3 x2 x1 x0          movq    mm2, mm0                ; 2     ; x3 x2 x1 x0
   
357          movq    mm3, [%3]       ; 3     ; w05 w04 w01 w00          movq    mm3, [%3]       ; 3     ; w05 w04 w01 w00
358          pshufw  mm0, mm0, 10001000b     ; x2 x0 x2 x0          pshufw  mm0, mm0, 10001000b     ; x2 x0 x2 x0
   
359          movq    mm4, [%3+8]     ; 4     ; w07 w06 w03 w02          movq    mm4, [%3+8]     ; 4     ; w07 w06 w03 w02
360          movq    mm5, mm1                ; 5     ; x7 x6 x5 x4          movq    mm5, mm1                ; 5     ; x7 x6 x5 x4
361          pmaddwd mm3, mm0                ; x2*w05+x0*w04 x2*w01+x0*w00          pmaddwd mm3, mm0                ; x2*w05+x0*w04 x2*w01+x0*w00
   
362          movq    mm6, [%3+32]    ; 6     ; w21 w20 w17 w16          movq    mm6, [%3+32]    ; 6     ; w21 w20 w17 w16
363          pshufw  mm1, mm1, 10001000b             ; x6 x4 x6 x4          pshufw  mm1, mm1, 10001000b             ; x6 x4 x6 x4
364          pmaddwd mm4, mm1                        ; x6*w07+x4*w06 x6*w03+x4*w02          pmaddwd mm4, mm1                        ; x6*w07+x4*w06 x6*w03+x4*w02
   
365          movq    mm7, [%3+40]    ; 7     ; w23 w22 w19 w18          movq    mm7, [%3+40]    ; 7     ; w23 w22 w19 w18
366          pshufw  mm2, mm2, 11011101b             ; x3 x1 x3 x1          pshufw  mm2, mm2, 11011101b             ; x3 x1 x3 x1
367          pmaddwd mm6, mm2                        ; x3*w21+x1*w20 x3*w17+x1*w16          pmaddwd mm6, mm2                        ; x3*w21+x1*w20 x3*w17+x1*w16
   
368          pshufw  mm5, mm5, 11011101b             ; x7 x5 x7 x5          pshufw  mm5, mm5, 11011101b             ; x7 x5 x7 x5
369          pmaddwd mm7, mm5                        ; x7*w23+x5*w22 x7*w19+x5*w18          pmaddwd mm7, mm5                        ; x7*w23+x5*w22 x7*w19+x5*w18
   
370          paddd   mm3, [%4]             ; +%4          paddd   mm3, [%4]             ; +%4
   
371          pmaddwd mm0, [%3+16]            ; x2*w13+x0*w12 x2*w09+x0*w08          pmaddwd mm0, [%3+16]            ; x2*w13+x0*w12 x2*w09+x0*w08
372          paddd   mm3, mm4                ; 4     ; a1=sum(even1) a0=sum(even0)          paddd   mm3, mm4                ; 4     ; a1=sum(even1) a0=sum(even0)
   
373          pmaddwd mm1, [%3+24]            ; x6*w15+x4*w14 x6*w11+x4*w10          pmaddwd mm1, [%3+24]            ; x6*w15+x4*w14 x6*w11+x4*w10
374          movq    mm4, mm3                ; 4     ; a1 a0          movq    mm4, mm3                ; 4     ; a1 a0
   
375          pmaddwd mm2, [%3+48]            ; x3*w29+x1*w28 x3*w25+x1*w24          pmaddwd mm2, [%3+48]            ; x3*w29+x1*w28 x3*w25+x1*w24
376          paddd   mm6, mm7                ; 7     ; b1=sum(odd1) b0=sum(odd0)          paddd   mm6, mm7                ; 7     ; b1=sum(odd1) b0=sum(odd0)
   
377          pmaddwd mm5, [%3+56]            ; x7*w31+x5*w30 x7*w27+x5*w26          pmaddwd mm5, [%3+56]            ; x7*w31+x5*w30 x7*w27+x5*w26
378          paddd mm3, mm6                          ; a1+b1 a0+b0          paddd mm3, mm6                          ; a1+b1 a0+b0
   
379          paddd mm0, [%4]               ; +%4          paddd mm0, [%4]               ; +%4
380          psrad mm3, SHIFT_INV_ROW                ; y1=a1+b1 y0=a0+b0          psrad mm3, SHIFT_INV_ROW                ; y1=a1+b1 y0=a0+b0
   
381          paddd mm0, mm1                  ; 1     ; a3=sum(even3) a2=sum(even2)          paddd mm0, mm1                  ; 1     ; a3=sum(even3) a2=sum(even2)
382          psubd mm4, mm6                  ; 6     ; a1-b1 a0-b0          psubd mm4, mm6                  ; 6     ; a1-b1 a0-b0
   
383          movq mm7, mm0                   ; 7     ; a3 a2          movq mm7, mm0                   ; 7     ; a3 a2
384          paddd mm2, mm5                  ; 5     ; b3=sum(odd3) b2=sum(odd2)          paddd mm2, mm5                  ; 5     ; b3=sum(odd3) b2=sum(odd2)
   
385          paddd mm0, mm2                          ; a3+b3 a2+b2          paddd mm0, mm2                          ; a3+b3 a2+b2
386          psrad mm4, SHIFT_INV_ROW                ; y6=a1-b1 y7=a0-b0          psrad mm4, SHIFT_INV_ROW                ; y6=a1-b1 y7=a0-b0
   
387          psubd mm7, mm2                  ; 2     ; a3-b3 a2-b2          psubd mm7, mm2                  ; 2     ; a3-b3 a2-b2
388          psrad mm0, SHIFT_INV_ROW                ; y3=a3+b3 y2=a2+b2          psrad mm0, SHIFT_INV_ROW                ; y3=a3+b3 y2=a2+b2
   
389          psrad mm7, SHIFT_INV_ROW                ; y4=a3-b3 y5=a2-b2          psrad mm7, SHIFT_INV_ROW                ; y4=a3-b3 y5=a2-b2
   
390          packssdw mm3, mm0               ; 0     ; y3 y2 y1 y0          packssdw mm3, mm0               ; 0     ; y3 y2 y1 y0
   
391          packssdw mm7, mm4               ; 4     ; y6 y7 y4 y5          packssdw mm7, mm4               ; 4     ; y6 y7 y4 y5
   
392          movq [%2], mm3            ; 3     ; save y3 y2 y1 y0          movq [%2], mm3            ; 3     ; save y3 y2 y1 y0
393          pshufw mm7, mm7, 10110001b              ; y7 y6 y5 y4          pshufw mm7, mm7, 10110001b              ; y7 y6 y5 y4
   
394          movq [%2+8], mm7          ; 7     ; save y7 y6 y5 y4          movq [%2+8], mm7          ; 7     ; save y7 y6 y5 y4
   
395  %endmacro  %endmacro
396    
397    ;-----------------------------------------------------------------------------
 ;=============================================================================  
 ;  
 ;=============================================================================  
   
 ;=============================================================================  
398  ;  ;
399  ; The first stage DCT 8x8 - forward DCTs of columns  ; The first stage DCT 8x8 - forward DCTs of columns
400  ;  ;
# Line 456  Line 451 
451  ; y[3] = tm765 - tm465 * tg_3_16;  ; y[3] = tm765 - tm465 * tg_3_16;
452  ;}  ;}
453  ;  ;
454  ;=============================================================================  ;-----------------------------------------------------------------------------
   
   
 ;  
 ; DCT_8_FRW_COL_4      INP, OUT  
 ;  
   
 %macro DCT_8_FRW_COL_4          2  
   
         LOCAL x0, x1, x2, x3, x4, x5, x6, x7  
         LOCAL y0, y1, y2, y3, y4, y5, y6, y7  
         x0 equ [%1 + 0*16]  
         x1 equ [%1 + 1*16]  
         x2 equ [%1 + 2*16]  
         x3 equ [%1 + 3*16]  
         x4 equ [%1 + 4*16]  
         x5 equ [%1 + 5*16]  
         x6 equ [%1 + 6*16]  
         x7 equ [%1 + 7*16]  
         y0 equ [%2 + 0*16]  
         y1 equ [%2 + 1*16]  
         y2 equ [%2 + 2*16]  
         y3 equ [%2 + 3*16]  
         y4 equ [%2 + 4*16]  
         y5 equ [%2 + 5*16]  
         y6 equ [%2 + 6*16]  
         y7 equ [%2 + 7*16]  
         movq mm0, x1 ; 0 ; x1  
         movq mm1, x6 ; 1 ; x6  
         movq mm2, mm0 ; 2 ; x1  
         movq mm3, x2 ; 3 ; x2  
         paddsw mm0, mm1 ; t1 = x[1] + x[6]  
         movq mm4, x5 ; 4 ; x5  
         psllw mm0, SHIFT_FRW_COL ; t1  
         movq mm5, x0 ; 5 ; x0  
         paddsw mm4, mm3 ; t2 = x[2] + x[5]  
         paddsw mm5, x7 ; t0 = x[0] + x[7]  
         psllw mm4, SHIFT_FRW_COL ; t2  
         movq mm6, mm0 ; 6 ; t1  
         psubsw mm2, mm1 ; 1 ; t6 = x[1] - x[6]  
         movq mm1, [tg_2_16] ; 1 ; tg_2_16  
         psubsw mm0, mm4 ; tm12 = t1 - t2  
         movq mm7, x3 ; 7 ; x3  
         pmulhw mm1, mm0 ; tm12*tg_2_16  
         paddsw mm7, x4 ; t3 = x[3] + x[4]  
         psllw mm5, SHIFT_FRW_COL ; t0  
         paddsw mm6, mm4 ; 4 ; tp12 = t1 + t2  
         psllw mm7, SHIFT_FRW_COL ; t3  
         movq mm4, mm5 ; 4 ; t0  
         psubsw mm5, mm7 ; tm03 = t0 - t3  
         paddsw mm1, mm5 ; y2 = tm03 + tm12*tg_2_16  
         paddsw mm4, mm7 ; 7 ; tp03 = t0 + t3  
         por mm1, [one_corr] ; correction y2 +0.5  
         psllw mm2, SHIFT_FRW_COL+1 ; t6  
         pmulhw mm5, [tg_2_16] ; tm03*tg_2_16  
         movq mm7, mm4 ; 7 ; tp03  
         psubsw mm3, x5 ; t5 = x[2] - x[5]  
         psubsw mm4, mm6 ; y4 = tp03 - tp12  
         movq y2, mm1 ; 1 ; save y2  
         paddsw mm7, mm6 ; 6 ; y0 = tp03 + tp12  
         movq mm1, x3 ; 1 ; x3  
         psllw mm3, SHIFT_FRW_COL+1 ; t5  
         psubsw mm1, x4 ; t4 = x[3] - x[4]  
         movq mm6, mm2 ; 6 ; t6  
         movq y4, mm4 ; 4 ; save y4  
         paddsw mm2, mm3 ; t6 + t5  
         pmulhw mm2, [ocos_4_16] ; tp65 = (t6 + t5)*cos_4_16  
         psubsw mm6, mm3 ; 3 ; t6 - t5  
         pmulhw mm6, [ocos_4_16] ; tm65 = (t6 - t5)*cos_4_16  
         psubsw mm5, mm0 ; 0 ; y6 = tm03*tg_2_16 - tm12  
         por mm5, [one_corr] ; correction y6 +0.5  
         psllw mm1, SHIFT_FRW_COL ; t4  
         por mm2, [one_corr] ; correction tp65 +0.5  
         movq mm4, mm1 ; 4 ; t4  
         movq mm3, x0 ; 3 ; x0  
         paddsw mm1, mm6 ; tp465 = t4 + tm65  
         psubsw mm3, x7 ; t7 = x[0] - x[7]  
         psubsw mm4, mm6 ; 6 ; tm465 = t4 - tm65  
         movq mm0, [tg_1_16] ; 0 ; tg_1_16  
         psllw mm3, SHIFT_FRW_COL ; t7  
         movq mm6, [tg_3_16] ; 6 ; tg_3_16  
         pmulhw mm0, mm1 ; tp465*tg_1_16  
         movq y0, mm7 ; 7 ; save y0  
         pmulhw mm6, mm4 ; tm465*tg_3_16  
         movq y6, mm5 ; 5 ; save y6  
         movq mm7, mm3 ; 7 ; t7  
         movq mm5, [tg_3_16] ; 5 ; tg_3_16  
         psubsw mm7, mm2 ; tm765 = t7 - tp65  
         paddsw mm3, mm2 ; 2 ; tp765 = t7 + tp65  
         pmulhw mm5, mm7 ; tm765*tg_3_16  
         paddsw mm0, mm3 ; y1 = tp765 + tp465*tg_1_16  
         paddsw mm6, mm4 ; tm465*tg_3_16  
         pmulhw mm3, [tg_1_16] ; tp765*tg_1_16  
         por mm0, [one_corr] ; correction y1 +0.5  
         paddsw mm5, mm7 ; tm765*tg_3_16  
         psubsw mm7, mm6 ; 6 ; y3 = tm765 - tm465*tg_3_16  
         movq y1, mm0 ; 0 ; save y1  
         paddsw mm5, mm4 ; 4 ; y5 = tm765*tg_3_16 + tm465  
         movq y3, mm7 ; 7 ; save y3  
         psubsw mm3, mm1 ; 1 ; y7 = tp765*tg_1_16 - tp465  
         movq y5, mm5 ; 5 ; save y5  
         movq y7, mm3 ; 3 ; save y7  
 %endmacro  
   
455    
456  ;  ;-----------------------------------------------------------------------------
457  ; DCT_8_INV_COL_4  INP,OUT  ; DCT_8_INV_COL_4  INP,OUT
458  ;  ;-----------------------------------------------------------------------------
459    
460  %macro DCT_8_INV_COL_4          2  %macro DCT_8_INV_COL 2
461          movq    mm0, [tg_3_16]          movq    mm0, [tg_3_16]
   
462          movq    mm3, [%1+16*3]          movq    mm3, [%1+16*3]
463          movq    mm1, mm0                        ; tg_3_16          movq    mm1, mm0                        ; tg_3_16
   
464          movq    mm5, [%1+16*5]          movq    mm5, [%1+16*5]
465          pmulhw  mm0, mm3                        ; x3*(tg_3_16-1)          pmulhw  mm0, mm3                        ; x3*(tg_3_16-1)
   
466          movq    mm4, [tg_1_16]          movq    mm4, [tg_1_16]
467          pmulhw  mm1, mm5                        ; x5*(tg_3_16-1)          pmulhw  mm1, mm5                        ; x5*(tg_3_16-1)
   
468          movq    mm7, [%1+16*7]          movq    mm7, [%1+16*7]
469          movq    mm2, mm4                        ; tg_1_16          movq    mm2, mm4                        ; tg_1_16
   
470          movq    mm6, [%1+16*1]          movq    mm6, [%1+16*1]
471          pmulhw  mm4, mm7                        ; x7*tg_1_16          pmulhw  mm4, mm7                        ; x7*tg_1_16
   
472          paddsw  mm0, mm3                        ; x3*tg_3_16          paddsw  mm0, mm3                        ; x3*tg_3_16
473          pmulhw  mm2, mm6                        ; x1*tg_1_16          pmulhw  mm2, mm6                        ; x1*tg_1_16
   
474          paddsw  mm1, mm3                        ; x3+x5*(tg_3_16-1)          paddsw  mm1, mm3                        ; x3+x5*(tg_3_16-1)
475          psubsw  mm0, mm5                        ; x3*tg_3_16-x5 = tm35          psubsw  mm0, mm5                        ; x3*tg_3_16-x5 = tm35
   
476          movq    mm3, [ocos_4_16]          movq    mm3, [ocos_4_16]
477          paddsw  mm1, mm5                        ; x3+x5*tg_3_16 = tp35          paddsw  mm1, mm5                        ; x3+x5*tg_3_16 = tp35
   
478          paddsw  mm4, mm6                        ; x1+tg_1_16*x7 = tp17          paddsw  mm4, mm6                        ; x1+tg_1_16*x7 = tp17
479          psubsw  mm2, mm7                        ; x1*tg_1_16-x7 = tm17          psubsw  mm2, mm7                        ; x1*tg_1_16-x7 = tm17
   
480          movq    mm5, mm4                        ; tp17          movq    mm5, mm4                        ; tp17
481          movq    mm6, mm2                        ; tm17          movq    mm6, mm2                        ; tm17
   
482          paddsw  mm5, mm1                        ; tp17+tp35 = b0          paddsw  mm5, mm1                        ; tp17+tp35 = b0
483          psubsw  mm6, mm0                        ; tm17-tm35 = b3          psubsw  mm6, mm0                        ; tm17-tm35 = b3
   
484          psubsw  mm4, mm1                        ; tp17-tp35 = t1          psubsw  mm4, mm1                        ; tp17-tp35 = t1
485          paddsw  mm2, mm0                        ; tm17+tm35 = t2          paddsw  mm2, mm0                        ; tm17+tm35 = t2
   
486          movq    mm7, [tg_2_16]          movq    mm7, [tg_2_16]
487          movq    mm1, mm4                        ; t1          movq    mm1, mm4                        ; t1
   
488  ;       movq    [SCRATCH+0], mm5     ; save b0  ;       movq    [SCRATCH+0], mm5     ; save b0
489          movq    [%2+3*16], mm5      ; save b0          movq    [%2+3*16], mm5      ; save b0
490          paddsw  mm1, mm2                        ; t1+t2          paddsw  mm1, mm2                        ; t1+t2
   
491  ;       movq    [SCRATCH+8], mm6     ; save b3  ;       movq    [SCRATCH+8], mm6     ; save b3
492          movq    [%2+5*16], mm6      ; save b3          movq    [%2+5*16], mm6      ; save b3
493          psubsw  mm4, mm2                        ; t1-t2          psubsw  mm4, mm2                        ; t1-t2
   
494          movq    mm5, [%1+2*16]          movq    mm5, [%1+2*16]
495          movq    mm0, mm7                        ; tg_2_16          movq    mm0, mm7                        ; tg_2_16
   
496          movq    mm6, [%1+6*16]          movq    mm6, [%1+6*16]
497          pmulhw  mm0, mm5                        ; x2*tg_2_16          pmulhw  mm0, mm5                        ; x2*tg_2_16
   
498          pmulhw  mm7, mm6                        ; x6*tg_2_16          pmulhw  mm7, mm6                        ; x6*tg_2_16
499  ; slot  ; slot
500          pmulhw  mm1, mm3                        ; ocos_4_16*(t1+t2) = b1/2          pmulhw  mm1, mm3                        ; ocos_4_16*(t1+t2) = b1/2
501  ; slot  ; slot
502          movq    mm2, [%1+0*16]          movq    mm2, [%1+0*16]
503          pmulhw  mm4, mm3                        ; ocos_4_16*(t1-t2) = b2/2          pmulhw  mm4, mm3                        ; ocos_4_16*(t1-t2) = b2/2
   
504          psubsw  mm0, mm6                        ; t2*tg_2_16-x6 = tm26          psubsw  mm0, mm6                        ; t2*tg_2_16-x6 = tm26
505          movq    mm3, mm2                        ; x0          movq    mm3, mm2                        ; x0
   
506          movq    mm6, [%1+4*16]          movq    mm6, [%1+4*16]
507          paddsw  mm7, mm5                        ; x2+x6*tg_2_16 = tp26          paddsw  mm7, mm5                        ; x2+x6*tg_2_16 = tp26
   
508          paddsw  mm2, mm6                        ; x0+x4 = tp04          paddsw  mm2, mm6                        ; x0+x4 = tp04
509          psubsw  mm3, mm6                        ; x0-x4 = tm04          psubsw  mm3, mm6                        ; x0-x4 = tm04
   
510          movq    mm5, mm2                        ; tp04          movq    mm5, mm2                        ; tp04
511          movq    mm6, mm3                        ; tm04          movq    mm6, mm3                        ; tm04
   
512          psubsw  mm2, mm7                        ; tp04-tp26 = a3          psubsw  mm2, mm7                        ; tp04-tp26 = a3
513          paddsw  mm3, mm0                        ; tm04+tm26 = a1          paddsw  mm3, mm0                        ; tm04+tm26 = a1
   
514          paddsw mm1, mm1                         ; b1          paddsw mm1, mm1                         ; b1
515          paddsw mm4, mm4                         ; b2          paddsw mm4, mm4                         ; b2
   
516          paddsw  mm5, mm7                        ; tp04+tp26 = a0          paddsw  mm5, mm7                        ; tp04+tp26 = a0
517          psubsw  mm6, mm0                        ; tm04-tm26 = a2          psubsw  mm6, mm0                        ; tm04-tm26 = a2
   
518          movq    mm7, mm3                        ; a1          movq    mm7, mm3                        ; a1
519          movq    mm0, mm6                        ; a2          movq    mm0, mm6                        ; a2
   
520          paddsw  mm3, mm1                        ; a1+b1          paddsw  mm3, mm1                        ; a1+b1
521          paddsw  mm6, mm4                        ; a2+b2          paddsw  mm6, mm4                        ; a2+b2
   
522          psraw   mm3, SHIFT_INV_COL              ; dst1          psraw   mm3, SHIFT_INV_COL              ; dst1
523          psubsw  mm7, mm1                        ; a1-b1          psubsw  mm7, mm1                        ; a1-b1
   
524          psraw   mm6, SHIFT_INV_COL              ; dst2          psraw   mm6, SHIFT_INV_COL              ; dst2
525          psubsw  mm0, mm4                        ; a2-b2          psubsw  mm0, mm4                        ; a2-b2
   
526  ;       movq    mm1, [SCRATCH+0]     ; load b0  ;       movq    mm1, [SCRATCH+0]     ; load b0
527          movq    mm1, [%2+3*16]      ; load b0          movq    mm1, [%2+3*16]      ; load b0
528          psraw   mm7, SHIFT_INV_COL              ; dst6          psraw   mm7, SHIFT_INV_COL              ; dst6
   
529          movq    mm4, mm5                        ; a0          movq    mm4, mm5                        ; a0
530          psraw   mm0, SHIFT_INV_COL              ; dst5          psraw   mm0, SHIFT_INV_COL              ; dst5
   
531          movq    [%2+1*16], mm3          movq    [%2+1*16], mm3
532          paddsw  mm5, mm1                        ; a0+b0          paddsw  mm5, mm1                        ; a0+b0
   
533          movq    [%2+2*16], mm6          movq    [%2+2*16], mm6
534          psubsw  mm4, mm1                        ; a0-b0          psubsw  mm4, mm1                        ; a0-b0
   
535  ;       movq    mm3, [SCRATCH+8]     ; load b3  ;       movq    mm3, [SCRATCH+8]     ; load b3
536          movq    mm3, [%2+5*16]      ; load b3          movq    mm3, [%2+5*16]      ; load b3
537          psraw   mm5, SHIFT_INV_COL              ; dst0          psraw   mm5, SHIFT_INV_COL              ; dst0
   
538          movq    mm6, mm2                        ; a3          movq    mm6, mm2                        ; a3
539          psraw   mm4, SHIFT_INV_COL              ; dst7          psraw   mm4, SHIFT_INV_COL              ; dst7
   
540          movq    [%2+5*16], mm0          movq    [%2+5*16], mm0
541          paddsw  mm2, mm3                        ; a3+b3          paddsw  mm2, mm3                        ; a3+b3
   
542          movq    [%2+6*16], mm7          movq    [%2+6*16], mm7
543          psubsw  mm6, mm3                        ; a3-b3          psubsw  mm6, mm3                        ; a3-b3
   
544          movq    [%2+0*16], mm5          movq    [%2+0*16], mm5
545          psraw   mm2, SHIFT_INV_COL              ; dst3          psraw   mm2, SHIFT_INV_COL              ; dst3
   
546          movq    [%2+7*16], mm4          movq    [%2+7*16], mm4
547          psraw   mm6, SHIFT_INV_COL              ; dst4          psraw   mm6, SHIFT_INV_COL              ; dst4
   
548          movq    [%2+3*16], mm2          movq    [%2+3*16], mm2
   
549          movq    [%2+4*16], mm6          movq    [%2+4*16], mm6
550  %endmacro  %endmacro
551    
   
   
 section .text  
   
552  ;=============================================================================  ;=============================================================================
553  ;  ; Code
 ; void idct_mmx (short * const src_result);  
 ;  
554  ;=============================================================================  ;=============================================================================
555    
556  align 16  TEXT
557    
558  cglobal idct_mmx  cglobal idct_mmx
559  idct_mmx  cglobal idct_xmm
         mov eax, dword [esp + 4]  
560    
561          DCT_8_INV_ROW_1 eax+0, eax+0, tab_i_04, rounder_0  ;-----------------------------------------------------------------------------
562          DCT_8_INV_ROW_1 eax+16, eax+16, tab_i_17, rounder_1  ; void idct_mmx(uint16_t block[64]);
563          DCT_8_INV_ROW_1 eax+32, eax+32, tab_i_26, rounder_2  ;-----------------------------------------------------------------------------
         DCT_8_INV_ROW_1 eax+48, eax+48, tab_i_35, rounder_3  
         DCT_8_INV_ROW_1 eax+64, eax+64, tab_i_04, rounder_4  
         DCT_8_INV_ROW_1 eax+80, eax+80, tab_i_35, rounder_5  
         DCT_8_INV_ROW_1 eax+96, eax+96, tab_i_26, rounder_6  
         DCT_8_INV_ROW_1 eax+112, eax+112, tab_i_17, rounder_7  
564    
565          DCT_8_INV_COL_4 eax+0,eax+0  ALIGN SECTION_ALIGN
566          DCT_8_INV_COL_4 eax+8,eax+8  idct_mmx:
567        mov TMP0, prm1
568    
569            ;; Process each row
570        DCT_8_INV_ROW_MMX TMP0+0*16, TMP0+0*16, tab_i_04_mmx, rounder_0
571        DCT_8_INV_ROW_MMX TMP0+1*16, TMP0+1*16, tab_i_17_mmx, rounder_1
572        DCT_8_INV_ROW_MMX TMP0+2*16, TMP0+2*16, tab_i_26_mmx, rounder_2
573        DCT_8_INV_ROW_MMX TMP0+3*16, TMP0+3*16, tab_i_35_mmx, rounder_3
574        DCT_8_INV_ROW_MMX TMP0+4*16, TMP0+4*16, tab_i_04_mmx, rounder_4
575        DCT_8_INV_ROW_MMX TMP0+5*16, TMP0+5*16, tab_i_35_mmx, rounder_5
576        DCT_8_INV_ROW_MMX TMP0+6*16, TMP0+6*16, tab_i_26_mmx, rounder_6
577        DCT_8_INV_ROW_MMX TMP0+7*16, TMP0+7*16, tab_i_17_mmx, rounder_7
578    
579            ;; Process the columns (4 at a time)
580        DCT_8_INV_COL TMP0+0, TMP0+0
581        DCT_8_INV_COL TMP0+8, TMP0+8
582    
583          ret          ret
584    ENDFUNC
585    
586    ;-----------------------------------------------------------------------------
587    ; void idct_xmm(uint16_t block[64]);
588    ;-----------------------------------------------------------------------------
589    
590    ALIGN SECTION_ALIGN
591  ;=============================================================================  idct_xmm:
592  ;      mov TMP0, prm1
593  ; void idct_sse (short * const src_result);  
594  ;          ;; Process each row
595  ;=============================================================================      DCT_8_INV_ROW_XMM TMP0+0*16, TMP0+0*16, tab_i_04_xmm, rounder_0
596        DCT_8_INV_ROW_XMM TMP0+1*16, TMP0+1*16, tab_i_17_xmm, rounder_1
597  align 16      DCT_8_INV_ROW_XMM TMP0+2*16, TMP0+2*16, tab_i_26_xmm, rounder_2
598  cglobal idct_xmm      DCT_8_INV_ROW_XMM TMP0+3*16, TMP0+3*16, tab_i_35_xmm, rounder_3
599  idct_xmm      DCT_8_INV_ROW_XMM TMP0+4*16, TMP0+4*16, tab_i_04_xmm, rounder_4
600          mov eax, dword [esp + 4]      DCT_8_INV_ROW_XMM TMP0+5*16, TMP0+5*16, tab_i_35_xmm, rounder_5
601        DCT_8_INV_ROW_XMM TMP0+6*16, TMP0+6*16, tab_i_26_xmm, rounder_6
602          DCT_8_INV_ROW_1_sse eax+0, eax+0, tab_i_04_sse, rounder_0      DCT_8_INV_ROW_XMM TMP0+7*16, TMP0+7*16, tab_i_17_xmm, rounder_7
603          DCT_8_INV_ROW_1_sse eax+16, eax+16, tab_i_17_sse, rounder_1  
604          DCT_8_INV_ROW_1_sse eax+32, eax+32, tab_i_26_sse, rounder_2          ;; Process the columns (4 at a time)
605          DCT_8_INV_ROW_1_sse eax+48, eax+48, tab_i_35_sse, rounder_3      DCT_8_INV_COL TMP0+0, TMP0+0
606          DCT_8_INV_ROW_1_sse eax+64, eax+64, tab_i_04_sse, rounder_4      DCT_8_INV_COL TMP0+8, TMP0+8
         DCT_8_INV_ROW_1_sse eax+80, eax+80, tab_i_35_sse, rounder_5  
         DCT_8_INV_ROW_1_sse eax+96, eax+96, tab_i_26_sse, rounder_6  
         DCT_8_INV_ROW_1_sse eax+112, eax+112, tab_i_17_sse, rounder_7  
   
         DCT_8_INV_COL_4 eax+0, eax+0  
         DCT_8_INV_COL_4 eax+8, eax+8  
607    
608          ret          ret
609    ENDFUNC
610    
611    NON_EXEC_STACK
Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.15
No admin address has been configured
 ViewVC Help
Powered by ViewVC 1.0.4