Change license headers to say 'FFmpeg' instead of 'this program/this library'
[ffmpeg.git] / libavcodec / i386 / mpegvideo_mmx.c
1 /*
2  * The simplest mpeg encoder (well, it was the simplest!)
3  * Copyright (c) 2000,2001 Fabrice Bellard.
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  *
21  * Optimized for ia32 cpus by Nick Kurshev <nickols_k@mail.ru>
22  * h263, mpeg1, mpeg2 dequantizer & draw_edges by Michael Niedermayer <michaelni@gmx.at>
23  */
24
25 #include "../dsputil.h"
26 #include "../mpegvideo.h"
27 #include "../avcodec.h"
28 #include "x86_cpu.h"
29
30 extern uint8_t zigzag_direct_noperm[64];
31 extern uint16_t inv_zigzag_direct16[64];
32
33 static const unsigned long long int mm_wabs __attribute__ ((aligned(8))) = 0xffffffffffffffffULL;
34 static const unsigned long long int mm_wone __attribute__ ((aligned(8))) = 0x0001000100010001ULL;
35
36
37 static void dct_unquantize_h263_intra_mmx(MpegEncContext *s,
38                                   DCTELEM *block, int n, int qscale)
39 {
40     long level, qmul, qadd, nCoeffs;
41
42     qmul = qscale << 1;
43
44     assert(s->block_last_index[n]>=0 || s->h263_aic);
45
46     if (!s->h263_aic) {
47         if (n < 4)
48             level = block[0] * s->y_dc_scale;
49         else
50             level = block[0] * s->c_dc_scale;
51         qadd = (qscale - 1) | 1;
52     }else{
53         qadd = 0;
54         level= block[0];
55     }
56     if(s->ac_pred)
57         nCoeffs=63;
58     else
59         nCoeffs= s->inter_scantable.raster_end[ s->block_last_index[n] ];
60 //printf("%d %d  ", qmul, qadd);
61 asm volatile(
62                 "movd %1, %%mm6                 \n\t" //qmul
63                 "packssdw %%mm6, %%mm6          \n\t"
64                 "packssdw %%mm6, %%mm6          \n\t"
65                 "movd %2, %%mm5                 \n\t" //qadd
66                 "pxor %%mm7, %%mm7              \n\t"
67                 "packssdw %%mm5, %%mm5          \n\t"
68                 "packssdw %%mm5, %%mm5          \n\t"
69                 "psubw %%mm5, %%mm7             \n\t"
70                 "pxor %%mm4, %%mm4              \n\t"
71                 ASMALIGN(4)
72                 "1:                             \n\t"
73                 "movq (%0, %3), %%mm0           \n\t"
74                 "movq 8(%0, %3), %%mm1          \n\t"
75
76                 "pmullw %%mm6, %%mm0            \n\t"
77                 "pmullw %%mm6, %%mm1            \n\t"
78
79                 "movq (%0, %3), %%mm2           \n\t"
80                 "movq 8(%0, %3), %%mm3          \n\t"
81
82                 "pcmpgtw %%mm4, %%mm2           \n\t" // block[i] < 0 ? -1 : 0
83                 "pcmpgtw %%mm4, %%mm3           \n\t" // block[i] < 0 ? -1 : 0
84
85                 "pxor %%mm2, %%mm0              \n\t"
86                 "pxor %%mm3, %%mm1              \n\t"
87
88                 "paddw %%mm7, %%mm0             \n\t"
89                 "paddw %%mm7, %%mm1             \n\t"
90
91                 "pxor %%mm0, %%mm2              \n\t"
92                 "pxor %%mm1, %%mm3              \n\t"
93
94                 "pcmpeqw %%mm7, %%mm0           \n\t" // block[i] == 0 ? -1 : 0
95                 "pcmpeqw %%mm7, %%mm1           \n\t" // block[i] == 0 ? -1 : 0
96
97                 "pandn %%mm2, %%mm0             \n\t"
98                 "pandn %%mm3, %%mm1             \n\t"
99
100                 "movq %%mm0, (%0, %3)           \n\t"
101                 "movq %%mm1, 8(%0, %3)          \n\t"
102
103                 "add $16, %3                    \n\t"
104                 "jng 1b                         \n\t"
105                 ::"r" (block+nCoeffs), "g"(qmul), "g" (qadd), "r" (2*(-nCoeffs))
106                 : "memory"
107         );
108         block[0]= level;
109 }
110
111
112 static void dct_unquantize_h263_inter_mmx(MpegEncContext *s,
113                                   DCTELEM *block, int n, int qscale)
114 {
115     long qmul, qadd, nCoeffs;
116
117     qmul = qscale << 1;
118     qadd = (qscale - 1) | 1;
119
120     assert(s->block_last_index[n]>=0 || s->h263_aic);
121
122     nCoeffs= s->inter_scantable.raster_end[ s->block_last_index[n] ];
123 //printf("%d %d  ", qmul, qadd);
124 asm volatile(
125                 "movd %1, %%mm6                 \n\t" //qmul
126                 "packssdw %%mm6, %%mm6          \n\t"
127                 "packssdw %%mm6, %%mm6          \n\t"
128                 "movd %2, %%mm5                 \n\t" //qadd
129                 "pxor %%mm7, %%mm7              \n\t"
130                 "packssdw %%mm5, %%mm5          \n\t"
131                 "packssdw %%mm5, %%mm5          \n\t"
132                 "psubw %%mm5, %%mm7             \n\t"
133                 "pxor %%mm4, %%mm4              \n\t"
134                 ASMALIGN(4)
135                 "1:                             \n\t"
136                 "movq (%0, %3), %%mm0           \n\t"
137                 "movq 8(%0, %3), %%mm1          \n\t"
138
139                 "pmullw %%mm6, %%mm0            \n\t"
140                 "pmullw %%mm6, %%mm1            \n\t"
141
142                 "movq (%0, %3), %%mm2           \n\t"
143                 "movq 8(%0, %3), %%mm3          \n\t"
144
145                 "pcmpgtw %%mm4, %%mm2           \n\t" // block[i] < 0 ? -1 : 0
146                 "pcmpgtw %%mm4, %%mm3           \n\t" // block[i] < 0 ? -1 : 0
147
148                 "pxor %%mm2, %%mm0              \n\t"
149                 "pxor %%mm3, %%mm1              \n\t"
150
151                 "paddw %%mm7, %%mm0             \n\t"
152                 "paddw %%mm7, %%mm1             \n\t"
153
154                 "pxor %%mm0, %%mm2              \n\t"
155                 "pxor %%mm1, %%mm3              \n\t"
156
157                 "pcmpeqw %%mm7, %%mm0           \n\t" // block[i] == 0 ? -1 : 0
158                 "pcmpeqw %%mm7, %%mm1           \n\t" // block[i] == 0 ? -1 : 0
159
160                 "pandn %%mm2, %%mm0             \n\t"
161                 "pandn %%mm3, %%mm1             \n\t"
162
163                 "movq %%mm0, (%0, %3)           \n\t"
164                 "movq %%mm1, 8(%0, %3)          \n\t"
165
166                 "add $16, %3                    \n\t"
167                 "jng 1b                         \n\t"
168                 ::"r" (block+nCoeffs), "g"(qmul), "g" (qadd), "r" (2*(-nCoeffs))
169                 : "memory"
170         );
171 }
172
173
174 /*
175   NK:
176   Note: looking at PARANOID:
177   "enable all paranoid tests for rounding, overflows, etc..."
178
179 #ifdef PARANOID
180                 if (level < -2048 || level > 2047)
181                     fprintf(stderr, "unquant error %d %d\n", i, level);
182 #endif
183   We can suppose that result of two multiplications can't be greate of 0xFFFF
184   i.e. is 16-bit, so we use here only PMULLW instruction and can avoid
185   a complex multiplication.
186 =====================================================
187  Full formula for multiplication of 2 integer numbers
188  which are represent as high:low words:
189  input: value1 = high1:low1
190         value2 = high2:low2
191  output: value3 = value1*value2
192  value3=high3:low3 (on overflow: modulus 2^32 wrap-around)
193  this mean that for 0x123456 * 0x123456 correct result is 0x766cb0ce4
194  but this algorithm will compute only 0x66cb0ce4
195  this limited by 16-bit size of operands
196  ---------------------------------
197  tlow1 = high1*low2
198  tlow2 = high2*low1
199  tlow1 = tlow1 + tlow2
200  high3:low3 = low1*low2
201  high3 += tlow1
202 */
203 static void dct_unquantize_mpeg1_intra_mmx(MpegEncContext *s,
204                                      DCTELEM *block, int n, int qscale)
205 {
206     long nCoeffs;
207     const uint16_t *quant_matrix;
208     int block0;
209
210     assert(s->block_last_index[n]>=0);
211
212     nCoeffs= s->intra_scantable.raster_end[ s->block_last_index[n] ]+1;
213
214     if (n < 4)
215         block0 = block[0] * s->y_dc_scale;
216     else
217         block0 = block[0] * s->c_dc_scale;
218     /* XXX: only mpeg1 */
219     quant_matrix = s->intra_matrix;
220 asm volatile(
221                 "pcmpeqw %%mm7, %%mm7           \n\t"
222                 "psrlw $15, %%mm7               \n\t"
223                 "movd %2, %%mm6                 \n\t"
224                 "packssdw %%mm6, %%mm6          \n\t"
225                 "packssdw %%mm6, %%mm6          \n\t"
226                 "mov %3, %%"REG_a"              \n\t"
227                 ASMALIGN(4)
228                 "1:                             \n\t"
229                 "movq (%0, %%"REG_a"), %%mm0    \n\t"
230                 "movq 8(%0, %%"REG_a"), %%mm1   \n\t"
231                 "movq (%1, %%"REG_a"), %%mm4    \n\t"
232                 "movq 8(%1, %%"REG_a"), %%mm5   \n\t"
233                 "pmullw %%mm6, %%mm4            \n\t" // q=qscale*quant_matrix[i]
234                 "pmullw %%mm6, %%mm5            \n\t" // q=qscale*quant_matrix[i]
235                 "pxor %%mm2, %%mm2              \n\t"
236                 "pxor %%mm3, %%mm3              \n\t"
237                 "pcmpgtw %%mm0, %%mm2           \n\t" // block[i] < 0 ? -1 : 0
238                 "pcmpgtw %%mm1, %%mm3           \n\t" // block[i] < 0 ? -1 : 0
239                 "pxor %%mm2, %%mm0              \n\t"
240                 "pxor %%mm3, %%mm1              \n\t"
241                 "psubw %%mm2, %%mm0             \n\t" // abs(block[i])
242                 "psubw %%mm3, %%mm1             \n\t" // abs(block[i])
243                 "pmullw %%mm4, %%mm0            \n\t" // abs(block[i])*q
244                 "pmullw %%mm5, %%mm1            \n\t" // abs(block[i])*q
245                 "pxor %%mm4, %%mm4              \n\t"
246                 "pxor %%mm5, %%mm5              \n\t" // FIXME slow
247                 "pcmpeqw (%0, %%"REG_a"), %%mm4 \n\t" // block[i] == 0 ? -1 : 0
248                 "pcmpeqw 8(%0, %%"REG_a"), %%mm5\n\t" // block[i] == 0 ? -1 : 0
249                 "psraw $3, %%mm0                \n\t"
250                 "psraw $3, %%mm1                \n\t"
251                 "psubw %%mm7, %%mm0             \n\t"
252                 "psubw %%mm7, %%mm1             \n\t"
253                 "por %%mm7, %%mm0               \n\t"
254                 "por %%mm7, %%mm1               \n\t"
255                 "pxor %%mm2, %%mm0              \n\t"
256                 "pxor %%mm3, %%mm1              \n\t"
257                 "psubw %%mm2, %%mm0             \n\t"
258                 "psubw %%mm3, %%mm1             \n\t"
259                 "pandn %%mm0, %%mm4             \n\t"
260                 "pandn %%mm1, %%mm5             \n\t"
261                 "movq %%mm4, (%0, %%"REG_a")    \n\t"
262                 "movq %%mm5, 8(%0, %%"REG_a")   \n\t"
263
264                 "add $16, %%"REG_a"             \n\t"
265                 "js 1b                          \n\t"
266                 ::"r" (block+nCoeffs), "r"(quant_matrix+nCoeffs), "g" (qscale), "g" (-2*nCoeffs)
267                 : "%"REG_a, "memory"
268         );
269     block[0]= block0;
270 }
271
272 static void dct_unquantize_mpeg1_inter_mmx(MpegEncContext *s,
273                                      DCTELEM *block, int n, int qscale)
274 {
275     long nCoeffs;
276     const uint16_t *quant_matrix;
277
278     assert(s->block_last_index[n]>=0);
279
280     nCoeffs= s->intra_scantable.raster_end[ s->block_last_index[n] ]+1;
281
282         quant_matrix = s->inter_matrix;
283 asm volatile(
284                 "pcmpeqw %%mm7, %%mm7           \n\t"
285                 "psrlw $15, %%mm7               \n\t"
286                 "movd %2, %%mm6                 \n\t"
287                 "packssdw %%mm6, %%mm6          \n\t"
288                 "packssdw %%mm6, %%mm6          \n\t"
289                 "mov %3, %%"REG_a"              \n\t"
290                 ASMALIGN(4)
291                 "1:                             \n\t"
292                 "movq (%0, %%"REG_a"), %%mm0    \n\t"
293                 "movq 8(%0, %%"REG_a"), %%mm1   \n\t"
294                 "movq (%1, %%"REG_a"), %%mm4    \n\t"
295                 "movq 8(%1, %%"REG_a"), %%mm5   \n\t"
296                 "pmullw %%mm6, %%mm4            \n\t" // q=qscale*quant_matrix[i]
297                 "pmullw %%mm6, %%mm5            \n\t" // q=qscale*quant_matrix[i]
298                 "pxor %%mm2, %%mm2              \n\t"
299                 "pxor %%mm3, %%mm3              \n\t"
300                 "pcmpgtw %%mm0, %%mm2           \n\t" // block[i] < 0 ? -1 : 0
301                 "pcmpgtw %%mm1, %%mm3           \n\t" // block[i] < 0 ? -1 : 0
302                 "pxor %%mm2, %%mm0              \n\t"
303                 "pxor %%mm3, %%mm1              \n\t"
304                 "psubw %%mm2, %%mm0             \n\t" // abs(block[i])
305                 "psubw %%mm3, %%mm1             \n\t" // abs(block[i])
306                 "paddw %%mm0, %%mm0             \n\t" // abs(block[i])*2
307                 "paddw %%mm1, %%mm1             \n\t" // abs(block[i])*2
308                 "paddw %%mm7, %%mm0             \n\t" // abs(block[i])*2 + 1
309                 "paddw %%mm7, %%mm1             \n\t" // abs(block[i])*2 + 1
310                 "pmullw %%mm4, %%mm0            \n\t" // (abs(block[i])*2 + 1)*q
311                 "pmullw %%mm5, %%mm1            \n\t" // (abs(block[i])*2 + 1)*q
312                 "pxor %%mm4, %%mm4              \n\t"
313                 "pxor %%mm5, %%mm5              \n\t" // FIXME slow
314                 "pcmpeqw (%0, %%"REG_a"), %%mm4 \n\t" // block[i] == 0 ? -1 : 0
315                 "pcmpeqw 8(%0, %%"REG_a"), %%mm5\n\t" // block[i] == 0 ? -1 : 0
316                 "psraw $4, %%mm0                \n\t"
317                 "psraw $4, %%mm1                \n\t"
318                 "psubw %%mm7, %%mm0             \n\t"
319                 "psubw %%mm7, %%mm1             \n\t"
320                 "por %%mm7, %%mm0               \n\t"
321                 "por %%mm7, %%mm1               \n\t"
322                 "pxor %%mm2, %%mm0              \n\t"
323                 "pxor %%mm3, %%mm1              \n\t"
324                 "psubw %%mm2, %%mm0             \n\t"
325                 "psubw %%mm3, %%mm1             \n\t"
326                 "pandn %%mm0, %%mm4             \n\t"
327                 "pandn %%mm1, %%mm5             \n\t"
328                 "movq %%mm4, (%0, %%"REG_a")    \n\t"
329                 "movq %%mm5, 8(%0, %%"REG_a")   \n\t"
330
331                 "add $16, %%"REG_a"             \n\t"
332                 "js 1b                          \n\t"
333                 ::"r" (block+nCoeffs), "r"(quant_matrix+nCoeffs), "g" (qscale), "g" (-2*nCoeffs)
334                 : "%"REG_a, "memory"
335         );
336 }
337
338 static void dct_unquantize_mpeg2_intra_mmx(MpegEncContext *s,
339                                      DCTELEM *block, int n, int qscale)
340 {
341     long nCoeffs;
342     const uint16_t *quant_matrix;
343     int block0;
344
345     assert(s->block_last_index[n]>=0);
346
347     if(s->alternate_scan) nCoeffs= 63; //FIXME
348     else nCoeffs= s->intra_scantable.raster_end[ s->block_last_index[n] ];
349
350     if (n < 4)
351         block0 = block[0] * s->y_dc_scale;
352     else
353         block0 = block[0] * s->c_dc_scale;
354     quant_matrix = s->intra_matrix;
355 asm volatile(
356                 "pcmpeqw %%mm7, %%mm7           \n\t"
357                 "psrlw $15, %%mm7               \n\t"
358                 "movd %2, %%mm6                 \n\t"
359                 "packssdw %%mm6, %%mm6          \n\t"
360                 "packssdw %%mm6, %%mm6          \n\t"
361                 "mov %3, %%"REG_a"              \n\t"
362                 ASMALIGN(4)
363                 "1:                             \n\t"
364                 "movq (%0, %%"REG_a"), %%mm0    \n\t"
365                 "movq 8(%0, %%"REG_a"), %%mm1   \n\t"
366                 "movq (%1, %%"REG_a"), %%mm4    \n\t"
367                 "movq 8(%1, %%"REG_a"), %%mm5   \n\t"
368                 "pmullw %%mm6, %%mm4            \n\t" // q=qscale*quant_matrix[i]
369                 "pmullw %%mm6, %%mm5            \n\t" // q=qscale*quant_matrix[i]
370                 "pxor %%mm2, %%mm2              \n\t"
371                 "pxor %%mm3, %%mm3              \n\t"
372                 "pcmpgtw %%mm0, %%mm2           \n\t" // block[i] < 0 ? -1 : 0
373                 "pcmpgtw %%mm1, %%mm3           \n\t" // block[i] < 0 ? -1 : 0
374                 "pxor %%mm2, %%mm0              \n\t"
375                 "pxor %%mm3, %%mm1              \n\t"
376                 "psubw %%mm2, %%mm0             \n\t" // abs(block[i])
377                 "psubw %%mm3, %%mm1             \n\t" // abs(block[i])
378                 "pmullw %%mm4, %%mm0            \n\t" // abs(block[i])*q
379                 "pmullw %%mm5, %%mm1            \n\t" // abs(block[i])*q
380                 "pxor %%mm4, %%mm4              \n\t"
381                 "pxor %%mm5, %%mm5              \n\t" // FIXME slow
382                 "pcmpeqw (%0, %%"REG_a"), %%mm4 \n\t" // block[i] == 0 ? -1 : 0
383                 "pcmpeqw 8(%0, %%"REG_a"), %%mm5\n\t" // block[i] == 0 ? -1 : 0
384                 "psraw $3, %%mm0                \n\t"
385                 "psraw $3, %%mm1                \n\t"
386                 "pxor %%mm2, %%mm0              \n\t"
387                 "pxor %%mm3, %%mm1              \n\t"
388                 "psubw %%mm2, %%mm0             \n\t"
389                 "psubw %%mm3, %%mm1             \n\t"
390                 "pandn %%mm0, %%mm4             \n\t"
391                 "pandn %%mm1, %%mm5             \n\t"
392                 "movq %%mm4, (%0, %%"REG_a")    \n\t"
393                 "movq %%mm5, 8(%0, %%"REG_a")   \n\t"
394
395                 "add $16, %%"REG_a"             \n\t"
396                 "jng 1b                         \n\t"
397                 ::"r" (block+nCoeffs), "r"(quant_matrix+nCoeffs), "g" (qscale), "g" (-2*nCoeffs)
398                 : "%"REG_a, "memory"
399         );
400     block[0]= block0;
401         //Note, we dont do mismatch control for intra as errors cannot accumulate
402 }
403
404 static void dct_unquantize_mpeg2_inter_mmx(MpegEncContext *s,
405                                      DCTELEM *block, int n, int qscale)
406 {
407     long nCoeffs;
408     const uint16_t *quant_matrix;
409
410     assert(s->block_last_index[n]>=0);
411
412     if(s->alternate_scan) nCoeffs= 63; //FIXME
413     else nCoeffs= s->intra_scantable.raster_end[ s->block_last_index[n] ];
414
415         quant_matrix = s->inter_matrix;
416 asm volatile(
417                 "pcmpeqw %%mm7, %%mm7           \n\t"
418                 "psrlq $48, %%mm7               \n\t"
419                 "movd %2, %%mm6                 \n\t"
420                 "packssdw %%mm6, %%mm6          \n\t"
421                 "packssdw %%mm6, %%mm6          \n\t"
422                 "mov %3, %%"REG_a"              \n\t"
423                 ASMALIGN(4)
424                 "1:                             \n\t"
425                 "movq (%0, %%"REG_a"), %%mm0    \n\t"
426                 "movq 8(%0, %%"REG_a"), %%mm1   \n\t"
427                 "movq (%1, %%"REG_a"), %%mm4    \n\t"
428                 "movq 8(%1, %%"REG_a"), %%mm5   \n\t"
429                 "pmullw %%mm6, %%mm4            \n\t" // q=qscale*quant_matrix[i]
430                 "pmullw %%mm6, %%mm5            \n\t" // q=qscale*quant_matrix[i]
431                 "pxor %%mm2, %%mm2              \n\t"
432                 "pxor %%mm3, %%mm3              \n\t"
433                 "pcmpgtw %%mm0, %%mm2           \n\t" // block[i] < 0 ? -1 : 0
434                 "pcmpgtw %%mm1, %%mm3           \n\t" // block[i] < 0 ? -1 : 0
435                 "pxor %%mm2, %%mm0              \n\t"
436                 "pxor %%mm3, %%mm1              \n\t"
437                 "psubw %%mm2, %%mm0             \n\t" // abs(block[i])
438                 "psubw %%mm3, %%mm1             \n\t" // abs(block[i])
439                 "paddw %%mm0, %%mm0             \n\t" // abs(block[i])*2
440                 "paddw %%mm1, %%mm1             \n\t" // abs(block[i])*2
441                 "pmullw %%mm4, %%mm0            \n\t" // abs(block[i])*2*q
442                 "pmullw %%mm5, %%mm1            \n\t" // abs(block[i])*2*q
443                 "paddw %%mm4, %%mm0             \n\t" // (abs(block[i])*2 + 1)*q
444                 "paddw %%mm5, %%mm1             \n\t" // (abs(block[i])*2 + 1)*q
445                 "pxor %%mm4, %%mm4              \n\t"
446                 "pxor %%mm5, %%mm5              \n\t" // FIXME slow
447                 "pcmpeqw (%0, %%"REG_a"), %%mm4 \n\t" // block[i] == 0 ? -1 : 0
448                 "pcmpeqw 8(%0, %%"REG_a"), %%mm5\n\t" // block[i] == 0 ? -1 : 0
449                 "psrlw $4, %%mm0                \n\t"
450                 "psrlw $4, %%mm1                \n\t"
451                 "pxor %%mm2, %%mm0              \n\t"
452                 "pxor %%mm3, %%mm1              \n\t"
453                 "psubw %%mm2, %%mm0             \n\t"
454                 "psubw %%mm3, %%mm1             \n\t"
455                 "pandn %%mm0, %%mm4             \n\t"
456                 "pandn %%mm1, %%mm5             \n\t"
457                 "pxor %%mm4, %%mm7              \n\t"
458                 "pxor %%mm5, %%mm7              \n\t"
459                 "movq %%mm4, (%0, %%"REG_a")    \n\t"
460                 "movq %%mm5, 8(%0, %%"REG_a")   \n\t"
461
462                 "add $16, %%"REG_a"             \n\t"
463                 "jng 1b                         \n\t"
464                 "movd 124(%0, %3), %%mm0        \n\t"
465                 "movq %%mm7, %%mm6              \n\t"
466                 "psrlq $32, %%mm7               \n\t"
467                 "pxor %%mm6, %%mm7              \n\t"
468                 "movq %%mm7, %%mm6              \n\t"
469                 "psrlq $16, %%mm7               \n\t"
470                 "pxor %%mm6, %%mm7              \n\t"
471                 "pslld $31, %%mm7               \n\t"
472                 "psrlq $15, %%mm7               \n\t"
473                 "pxor %%mm7, %%mm0              \n\t"
474                 "movd %%mm0, 124(%0, %3)        \n\t"
475
476                 ::"r" (block+nCoeffs), "r"(quant_matrix+nCoeffs), "g" (qscale), "r" (-2*nCoeffs)
477                 : "%"REG_a, "memory"
478         );
479 }
480
481 /* draw the edges of width 'w' of an image of size width, height
482    this mmx version can only handle w==8 || w==16 */
483 static void draw_edges_mmx(uint8_t *buf, int wrap, int width, int height, int w)
484 {
485     uint8_t *ptr, *last_line;
486     int i;
487
488     last_line = buf + (height - 1) * wrap;
489     /* left and right */
490     ptr = buf;
491     if(w==8)
492     {
493         asm volatile(
494                 "1:                             \n\t"
495                 "movd (%0), %%mm0               \n\t"
496                 "punpcklbw %%mm0, %%mm0         \n\t"
497                 "punpcklwd %%mm0, %%mm0         \n\t"
498                 "punpckldq %%mm0, %%mm0         \n\t"
499                 "movq %%mm0, -8(%0)             \n\t"
500                 "movq -8(%0, %2), %%mm1         \n\t"
501                 "punpckhbw %%mm1, %%mm1         \n\t"
502                 "punpckhwd %%mm1, %%mm1         \n\t"
503                 "punpckhdq %%mm1, %%mm1         \n\t"
504                 "movq %%mm1, (%0, %2)           \n\t"
505                 "add %1, %0                     \n\t"
506                 "cmp %3, %0                     \n\t"
507                 " jb 1b                         \n\t"
508                 : "+r" (ptr)
509                 : "r" ((long)wrap), "r" ((long)width), "r" (ptr + wrap*height)
510         );
511     }
512     else
513     {
514         asm volatile(
515                 "1:                             \n\t"
516                 "movd (%0), %%mm0               \n\t"
517                 "punpcklbw %%mm0, %%mm0         \n\t"
518                 "punpcklwd %%mm0, %%mm0         \n\t"
519                 "punpckldq %%mm0, %%mm0         \n\t"
520                 "movq %%mm0, -8(%0)             \n\t"
521                 "movq %%mm0, -16(%0)            \n\t"
522                 "movq -8(%0, %2), %%mm1         \n\t"
523                 "punpckhbw %%mm1, %%mm1         \n\t"
524                 "punpckhwd %%mm1, %%mm1         \n\t"
525                 "punpckhdq %%mm1, %%mm1         \n\t"
526                 "movq %%mm1, (%0, %2)           \n\t"
527                 "movq %%mm1, 8(%0, %2)          \n\t"
528                 "add %1, %0                     \n\t"
529                 "cmp %3, %0                     \n\t"
530                 " jb 1b                         \n\t"
531                 : "+r" (ptr)
532                 : "r" ((long)wrap), "r" ((long)width), "r" (ptr + wrap*height)
533         );
534     }
535
536     for(i=0;i<w;i+=4) {
537         /* top and bottom (and hopefully also the corners) */
538         ptr= buf - (i + 1) * wrap - w;
539         asm volatile(
540                 "1:                             \n\t"
541                 "movq (%1, %0), %%mm0           \n\t"
542                 "movq %%mm0, (%0)               \n\t"
543                 "movq %%mm0, (%0, %2)           \n\t"
544                 "movq %%mm0, (%0, %2, 2)        \n\t"
545                 "movq %%mm0, (%0, %3)           \n\t"
546                 "add $8, %0                     \n\t"
547                 "cmp %4, %0                     \n\t"
548                 " jb 1b                         \n\t"
549                 : "+r" (ptr)
550                 : "r" ((long)buf - (long)ptr - w), "r" ((long)-wrap), "r" ((long)-wrap*3), "r" (ptr+width+2*w)
551         );
552         ptr= last_line + (i + 1) * wrap - w;
553         asm volatile(
554                 "1:                             \n\t"
555                 "movq (%1, %0), %%mm0           \n\t"
556                 "movq %%mm0, (%0)               \n\t"
557                 "movq %%mm0, (%0, %2)           \n\t"
558                 "movq %%mm0, (%0, %2, 2)        \n\t"
559                 "movq %%mm0, (%0, %3)           \n\t"
560                 "add $8, %0                     \n\t"
561                 "cmp %4, %0                     \n\t"
562                 " jb 1b                         \n\t"
563                 : "+r" (ptr)
564                 : "r" ((long)last_line - (long)ptr - w), "r" ((long)wrap), "r" ((long)wrap*3), "r" (ptr+width+2*w)
565         );
566     }
567 }
568
569 static void  denoise_dct_mmx(MpegEncContext *s, DCTELEM *block){
570     const int intra= s->mb_intra;
571     int *sum= s->dct_error_sum[intra];
572     uint16_t *offset= s->dct_offset[intra];
573
574     s->dct_count[intra]++;
575
576     asm volatile(
577         "pxor %%mm7, %%mm7                      \n\t"
578         "1:                                     \n\t"
579         "pxor %%mm0, %%mm0                      \n\t"
580         "pxor %%mm1, %%mm1                      \n\t"
581         "movq (%0), %%mm2                       \n\t"
582         "movq 8(%0), %%mm3                      \n\t"
583         "pcmpgtw %%mm2, %%mm0                   \n\t"
584         "pcmpgtw %%mm3, %%mm1                   \n\t"
585         "pxor %%mm0, %%mm2                      \n\t"
586         "pxor %%mm1, %%mm3                      \n\t"
587         "psubw %%mm0, %%mm2                     \n\t"
588         "psubw %%mm1, %%mm3                     \n\t"
589         "movq %%mm2, %%mm4                      \n\t"
590         "movq %%mm3, %%mm5                      \n\t"
591         "psubusw (%2), %%mm2                    \n\t"
592         "psubusw 8(%2), %%mm3                   \n\t"
593         "pxor %%mm0, %%mm2                      \n\t"
594         "pxor %%mm1, %%mm3                      \n\t"
595         "psubw %%mm0, %%mm2                     \n\t"
596         "psubw %%mm1, %%mm3                     \n\t"
597         "movq %%mm2, (%0)                       \n\t"
598         "movq %%mm3, 8(%0)                      \n\t"
599         "movq %%mm4, %%mm2                      \n\t"
600         "movq %%mm5, %%mm3                      \n\t"
601         "punpcklwd %%mm7, %%mm4                 \n\t"
602         "punpckhwd %%mm7, %%mm2                 \n\t"
603         "punpcklwd %%mm7, %%mm5                 \n\t"
604         "punpckhwd %%mm7, %%mm3                 \n\t"
605         "paddd (%1), %%mm4                      \n\t"
606         "paddd 8(%1), %%mm2                     \n\t"
607         "paddd 16(%1), %%mm5                    \n\t"
608         "paddd 24(%1), %%mm3                    \n\t"
609         "movq %%mm4, (%1)                       \n\t"
610         "movq %%mm2, 8(%1)                      \n\t"
611         "movq %%mm5, 16(%1)                     \n\t"
612         "movq %%mm3, 24(%1)                     \n\t"
613         "add $16, %0                            \n\t"
614         "add $32, %1                            \n\t"
615         "add $16, %2                            \n\t"
616         "cmp %3, %0                             \n\t"
617             " jb 1b                             \n\t"
618         : "+r" (block), "+r" (sum), "+r" (offset)
619         : "r"(block+64)
620     );
621 }
622
623 static void  denoise_dct_sse2(MpegEncContext *s, DCTELEM *block){
624     const int intra= s->mb_intra;
625     int *sum= s->dct_error_sum[intra];
626     uint16_t *offset= s->dct_offset[intra];
627
628     s->dct_count[intra]++;
629
630     asm volatile(
631         "pxor %%xmm7, %%xmm7                    \n\t"
632         "1:                                     \n\t"
633         "pxor %%xmm0, %%xmm0                    \n\t"
634         "pxor %%xmm1, %%xmm1                    \n\t"
635         "movdqa (%0), %%xmm2                    \n\t"
636         "movdqa 16(%0), %%xmm3                  \n\t"
637         "pcmpgtw %%xmm2, %%xmm0                 \n\t"
638         "pcmpgtw %%xmm3, %%xmm1                 \n\t"
639         "pxor %%xmm0, %%xmm2                    \n\t"
640         "pxor %%xmm1, %%xmm3                    \n\t"
641         "psubw %%xmm0, %%xmm2                   \n\t"
642         "psubw %%xmm1, %%xmm3                   \n\t"
643         "movdqa %%xmm2, %%xmm4                  \n\t"
644         "movdqa %%xmm3, %%xmm5                  \n\t"
645         "psubusw (%2), %%xmm2                   \n\t"
646         "psubusw 16(%2), %%xmm3                 \n\t"
647         "pxor %%xmm0, %%xmm2                    \n\t"
648         "pxor %%xmm1, %%xmm3                    \n\t"
649         "psubw %%xmm0, %%xmm2                   \n\t"
650         "psubw %%xmm1, %%xmm3                   \n\t"
651         "movdqa %%xmm2, (%0)                    \n\t"
652         "movdqa %%xmm3, 16(%0)                  \n\t"
653         "movdqa %%xmm4, %%xmm6                  \n\t"
654         "movdqa %%xmm5, %%xmm0                  \n\t"
655         "punpcklwd %%xmm7, %%xmm4               \n\t"
656         "punpckhwd %%xmm7, %%xmm6               \n\t"
657         "punpcklwd %%xmm7, %%xmm5               \n\t"
658         "punpckhwd %%xmm7, %%xmm0               \n\t"
659         "paddd (%1), %%xmm4                     \n\t"
660         "paddd 16(%1), %%xmm6                   \n\t"
661         "paddd 32(%1), %%xmm5                   \n\t"
662         "paddd 48(%1), %%xmm0                   \n\t"
663         "movdqa %%xmm4, (%1)                    \n\t"
664         "movdqa %%xmm6, 16(%1)                  \n\t"
665         "movdqa %%xmm5, 32(%1)                  \n\t"
666         "movdqa %%xmm0, 48(%1)                  \n\t"
667         "add $32, %0                            \n\t"
668         "add $64, %1                            \n\t"
669         "add $32, %2                            \n\t"
670         "cmp %3, %0                             \n\t"
671             " jb 1b                             \n\t"
672         : "+r" (block), "+r" (sum), "+r" (offset)
673         : "r"(block+64)
674     );
675 }
676
677 #undef HAVE_MMX2
678 #define RENAME(a) a ## _MMX
679 #define RENAMEl(a) a ## _mmx
680 #include "mpegvideo_mmx_template.c"
681
682 #define HAVE_MMX2
683 #undef RENAME
684 #undef RENAMEl
685 #define RENAME(a) a ## _MMX2
686 #define RENAMEl(a) a ## _mmx2
687 #include "mpegvideo_mmx_template.c"
688
689 #undef RENAME
690 #undef RENAMEl
691 #define RENAME(a) a ## _SSE2
692 #define RENAMEl(a) a ## _sse2
693 #include "mpegvideo_mmx_template.c"
694
695 void MPV_common_init_mmx(MpegEncContext *s)
696 {
697     if (mm_flags & MM_MMX) {
698         const int dct_algo = s->avctx->dct_algo;
699
700         s->dct_unquantize_h263_intra = dct_unquantize_h263_intra_mmx;
701         s->dct_unquantize_h263_inter = dct_unquantize_h263_inter_mmx;
702         s->dct_unquantize_mpeg1_intra = dct_unquantize_mpeg1_intra_mmx;
703         s->dct_unquantize_mpeg1_inter = dct_unquantize_mpeg1_inter_mmx;
704         if(!(s->flags & CODEC_FLAG_BITEXACT))
705             s->dct_unquantize_mpeg2_intra = dct_unquantize_mpeg2_intra_mmx;
706         s->dct_unquantize_mpeg2_inter = dct_unquantize_mpeg2_inter_mmx;
707
708         draw_edges = draw_edges_mmx;
709
710         if (mm_flags & MM_SSE2) {
711             s->denoise_dct= denoise_dct_sse2;
712         } else {
713                 s->denoise_dct= denoise_dct_mmx;
714         }
715
716         if(dct_algo==FF_DCT_AUTO || dct_algo==FF_DCT_MMX){
717             if(mm_flags & MM_SSE2){
718                 s->dct_quantize= dct_quantize_SSE2;
719             } else if(mm_flags & MM_MMXEXT){
720                 s->dct_quantize= dct_quantize_MMX2;
721             } else {
722                 s->dct_quantize= dct_quantize_MMX;
723             }
724         }
725     }
726 }