repositories / deb_ffmpeg.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Imported Debian version 2.4.3~trusty1
[deb_ffmpeg.git] / ffmpeg / libavcodec / x86 / xvididct_sse2.c
CommitLineData
2ba45a60
DM		 1/*
2 * XVID MPEG-4 VIDEO CODEC
3 * - SSE2 inverse discrete cosine transform -
4 *
5 * Copyright(C) 2003 Pascal Massimino <skal@planet-d.net>
6 *
7 * Conversion to gcc syntax with modifications
8 * by Alexander Strange <astrange@ithinksw.com>
9 *
10 * Originally from dct/x86_asm/fdct_sse2_skal.asm in Xvid.
11 *
12 * This file is part of FFmpeg.
13 *
14 * Vertical pass is an implementation of the scheme:
15 * Loeffler C., Ligtenberg A., and Moschytz C.S.:
16 * Practical Fast 1D DCT Algorithm with Eleven Multiplications,
17 * Proc. ICASSP 1989, 988-991.
18 *
19 * Horizontal pass is a double 4x4 vector/matrix multiplication,
20 * (see also Intel's Application Note 922:
21 * http://developer.intel.com/vtune/cbts/strmsimd/922down.htm
22 * Copyright (C) 1999 Intel Corporation)
23 *
24 * More details at http://skal.planet-d.net/coding/dct.html
25 *
26 * FFmpeg is free software; you can redistribute it and/or
27 * modify it under the terms of the GNU Lesser General Public
28 * License as published by the Free Software Foundation; either
29 * version 2.1 of the License, or (at your option) any later version.
30 *
31 * FFmpeg is distributed in the hope that it will be useful,
32 * but WITHOUT ANY WARRANTY; without even the implied warranty of
33 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
34 * Lesser General Public License for more details.
35 *
36 * You should have received a copy of the GNU Lesser General Public License
37 * along with FFmpeg; if not, write to the Free Software Foundation,
38 * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
39 */
40
41#include "libavutil/mem.h"
42#include "libavutil/x86/asm.h"
43
44#include "idctdsp.h"
45#include "xvididct.h"
46
47#if HAVE_SSE2_INLINE
48
49/**
50 * @file
51 * @brief SSE2 IDCT compatible with the Xvid IDCT
52 */
53
54#define X8(x) x, x, x, x, x, x, x, x
55
56DECLARE_ASM_CONST(16, int16_t, tan1)[] = { X8(13036) }; // tan( pi/16)
57DECLARE_ASM_CONST(16, int16_t, tan2)[] = { X8(27146) }; // tan(2pi/16) = sqrt(2)-1
58DECLARE_ASM_CONST(16, int16_t, tan3)[] = { X8(43790) }; // tan(3pi/16)-1
59DECLARE_ASM_CONST(16, int16_t, sqrt2)[] = { X8(23170) }; // 0.5/sqrt(2)
60DECLARE_ASM_CONST(8, uint8_t, m127)[] = { X8(127) };
61
62DECLARE_ASM_CONST(16, int16_t, iTab1)[] = {
63 0x4000, 0x539f, 0xc000, 0xac61, 0x4000, 0xdd5d, 0x4000, 0xdd5d,
64 0x4000, 0x22a3, 0x4000, 0x22a3, 0xc000, 0x539f, 0x4000, 0xac61,
65 0x3249, 0x11a8, 0x4b42, 0xee58, 0x11a8, 0x4b42, 0x11a8, 0xcdb7,
66 0x58c5, 0x4b42, 0xa73b, 0xcdb7, 0x3249, 0xa73b, 0x4b42, 0xa73b
67};
68
69DECLARE_ASM_CONST(16, int16_t, iTab2)[] = {
70 0x58c5, 0x73fc, 0xa73b, 0x8c04, 0x58c5, 0xcff5, 0x58c5, 0xcff5,
71 0x58c5, 0x300b, 0x58c5, 0x300b, 0xa73b, 0x73fc, 0x58c5, 0x8c04,
72 0x45bf, 0x187e, 0x6862, 0xe782, 0x187e, 0x6862, 0x187e, 0xba41,
73 0x7b21, 0x6862, 0x84df, 0xba41, 0x45bf, 0x84df, 0x6862, 0x84df
74};
75
76DECLARE_ASM_CONST(16, int16_t, iTab3)[] = {
77 0x539f, 0x6d41, 0xac61, 0x92bf, 0x539f, 0xd2bf, 0x539f, 0xd2bf,
78 0x539f, 0x2d41, 0x539f, 0x2d41, 0xac61, 0x6d41, 0x539f, 0x92bf,
79 0x41b3, 0x1712, 0x6254, 0xe8ee, 0x1712, 0x6254, 0x1712, 0xbe4d,
80 0x73fc, 0x6254, 0x8c04, 0xbe4d, 0x41b3, 0x8c04, 0x6254, 0x8c04
81};
82
83DECLARE_ASM_CONST(16, int16_t, iTab4)[] = {
84 0x4b42, 0x6254, 0xb4be, 0x9dac, 0x4b42, 0xd746, 0x4b42, 0xd746,
85 0x4b42, 0x28ba, 0x4b42, 0x28ba, 0xb4be, 0x6254, 0x4b42, 0x9dac,
86 0x3b21, 0x14c3, 0x587e, 0xeb3d, 0x14c3, 0x587e, 0x14c3, 0xc4df,
87 0x6862, 0x587e, 0x979e, 0xc4df, 0x3b21, 0x979e, 0x587e, 0x979e
88};
89
90DECLARE_ASM_CONST(16, int32_t, walkenIdctRounders)[] = {
91 65536, 65536, 65536, 65536,
92 3597, 3597, 3597, 3597,
93 2260, 2260, 2260, 2260,
94 1203, 1203, 1203, 1203,
95 120, 120, 120, 120,
96 512, 512, 512, 512
97};
98
99// Temporary storage before the column pass
100#define ROW1 "%%xmm6"
101#define ROW3 "%%xmm4"
102#define ROW5 "%%xmm5"
103#define ROW7 "%%xmm7"
104
105#define CLEAR_ODD(r) "pxor "r","r" \n\t"
106#define PUT_ODD(dst) "pshufhw $0x1B, %%xmm2, "dst" \n\t"
107
108#if ARCH_X86_64
109
110# define ROW0 "%%xmm8"
111# define REG0 ROW0
112# define ROW2 "%%xmm9"
113# define REG2 ROW2
114# define ROW4 "%%xmm10"
115# define REG4 ROW4
116# define ROW6 "%%xmm11"
117# define REG6 ROW6
118# define CLEAR_EVEN(r) CLEAR_ODD(r)
119# define PUT_EVEN(dst) PUT_ODD(dst)
120# define XMMS "%%xmm12"
121# define MOV_32_ONLY "#"
122# define SREG2 REG2
123# define TAN3 "%%xmm13"
124# define TAN1 "%%xmm14"
125
126#else
127
128# define ROW0 "(%0)"
129# define REG0 "%%xmm4"
130# define ROW2 "2*16(%0)"
131# define REG2 "%%xmm4"
132# define ROW4 "4*16(%0)"
133# define REG4 "%%xmm6"
134# define ROW6 "6*16(%0)"
135# define REG6 "%%xmm6"
136# define CLEAR_EVEN(r)
137# define PUT_EVEN(dst) \
138 "pshufhw $0x1B, %%xmm2, %%xmm2 \n\t" \
139 "movdqa %%xmm2, "dst" \n\t"
140# define XMMS "%%xmm2"
141# define MOV_32_ONLY "movdqa "
142# define SREG2 "%%xmm7"
143# define TAN3 "%%xmm0"
144# define TAN1 "%%xmm2"
145
146#endif
147
148#define ROUND(x) "paddd "x
149
150#define JZ(reg, to) \
151 "testl "reg","reg" \n\t" \
152 "jz "to" \n\t"
153
154#define JNZ(reg, to) \
155 "testl "reg","reg" \n\t" \
156 "jnz "to" \n\t"
157
158#define TEST_ONE_ROW(src, reg, clear) \
159 clear \
160 "movq "src", %%mm1 \n\t" \
161 "por 8+"src", %%mm1 \n\t" \
162 "paddusb %%mm0, %%mm1 \n\t" \
163 "pmovmskb %%mm1, "reg" \n\t"
164
165#define TEST_TWO_ROWS(row1, row2, reg1, reg2, clear1, clear2) \
166 clear1 \
167 clear2 \
168 "movq "row1", %%mm1 \n\t" \
169 "por 8+"row1", %%mm1 \n\t" \
170 "movq "row2", %%mm2 \n\t" \
171 "por 8+"row2", %%mm2 \n\t" \
172 "paddusb %%mm0, %%mm1 \n\t" \
173 "paddusb %%mm0, %%mm2 \n\t" \
174 "pmovmskb %%mm1, "reg1" \n\t" \
175 "pmovmskb %%mm2, "reg2" \n\t"
176
177/// IDCT pass on rows.
178#define iMTX_MULT(src, table, rounder, put) \
179 "movdqa "src", %%xmm3 \n\t" \
180 "movdqa %%xmm3, %%xmm0 \n\t" \
181 "pshufd $0x11, %%xmm3, %%xmm1 \n\t" /* 4602 */ \
182 "punpcklqdq %%xmm0, %%xmm0 \n\t" /* 0246 */ \
183 "pmaddwd "table", %%xmm0 \n\t" \
184 "pmaddwd 16+"table", %%xmm1 \n\t" \
185 "pshufd $0xBB, %%xmm3, %%xmm2 \n\t" /* 5713 */ \
186 "punpckhqdq %%xmm3, %%xmm3 \n\t" /* 1357 */ \
187 "pmaddwd 32+"table", %%xmm2 \n\t" \
188 "pmaddwd 48+"table", %%xmm3 \n\t" \
189 "paddd %%xmm1, %%xmm0 \n\t" \
190 "paddd %%xmm3, %%xmm2 \n\t" \
191 rounder", %%xmm0 \n\t" \
192 "movdqa %%xmm2, %%xmm3 \n\t" \
193 "paddd %%xmm0, %%xmm2 \n\t" \
194 "psubd %%xmm3, %%xmm0 \n\t" \
195 "psrad $11, %%xmm2 \n\t" \
196 "psrad $11, %%xmm0 \n\t" \
197 "packssdw %%xmm0, %%xmm2 \n\t" \
198 put \
199 "1: \n\t"
200
201#define iLLM_HEAD \
202 "movdqa "MANGLE(tan3)", "TAN3" \n\t" \
203 "movdqa "MANGLE(tan1)", "TAN1" \n\t" \
204
205/// IDCT pass on columns.
206#define iLLM_PASS(dct) \
207 "movdqa "TAN3", %%xmm1 \n\t" \
208 "movdqa "TAN1", %%xmm3 \n\t" \
209 "pmulhw %%xmm4, "TAN3" \n\t" \
210 "pmulhw %%xmm5, %%xmm1 \n\t" \
211 "paddsw %%xmm4, "TAN3" \n\t" \
212 "paddsw %%xmm5, %%xmm1 \n\t" \
213 "psubsw %%xmm5, "TAN3" \n\t" \
214 "paddsw %%xmm4, %%xmm1 \n\t" \
215 "pmulhw %%xmm7, %%xmm3 \n\t" \
216 "pmulhw %%xmm6, "TAN1" \n\t" \
217 "paddsw %%xmm6, %%xmm3 \n\t" \
218 "psubsw %%xmm7, "TAN1" \n\t" \
219 "movdqa %%xmm3, %%xmm7 \n\t" \
220 "movdqa "TAN1", %%xmm6 \n\t" \
221 "psubsw %%xmm1, %%xmm3 \n\t" \
222 "psubsw "TAN3", "TAN1" \n\t" \
223 "paddsw %%xmm7, %%xmm1 \n\t" \
224 "paddsw %%xmm6, "TAN3" \n\t" \
225 "movdqa %%xmm3, %%xmm6 \n\t" \
226 "psubsw "TAN3", %%xmm3 \n\t" \
227 "paddsw %%xmm6, "TAN3" \n\t" \
228 "movdqa "MANGLE(sqrt2)", %%xmm4 \n\t" \
229 "pmulhw %%xmm4, %%xmm3 \n\t" \
230 "pmulhw %%xmm4, "TAN3" \n\t" \
231 "paddsw "TAN3", "TAN3" \n\t" \
232 "paddsw %%xmm3, %%xmm3 \n\t" \
233 "movdqa "MANGLE(tan2)", %%xmm7 \n\t" \
234 MOV_32_ONLY ROW2", "REG2" \n\t" \
235 MOV_32_ONLY ROW6", "REG6" \n\t" \
236 "movdqa %%xmm7, %%xmm5 \n\t" \
237 "pmulhw "REG6", %%xmm7 \n\t" \
238 "pmulhw "REG2", %%xmm5 \n\t" \
239 "paddsw "REG2", %%xmm7 \n\t" \
240 "psubsw "REG6", %%xmm5 \n\t" \
241 MOV_32_ONLY ROW0", "REG0" \n\t" \
242 MOV_32_ONLY ROW4", "REG4" \n\t" \
243 MOV_32_ONLY" "TAN1", (%0) \n\t" \
244 "movdqa "REG0", "XMMS" \n\t" \
245 "psubsw "REG4", "REG0" \n\t" \
246 "paddsw "XMMS", "REG4" \n\t" \
247 "movdqa "REG4", "XMMS" \n\t" \
248 "psubsw %%xmm7, "REG4" \n\t" \
249 "paddsw "XMMS", %%xmm7 \n\t" \
250 "movdqa "REG0", "XMMS" \n\t" \
251 "psubsw %%xmm5, "REG0" \n\t" \
252 "paddsw "XMMS", %%xmm5 \n\t" \
253 "movdqa %%xmm5, "XMMS" \n\t" \
254 "psubsw "TAN3", %%xmm5 \n\t" \
255 "paddsw "XMMS", "TAN3" \n\t" \
256 "movdqa "REG0", "XMMS" \n\t" \
257 "psubsw %%xmm3, "REG0" \n\t" \
258 "paddsw "XMMS", %%xmm3 \n\t" \
259 MOV_32_ONLY" (%0), "TAN1" \n\t" \
260 "psraw $6, %%xmm5 \n\t" \
261 "psraw $6, "REG0" \n\t" \
262 "psraw $6, "TAN3" \n\t" \
263 "psraw $6, %%xmm3 \n\t" \
264 "movdqa "TAN3", 1*16("dct") \n\t" \
265 "movdqa %%xmm3, 2*16("dct") \n\t" \
266 "movdqa "REG0", 5*16("dct") \n\t" \
267 "movdqa %%xmm5, 6*16("dct") \n\t" \
268 "movdqa %%xmm7, %%xmm0 \n\t" \
269 "movdqa "REG4", %%xmm4 \n\t" \
270 "psubsw %%xmm1, %%xmm7 \n\t" \
271 "psubsw "TAN1", "REG4" \n\t" \
272 "paddsw %%xmm0, %%xmm1 \n\t" \
273 "paddsw %%xmm4, "TAN1" \n\t" \
274 "psraw $6, %%xmm1 \n\t" \
275 "psraw $6, %%xmm7 \n\t" \
276 "psraw $6, "TAN1" \n\t" \
277 "psraw $6, "REG4" \n\t" \
278 "movdqa %%xmm1, ("dct") \n\t" \
279 "movdqa "TAN1", 3*16("dct") \n\t" \
280 "movdqa "REG4", 4*16("dct") \n\t" \
281 "movdqa %%xmm7, 7*16("dct") \n\t"
282
283/// IDCT pass on columns, assuming rows 4-7 are zero.
284#define iLLM_PASS_SPARSE(dct) \
285 "pmulhw %%xmm4, "TAN3" \n\t" \
286 "paddsw %%xmm4, "TAN3" \n\t" \
287 "movdqa %%xmm6, %%xmm3 \n\t" \
288 "pmulhw %%xmm6, "TAN1" \n\t" \
289 "movdqa %%xmm4, %%xmm1 \n\t" \
290 "psubsw %%xmm1, %%xmm3 \n\t" \
291 "paddsw %%xmm6, %%xmm1 \n\t" \
292 "movdqa "TAN1", %%xmm6 \n\t" \
293 "psubsw "TAN3", "TAN1" \n\t" \
294 "paddsw %%xmm6, "TAN3" \n\t" \
295 "movdqa %%xmm3, %%xmm6 \n\t" \
296 "psubsw "TAN3", %%xmm3 \n\t" \
297 "paddsw %%xmm6, "TAN3" \n\t" \
298 "movdqa "MANGLE(sqrt2)", %%xmm4 \n\t" \
299 "pmulhw %%xmm4, %%xmm3 \n\t" \
300 "pmulhw %%xmm4, "TAN3" \n\t" \
301 "paddsw "TAN3", "TAN3" \n\t" \
302 "paddsw %%xmm3, %%xmm3 \n\t" \
303 "movdqa "MANGLE(tan2)", %%xmm5 \n\t" \
304 MOV_32_ONLY ROW2", "SREG2" \n\t" \
305 "pmulhw "SREG2", %%xmm5 \n\t" \
306 MOV_32_ONLY ROW0", "REG0" \n\t" \
307 "movdqa "REG0", %%xmm6 \n\t" \
308 "psubsw "SREG2", %%xmm6 \n\t" \
309 "paddsw "REG0", "SREG2" \n\t" \
310 MOV_32_ONLY" "TAN1", (%0) \n\t" \
311 "movdqa "REG0", "XMMS" \n\t" \
312 "psubsw %%xmm5, "REG0" \n\t" \
313 "paddsw "XMMS", %%xmm5 \n\t" \
314 "movdqa %%xmm5, "XMMS" \n\t" \
315 "psubsw "TAN3", %%xmm5 \n\t" \
316 "paddsw "XMMS", "TAN3" \n\t" \
317 "movdqa "REG0", "XMMS" \n\t" \
318 "psubsw %%xmm3, "REG0" \n\t" \
319 "paddsw "XMMS", %%xmm3 \n\t" \
320 MOV_32_ONLY" (%0), "TAN1" \n\t" \
321 "psraw $6, %%xmm5 \n\t" \
322 "psraw $6, "REG0" \n\t" \
323 "psraw $6, "TAN3" \n\t" \
324 "psraw $6, %%xmm3 \n\t" \
325 "movdqa "TAN3", 1*16("dct") \n\t" \
326 "movdqa %%xmm3, 2*16("dct") \n\t" \
327 "movdqa "REG0", 5*16("dct") \n\t" \
328 "movdqa %%xmm5, 6*16("dct") \n\t" \
329 "movdqa "SREG2", %%xmm0 \n\t" \
330 "movdqa %%xmm6, %%xmm4 \n\t" \
331 "psubsw %%xmm1, "SREG2" \n\t" \
332 "psubsw "TAN1", %%xmm6 \n\t" \
333 "paddsw %%xmm0, %%xmm1 \n\t" \
334 "paddsw %%xmm4, "TAN1" \n\t" \
335 "psraw $6, %%xmm1 \n\t" \
336 "psraw $6, "SREG2" \n\t" \
337 "psraw $6, "TAN1" \n\t" \
338 "psraw $6, %%xmm6 \n\t" \
339 "movdqa %%xmm1, ("dct") \n\t" \
340 "movdqa "TAN1", 3*16("dct") \n\t" \
341 "movdqa %%xmm6, 4*16("dct") \n\t" \
342 "movdqa "SREG2", 7*16("dct") \n\t"
343
344av_extern_inline void ff_xvid_idct_sse2(short *block)
345{
346 __asm__ volatile (
347 "movq "MANGLE (m127) ", %%mm0 \n\t"
348 iMTX_MULT("(%0)", MANGLE(iTab1), ROUND(MANGLE(walkenIdctRounders)), PUT_EVEN(ROW0))
349 iMTX_MULT("1*16(%0)", MANGLE(iTab2), ROUND("1*16+"MANGLE(walkenIdctRounders)), PUT_ODD(ROW1))
350 iMTX_MULT("2*16(%0)", MANGLE(iTab3), ROUND("2*16+"MANGLE(walkenIdctRounders)), PUT_EVEN(ROW2))
351
352 TEST_TWO_ROWS("3*16(%0)", "4*16(%0)", "%%eax", "%%ecx", CLEAR_ODD(ROW3), CLEAR_EVEN(ROW4))
353 JZ("%%eax", "1f")
354 iMTX_MULT("3*16(%0)", MANGLE(iTab4), ROUND("3*16+"MANGLE(walkenIdctRounders)), PUT_ODD(ROW3))
355
356 TEST_TWO_ROWS("5*16(%0)", "6*16(%0)", "%%eax", "%%edx", CLEAR_ODD(ROW5), CLEAR_EVEN(ROW6))
357 TEST_ONE_ROW("7*16(%0)", "%%esi", CLEAR_ODD(ROW7))
358 iLLM_HEAD
359 ".p2align 4 \n\t"
360 JNZ("%%ecx", "2f")
361 JNZ("%%eax", "3f")
362 JNZ("%%edx", "4f")
363 JNZ("%%esi", "5f")
364 iLLM_PASS_SPARSE("%0")
365 "jmp 6f \n\t"
366 "2: \n\t"
367 iMTX_MULT("4*16(%0)", MANGLE(iTab1), "#", PUT_EVEN(ROW4))
368 "3: \n\t"
369 iMTX_MULT("5*16(%0)", MANGLE(iTab4), ROUND("4*16+"MANGLE(walkenIdctRounders)), PUT_ODD(ROW5))
370 JZ("%%edx", "1f")
371 "4: \n\t"
372 iMTX_MULT("6*16(%0)", MANGLE(iTab3), ROUND("5*16+"MANGLE(walkenIdctRounders)), PUT_EVEN(ROW6))
373 JZ("%%esi", "1f")
374 "5: \n\t"
375 iMTX_MULT("7*16(%0)", MANGLE(iTab2), ROUND("5*16+"MANGLE(walkenIdctRounders)), PUT_ODD(ROW7))
376#if ARCH_X86_32
377 iLLM_HEAD
378#endif
379 iLLM_PASS("%0")
380 "6: \n\t"
381 : "+r" (block)
382 : NAMED_CONSTRAINTS_ARRAY(m127,iTab1,walkenIdctRounders,iTab2,iTab3,iTab4,tan3,tan1,tan2,sqrt2)
383 : XMM_CLOBBERS("%xmm0", "%xmm1", "%xmm2", "%xmm3",
384 "%xmm4", "%xmm5", "%xmm6", "%xmm7", )
385#if ARCH_X86_64
386 XMM_CLOBBERS("%xmm8", "%xmm9", "%xmm10", "%xmm11",
387 "%xmm12", "%xmm13", "%xmm14", )
388#endif
389 "%eax", "%ecx", "%edx", "%esi", "memory");
390}
391
392void ff_xvid_idct_sse2_put(uint8_t *dest, int line_size, short *block)
393{
394 ff_xvid_idct_sse2(block);
395 ff_put_pixels_clamped_mmx(block, dest, line_size);
396}
397
398void ff_xvid_idct_sse2_add(uint8_t *dest, int line_size, short *block)
399{
400 ff_xvid_idct_sse2(block);
401 ff_add_pixels_clamped_mmx(block, dest, line_size);
402}
403
404#endif /* HAVE_SSE2_INLINE */
ffmpeg Piment Noir Debian package repository