interlaced motion estimation
[libav.git] / libavcodec / dsputil.h
1 /*
2 * DSP utils
3 * Copyright (c) 2000, 2001, 2002 Fabrice Bellard.
4 *
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
9 *
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
14 *
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18 */
19
20 /**
21 * @file dsputil.h
22 * DSP utils.
23 * note, many functions in here may use MMX which trashes the FPU state, it is
24 * absolutely necessary to call emms_c() between dsp & float/double code
25 */
26
27 #ifndef DSPUTIL_H
28 #define DSPUTIL_H
29
30 #include "common.h"
31 #include "avcodec.h"
32
33
34 //#define DEBUG
35 /* dct code */
36 typedef short DCTELEM;
37
38 void fdct_ifast (DCTELEM *data);
39 void fdct_ifast248 (DCTELEM *data);
40 void ff_jpeg_fdct_islow (DCTELEM *data);
41 void ff_fdct248_islow (DCTELEM *data);
42
43 void j_rev_dct (DCTELEM *data);
44
45 void ff_fdct_mmx(DCTELEM *block);
46 void ff_fdct_mmx2(DCTELEM *block);
47
48 /* encoding scans */
49 extern const uint8_t ff_alternate_horizontal_scan[64];
50 extern const uint8_t ff_alternate_vertical_scan[64];
51 extern const uint8_t ff_zigzag_direct[64];
52 extern const uint8_t ff_zigzag248_direct[64];
53
54 /* pixel operations */
55 #define MAX_NEG_CROP 384
56
57 /* temporary */
58 extern uint32_t squareTbl[512];
59 extern uint8_t cropTbl[256 + 2 * MAX_NEG_CROP];
60
61
62 /* minimum alignment rules ;)
63 if u notice errors in the align stuff, need more alignment for some asm code for some cpu
64 or need to use a function with less aligned data then send a mail to the ffmpeg-dev list, ...
65
66 !warning these alignments might not match reallity, (missing attribute((align)) stuff somewhere possible)
67 i (michael) didnt check them, these are just the alignents which i think could be reached easily ...
68
69 !future video codecs might need functions with less strict alignment
70 */
71
72 /*
73 void get_pixels_c(DCTELEM *block, const uint8_t *pixels, int line_size);
74 void diff_pixels_c(DCTELEM *block, const uint8_t *s1, const uint8_t *s2, int stride);
75 void put_pixels_clamped_c(const DCTELEM *block, uint8_t *pixels, int line_size);
76 void add_pixels_clamped_c(const DCTELEM *block, uint8_t *pixels, int line_size);
77 void clear_blocks_c(DCTELEM *blocks);
78 */
79
80 /* add and put pixel (decoding) */
81 // blocksizes for op_pixels_func are 8x4,8x8 16x8 16x16
82 typedef void (*op_pixels_func)(uint8_t *block/*align width (8 or 16)*/, const uint8_t *pixels/*align 1*/, int line_size, int h);
83 typedef void (*tpel_mc_func)(uint8_t *block/*align width (8 or 16)*/, const uint8_t *pixels/*align 1*/, int line_size, int w, int h);
84 typedef void (*qpel_mc_func)(uint8_t *dst/*align width (8 or 16)*/, uint8_t *src/*align 1*/, int stride);
85 typedef void (*h264_chroma_mc_func)(uint8_t *dst/*align 8*/, uint8_t *src/*align 1*/, int srcStride, int h, int x, int y);
86
87 #define DEF_OLD_QPEL(name)\
88 void ff_put_ ## name (uint8_t *dst/*align width (8 or 16)*/, uint8_t *src/*align 1*/, int stride);\
89 void ff_put_no_rnd_ ## name (uint8_t *dst/*align width (8 or 16)*/, uint8_t *src/*align 1*/, int stride);\
90 void ff_avg_ ## name (uint8_t *dst/*align width (8 or 16)*/, uint8_t *src/*align 1*/, int stride);
91
92 DEF_OLD_QPEL(qpel16_mc11_old_c)
93 DEF_OLD_QPEL(qpel16_mc31_old_c)
94 DEF_OLD_QPEL(qpel16_mc12_old_c)
95 DEF_OLD_QPEL(qpel16_mc32_old_c)
96 DEF_OLD_QPEL(qpel16_mc13_old_c)
97 DEF_OLD_QPEL(qpel16_mc33_old_c)
98 DEF_OLD_QPEL(qpel8_mc11_old_c)
99 DEF_OLD_QPEL(qpel8_mc31_old_c)
100 DEF_OLD_QPEL(qpel8_mc12_old_c)
101 DEF_OLD_QPEL(qpel8_mc32_old_c)
102 DEF_OLD_QPEL(qpel8_mc13_old_c)
103 DEF_OLD_QPEL(qpel8_mc33_old_c)
104
105 #define CALL_2X_PIXELS(a, b, n)\
106 static void a(uint8_t *block, const uint8_t *pixels, int line_size, int h){\
107 b(block , pixels , line_size, h);\
108 b(block+n, pixels+n, line_size, h);\
109 }
110
111 /* motion estimation */
112
113 typedef int (*me_cmp_func)(void /*MpegEncContext*/ *s, uint8_t *blk1/*align width (8 or 16)*/, uint8_t *blk2/*align 1*/, int line_size, int h)/* __attribute__ ((const))*/;
114
115
116 /**
117 * DSPContext.
118 */
119 typedef struct DSPContext {
120 /* pixel ops : interface with DCT */
121 void (*get_pixels)(DCTELEM *block/*align 16*/, const uint8_t *pixels/*align 8*/, int line_size);
122 void (*diff_pixels)(DCTELEM *block/*align 16*/, const uint8_t *s1/*align 8*/, const uint8_t *s2/*align 8*/, int stride);
123 void (*put_pixels_clamped)(const DCTELEM *block/*align 16*/, uint8_t *pixels/*align 8*/, int line_size);
124 void (*add_pixels_clamped)(const DCTELEM *block/*align 16*/, uint8_t *pixels/*align 8*/, int line_size);
125 /**
126 * translational global motion compensation.
127 */
128 void (*gmc1)(uint8_t *dst/*align 8*/, uint8_t *src/*align 1*/, int srcStride, int h, int x16, int y16, int rounder);
129 /**
130 * global motion compensation.
131 */
132 void (*gmc )(uint8_t *dst/*align 8*/, uint8_t *src/*align 1*/, int stride, int h, int ox, int oy,
133 int dxx, int dxy, int dyx, int dyy, int shift, int r, int width, int height);
134 void (*clear_blocks)(DCTELEM *blocks/*align 16*/);
135 int (*pix_sum)(uint8_t * pix, int line_size);
136 int (*pix_norm1)(uint8_t * pix, int line_size);
137 // 16x16 8x8 4x4 2x2 16x8 8x4 4x2 8x16 4x8 2x4
138
139 me_cmp_func sad[4]; /* identical to pix_absAxA except additional void * */
140 me_cmp_func sse[4];
141 me_cmp_func hadamard8_diff[4];
142 me_cmp_func dct_sad[4];
143 me_cmp_func quant_psnr[4];
144 me_cmp_func bit[4];
145 me_cmp_func rd[4];
146 int (*hadamard8_abs )(uint8_t *src, int stride, int mean);
147
148 me_cmp_func me_pre_cmp[5];
149 me_cmp_func me_cmp[5];
150 me_cmp_func me_sub_cmp[5];
151 me_cmp_func mb_cmp[5];
152
153 /* maybe create an array for 16/8/4/2 functions */
154 /**
155 * Halfpel motion compensation with rounding (a+b+1)>>1.
156 * this is an array[4][4] of motion compensation funcions for 4
157 * horizontal blocksizes (2,4,8,16) and the 4 halfpel positions<br>
158 * *pixels_tab[ 0->16xH 1->8xH ][ xhalfpel + 2*yhalfpel ]
159 * @param block destination where the result is stored
160 * @param pixels source
161 * @param line_size number of bytes in a horizontal line of block
162 * @param h height
163 */
164 op_pixels_func put_pixels_tab[4][4];
165
166 /**
167 * Halfpel motion compensation with rounding (a+b+1)>>1.
168 * This is an array[4][4] of motion compensation functions for 4
169 * horizontal blocksizes (2,4,8,16) and the 4 halfpel positions<br>
170 * *pixels_tab[ 0->16xH 1->8xH ][ xhalfpel + 2*yhalfpel ]
171 * @param block destination into which the result is averaged (a+b+1)>>1
172 * @param pixels source
173 * @param line_size number of bytes in a horizontal line of block
174 * @param h height
175 */
176 op_pixels_func avg_pixels_tab[4][4];
177
178 /**
179 * Halfpel motion compensation with no rounding (a+b)>>1.
180 * this is an array[2][4] of motion compensation funcions for 2
181 * horizontal blocksizes (8,16) and the 4 halfpel positions<br>
182 * *pixels_tab[ 0->16xH 1->8xH ][ xhalfpel + 2*yhalfpel ]
183 * @param block destination where the result is stored
184 * @param pixels source
185 * @param line_size number of bytes in a horizontal line of block
186 * @param h height
187 */
188 op_pixels_func put_no_rnd_pixels_tab[2][4];
189
190 /**
191 * Halfpel motion compensation with no rounding (a+b)>>1.
192 * this is an array[2][4] of motion compensation funcions for 2
193 * horizontal blocksizes (8,16) and the 4 halfpel positions<br>
194 * *pixels_tab[ 0->16xH 1->8xH ][ xhalfpel + 2*yhalfpel ]
195 * @param block destination into which the result is averaged (a+b)>>1
196 * @param pixels source
197 * @param line_size number of bytes in a horizontal line of block
198 * @param h height
199 */
200 op_pixels_func avg_no_rnd_pixels_tab[2][4];
201
202 /**
203 * Thirdpel motion compensation with rounding (a+b+1)>>1.
204 * this is an array[12] of motion compensation funcions for the 9 thirdpel positions<br>
205 * *pixels_tab[ xthirdpel + 4*ythirdpel ]
206 * @param block destination where the result is stored
207 * @param pixels source
208 * @param line_size number of bytes in a horizontal line of block
209 * @param h height
210 */
211 tpel_mc_func put_tpel_pixels_tab[11]; //FIXME individual func ptr per width?
212 tpel_mc_func avg_tpel_pixels_tab[11]; //FIXME individual func ptr per width?
213
214 qpel_mc_func put_qpel_pixels_tab[2][16];
215 qpel_mc_func avg_qpel_pixels_tab[2][16];
216 qpel_mc_func put_no_rnd_qpel_pixels_tab[2][16];
217 qpel_mc_func avg_no_rnd_qpel_pixels_tab[2][16];
218 qpel_mc_func put_mspel_pixels_tab[8];
219
220 /**
221 * h264 Chram MC
222 */
223 h264_chroma_mc_func put_h264_chroma_pixels_tab[3];
224 h264_chroma_mc_func avg_h264_chroma_pixels_tab[3];
225
226 qpel_mc_func put_h264_qpel_pixels_tab[3][16];
227 qpel_mc_func avg_h264_qpel_pixels_tab[3][16];
228
229 me_cmp_func pix_abs[2][4];
230
231 /* huffyuv specific */
232 void (*add_bytes)(uint8_t *dst/*align 16*/, uint8_t *src/*align 16*/, int w);
233 void (*diff_bytes)(uint8_t *dst/*align 16*/, uint8_t *src1/*align 16*/, uint8_t *src2/*align 1*/,int w);
234 /**
235 * subtract huffyuv's variant of median prediction
236 * note, this might read from src1[-1], src2[-1]
237 */
238 void (*sub_hfyu_median_prediction)(uint8_t *dst, uint8_t *src1, uint8_t *src2, int w, int *left, int *left_top);
239 void (*bswap_buf)(uint32_t *dst, uint32_t *src, int w);
240
241 void (*h263_v_loop_filter)(uint8_t *src, int stride, int qscale);
242 void (*h263_h_loop_filter)(uint8_t *src, int stride, int qscale);
243
244 /* (I)DCT */
245 void (*fdct)(DCTELEM *block/* align 16*/);
246 void (*fdct248)(DCTELEM *block/* align 16*/);
247
248 /* IDCT really*/
249 void (*idct)(DCTELEM *block/* align 16*/);
250
251 /**
252 * block -> idct -> clip to unsigned 8 bit -> dest.
253 * (-1392, 0, 0, ...) -> idct -> (-174, -174, ...) -> put -> (0, 0, ...)
254 * @param line_size size in bytes of a horizotal line of dest
255 */
256 void (*idct_put)(uint8_t *dest/*align 8*/, int line_size, DCTELEM *block/*align 16*/);
257
258 /**
259 * block -> idct -> add dest -> clip to unsigned 8 bit -> dest.
260 * @param line_size size in bytes of a horizotal line of dest
261 */
262 void (*idct_add)(uint8_t *dest/*align 8*/, int line_size, DCTELEM *block/*align 16*/);
263
264 /**
265 * idct input permutation.
266 * several optimized IDCTs need a permutated input (relative to the normal order of the reference
267 * IDCT)
268 * this permutation must be performed before the idct_put/add, note, normally this can be merged
269 * with the zigzag/alternate scan<br>
270 * an example to avoid confusion:
271 * - (->decode coeffs -> zigzag reorder -> dequant -> reference idct ->...)
272 * - (x -> referece dct -> reference idct -> x)
273 * - (x -> referece dct -> simple_mmx_perm = idct_permutation -> simple_idct_mmx -> x)
274 * - (->decode coeffs -> zigzag reorder -> simple_mmx_perm -> dequant -> simple_idct_mmx ->...)
275 */
276 uint8_t idct_permutation[64];
277 int idct_permutation_type;
278 #define FF_NO_IDCT_PERM 1
279 #define FF_LIBMPEG2_IDCT_PERM 2
280 #define FF_SIMPLE_IDCT_PERM 3
281 #define FF_TRANSPOSE_IDCT_PERM 4
282
283 } DSPContext;
284
285 void dsputil_static_init(void);
286 void dsputil_init(DSPContext* p, AVCodecContext *avctx);
287
288 /**
289 * permute block according to permuatation.
290 * @param last last non zero element in scantable order
291 */
292 void ff_block_permute(DCTELEM *block, uint8_t *permutation, const uint8_t *scantable, int last);
293
294 #define BYTE_VEC32(c) ((c)*0x01010101UL)
295
296 static inline uint32_t rnd_avg32(uint32_t a, uint32_t b)
297 {
298 return (a | b) - (((a ^ b) & ~BYTE_VEC32(0x01)) >> 1);
299 }
300
301 static inline uint32_t no_rnd_avg32(uint32_t a, uint32_t b)
302 {
303 return (a & b) + (((a ^ b) & ~BYTE_VEC32(0x01)) >> 1);
304 }
305
306 /**
307 * Empty mmx state.
308 * this must be called between any dsp function and float/double code.
309 * for example sin(); dsp->idct_put(); emms_c(); cos()
310 */
311 #define emms_c()
312
313 /* should be defined by architectures supporting
314 one or more MultiMedia extension */
315 int mm_support(void);
316
317 #if defined(HAVE_MMX)
318
319 #undef emms_c
320
321 #define MM_MMX 0x0001 /* standard MMX */
322 #define MM_3DNOW 0x0004 /* AMD 3DNOW */
323 #define MM_MMXEXT 0x0002 /* SSE integer functions or AMD MMX ext */
324 #define MM_SSE 0x0008 /* SSE functions */
325 #define MM_SSE2 0x0010 /* PIV SSE2 functions */
326
327 extern int mm_flags;
328
329 void add_pixels_clamped_mmx(const DCTELEM *block, uint8_t *pixels, int line_size);
330 void put_pixels_clamped_mmx(const DCTELEM *block, uint8_t *pixels, int line_size);
331
332 static inline void emms(void)
333 {
334 __asm __volatile ("emms;":::"memory");
335 }
336
337
338 #define emms_c() \
339 {\
340 if (mm_flags & MM_MMX)\
341 emms();\
342 }
343
344 #define __align8 __attribute__ ((aligned (8)))
345
346 void dsputil_init_mmx(DSPContext* c, AVCodecContext *avctx);
347 void dsputil_init_pix_mmx(DSPContext* c, AVCodecContext *avctx);
348
349 #elif defined(ARCH_ARMV4L)
350
351 /* This is to use 4 bytes read to the IDCT pointers for some 'zero'
352 line ptimizations */
353 #define __align8 __attribute__ ((aligned (4)))
354
355 void dsputil_init_armv4l(DSPContext* c, AVCodecContext *avctx);
356
357 #elif defined(HAVE_MLIB)
358
359 /* SPARC/VIS IDCT needs 8-byte aligned DCT blocks */
360 #define __align8 __attribute__ ((aligned (8)))
361
362 void dsputil_init_mlib(DSPContext* c, AVCodecContext *avctx);
363
364 #elif defined(ARCH_ALPHA)
365
366 #define __align8 __attribute__ ((aligned (8)))
367
368 void dsputil_init_alpha(DSPContext* c, AVCodecContext *avctx);
369
370 #elif defined(ARCH_POWERPC)
371
372 #define MM_ALTIVEC 0x0001 /* standard AltiVec */
373
374 extern int mm_flags;
375
376 #if defined(HAVE_ALTIVEC) && !defined(CONFIG_DARWIN)
377 #define pixel altivec_pixel
378 #include <altivec.h>
379 #undef pixel
380 #endif
381
382 #define __align8 __attribute__ ((aligned (16)))
383
384 void dsputil_init_ppc(DSPContext* c, AVCodecContext *avctx);
385
386 #elif defined(HAVE_MMI)
387
388 #define __align8 __attribute__ ((aligned (16)))
389
390 void dsputil_init_mmi(DSPContext* c, AVCodecContext *avctx);
391
392 #elif defined(ARCH_SH4)
393
394 #define __align8 __attribute__ ((aligned (8)))
395
396 void dsputil_init_sh4(DSPContext* c, AVCodecContext *avctx);
397
398 #else
399
400 #define __align8
401
402 #endif
403
404 #ifdef __GNUC__
405
406 struct unaligned_64 { uint64_t l; } __attribute__((packed));
407 struct unaligned_32 { uint32_t l; } __attribute__((packed));
408 struct unaligned_16 { uint16_t l; } __attribute__((packed));
409
410 #define LD16(a) (((const struct unaligned_16 *) (a))->l)
411 #define LD32(a) (((const struct unaligned_32 *) (a))->l)
412 #define LD64(a) (((const struct unaligned_64 *) (a))->l)
413
414 #define ST32(a, b) (((struct unaligned_32 *) (a))->l) = (b)
415
416 #else /* __GNUC__ */
417
418 #define LD16(a) (*((uint16_t*)(a)))
419 #define LD32(a) (*((uint32_t*)(a)))
420 #define LD64(a) (*((uint64_t*)(a)))
421
422 #define ST32(a, b) *((uint32_t*)(a)) = (b)
423
424 #endif /* !__GNUC__ */
425
426 /* PSNR */
427 void get_psnr(uint8_t *orig_image[3], uint8_t *coded_image[3],
428 int orig_linesize[3], int coded_linesize,
429 AVCodecContext *avctx);
430
431 /* FFT computation */
432
433 /* NOTE: soon integer code will be added, so you must use the
434 FFTSample type */
435 typedef float FFTSample;
436
437 typedef struct FFTComplex {
438 FFTSample re, im;
439 } FFTComplex;
440
441 typedef struct FFTContext {
442 int nbits;
443 int inverse;
444 uint16_t *revtab;
445 FFTComplex *exptab;
446 FFTComplex *exptab1; /* only used by SSE code */
447 void (*fft_calc)(struct FFTContext *s, FFTComplex *z);
448 } FFTContext;
449
450 int fft_init(FFTContext *s, int nbits, int inverse);
451 void fft_permute(FFTContext *s, FFTComplex *z);
452 void fft_calc_c(FFTContext *s, FFTComplex *z);
453 void fft_calc_sse(FFTContext *s, FFTComplex *z);
454 void fft_calc_altivec(FFTContext *s, FFTComplex *z);
455
456 static inline void fft_calc(FFTContext *s, FFTComplex *z)
457 {
458 s->fft_calc(s, z);
459 }
460 void fft_end(FFTContext *s);
461
462 /* MDCT computation */
463
464 typedef struct MDCTContext {
465 int n; /* size of MDCT (i.e. number of input data * 2) */
466 int nbits; /* n = 2^nbits */
467 /* pre/post rotation tables */
468 FFTSample *tcos;
469 FFTSample *tsin;
470 FFTContext fft;
471 } MDCTContext;
472
473 int ff_mdct_init(MDCTContext *s, int nbits, int inverse);
474 void ff_imdct_calc(MDCTContext *s, FFTSample *output,
475 const FFTSample *input, FFTSample *tmp);
476 void ff_mdct_calc(MDCTContext *s, FFTSample *out,
477 const FFTSample *input, FFTSample *tmp);
478 void ff_mdct_end(MDCTContext *s);
479
480 #define WARPER8_16(name8, name16)\
481 static int name16(void /*MpegEncContext*/ *s, uint8_t *dst, uint8_t *src, int stride, int h){\
482 return name8(s, dst , src , stride, h)\
483 +name8(s, dst+8 , src+8 , stride, h);\
484 }
485
486 #define WARPER8_16_SQ(name8, name16)\
487 static int name16(void /*MpegEncContext*/ *s, uint8_t *dst, uint8_t *src, int stride, int h){\
488 int score=0;\
489 score +=name8(s, dst , src , stride, 8);\
490 score +=name8(s, dst+8 , src+8 , stride, 8);\
491 if(h==16){\
492 dst += 8*stride;\
493 src += 8*stride;\
494 score +=name8(s, dst , src , stride, 8);\
495 score +=name8(s, dst+8 , src+8 , stride, 8);\
496 }\
497 return score;\
498 }
499
500 #ifndef HAVE_LRINTF
501 /* XXX: add ISOC specific test to avoid specific BSD testing. */
502 /* better than nothing implementation. */
503 /* btw, rintf() is existing on fbsd too -- alex */
504 static inline long int lrintf(float x)
505 {
506 #ifdef CONFIG_WIN32
507 /* XXX: incorrect, but make it compile */
508 return (int)(x);
509 #else
510 return (int)(rint(x));
511 #endif
512 }
513 #endif
514
515 #endif