PeerStreamer

/*

 * DSP utils

 * Copyright (c) 2000, 2001, 2002 Fabrice Bellard.

 *

 * This library is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Lesser General Public

 * License as published by the Free Software Foundation; either

 * version 2 of the License, or (at your option) any later version.

 *

 * This library is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

 * Lesser General Public License for more details.

 *

 * You should have received a copy of the GNU Lesser General Public

 * License along with this library; if not, write to the Free Software

 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

 */

/**

 * @file dsputil.h

 * DSP utils.

 */

#ifndef DSPUTIL_H

#define DSPUTIL_H

#include "common.h"

#include "avcodec.h"

//#define DEBUG

/* dct code */

typedef short DCTELEM;

//typedef int DCTELEM;

void fdct_ifast (DCTELEM *data);

void ff_jpeg_fdct_islow (DCTELEM *data);

void j_rev_dct (DCTELEM *data);

void ff_fdct_mmx(DCTELEM *block);

/* encoding scans */

extern const uint8_t ff_alternate_horizontal_scan[64];

extern const uint8_t ff_alternate_vertical_scan[64];

extern const uint8_t ff_zigzag_direct[64];

/* pixel operations */

#define MAX_NEG_CROP 384

/* temporary */

extern uint32_t squareTbl[512];

extern uint8_t cropTbl[256 + 2 * MAX_NEG_CROP];

/* minimum alignment rules ;)

if u notice errors in the align stuff, need more alignment for some asm code for some cpu

or need to use a function with less aligned data then send a mail to the ffmpeg-dev list, ...

!warning these alignments might not match reallity, (missing attribute((align)) stuff somewhere possible)

i (michael) didnt check them, these are just the alignents which i think could be reached easily ...

!future video codecs might need functions with less strict alignment

*/

/*

void get_pixels_c(DCTELEM *block, const uint8_t *pixels, int line_size);

void diff_pixels_c(DCTELEM *block, const uint8_t *s1, const uint8_t *s2, int stride);

void put_pixels_clamped_c(const DCTELEM *block, uint8_t *pixels, int line_size);

void add_pixels_clamped_c(const DCTELEM *block, uint8_t *pixels, int line_size);

void clear_blocks_c(DCTELEM *blocks);

*/

/* add and put pixel (decoding) */

// blocksizes for op_pixels_func are 8x4,8x8 16x8 16x16

typedef void (*op_pixels_func)(uint8_t *block/*align width (8 or 16)*/, const uint8_t *pixels/*align 1*/, int line_size, int h);

typedef void (*qpel_mc_func)(uint8_t *dst/*align width (8 or 16)*/, uint8_t *src/*align 1*/, int stride);

#define DEF_OLD_QPEL(name)\

void ff_put_        ## name (uint8_t *dst/*align width (8 or 16)*/, uint8_t *src/*align 1*/, int stride);\

void ff_put_no_rnd_ ## name (uint8_t *dst/*align width (8 or 16)*/, uint8_t *src/*align 1*/, int stride);\

void ff_avg_        ## name (uint8_t *dst/*align width (8 or 16)*/, uint8_t *src/*align 1*/, int stride);

DEF_OLD_QPEL(qpel16_mc11_old_c)

DEF_OLD_QPEL(qpel16_mc31_old_c)

DEF_OLD_QPEL(qpel16_mc12_old_c)

DEF_OLD_QPEL(qpel16_mc32_old_c)

DEF_OLD_QPEL(qpel16_mc13_old_c)

DEF_OLD_QPEL(qpel16_mc33_old_c)

DEF_OLD_QPEL(qpel8_mc11_old_c)

DEF_OLD_QPEL(qpel8_mc31_old_c)

DEF_OLD_QPEL(qpel8_mc12_old_c)

DEF_OLD_QPEL(qpel8_mc32_old_c)

DEF_OLD_QPEL(qpel8_mc13_old_c)

DEF_OLD_QPEL(qpel8_mc33_old_c)

#define CALL_2X_PIXELS(a, b, n)\

static void a(uint8_t *block, const uint8_t *pixels, int line_size, int h){\

    b(block  , pixels  , line_size, h);\

    b(block+n, pixels+n, line_size, h);\

}

/* motion estimation */

typedef int (*op_pixels_abs_func)(uint8_t *blk1/*align width (8 or 16)*/, uint8_t *blk2/*align 1*/, int line_size)/* __attribute__ ((const))*/;

typedef int (*me_cmp_func)(void /*MpegEncContext*/ *s, uint8_t *blk1/*align width (8 or 16)*/, uint8_t *blk2/*align 1*/, int line_size)/* __attribute__ ((const))*/;

/**

 * DSPContext.

 */

typedef struct DSPContext {

    /* pixel ops : interface with DCT */

    void (*get_pixels)(DCTELEM *block/*align 16*/, const uint8_t *pixels/*align 8*/, int line_size);

    void (*diff_pixels)(DCTELEM *block/*align 16*/, const uint8_t *s1/*align 8*/, const uint8_t *s2/*align 8*/, int stride);

    void (*put_pixels_clamped)(const DCTELEM *block/*align 16*/, uint8_t *pixels/*align 8*/, int line_size);

    void (*add_pixels_clamped)(const DCTELEM *block/*align 16*/, uint8_t *pixels/*align 8*/, int line_size);

    void (*gmc1)(uint8_t *dst/*align 8*/, uint8_t *src/*align 1*/, int srcStride, int h, int x16, int y16, int rounder);

    void (*gmc )(uint8_t *dst/*align 8*/, uint8_t *src/*align 1*/, int stride, int h, int ox, int oy,

                    int dxx, int dxy, int dyx, int dyy, int shift, int r, int width, int height);

    void (*clear_blocks)(DCTELEM *blocks/*align 16*/);

    int (*pix_sum)(uint8_t * pix, int line_size);

    int (*pix_norm1)(uint8_t * pix, int line_size);

    me_cmp_func sad[2]; /* identical to pix_absAxA except additional void * */

    me_cmp_func sse[2];

    me_cmp_func hadamard8_diff[2];

    me_cmp_func dct_sad[2];

    me_cmp_func quant_psnr[2];

    me_cmp_func bit[2];

    me_cmp_func rd[2];

    int (*hadamard8_abs )(uint8_t *src, int stride, int mean);

    me_cmp_func me_pre_cmp[11];

    me_cmp_func me_cmp[11];

    me_cmp_func me_sub_cmp[11];

    me_cmp_func mb_cmp[11];

    /* maybe create an array for 16/8 functions */

    op_pixels_func put_pixels_tab[2][4];

    op_pixels_func avg_pixels_tab[2][4];

    op_pixels_func put_no_rnd_pixels_tab[2][4];

    op_pixels_func avg_no_rnd_pixels_tab[2][4];

    qpel_mc_func put_qpel_pixels_tab[2][16];

    qpel_mc_func avg_qpel_pixels_tab[2][16];

    qpel_mc_func put_no_rnd_qpel_pixels_tab[2][16];

    qpel_mc_func avg_no_rnd_qpel_pixels_tab[2][16];

    qpel_mc_func put_mspel_pixels_tab[8];

    op_pixels_abs_func pix_abs16x16;

    op_pixels_abs_func pix_abs16x16_x2;

    op_pixels_abs_func pix_abs16x16_y2;

    op_pixels_abs_func pix_abs16x16_xy2;

    op_pixels_abs_func pix_abs8x8;

    op_pixels_abs_func pix_abs8x8_x2;

    op_pixels_abs_func pix_abs8x8_y2;

    op_pixels_abs_func pix_abs8x8_xy2;

    /* huffyuv specific */

    void (*add_bytes)(uint8_t *dst/*align 16*/, uint8_t *src/*align 16*/, int w);

    void (*diff_bytes)(uint8_t *dst/*align 16*/, uint8_t *src1/*align 16*/, uint8_t *src2/*align 1*/,int w);

    /* (I)DCT */

    void (*fdct)(DCTELEM *block/* align 16*/);

    /**

     * block -> idct -> clip to unsigned 8 bit -> dest.

     * (-1392, 0, 0, ...) -> idct -> (-174, -174, ...) -> put -> (0, 0, ...)

     * @param line_size size in pixels of a horizotal line of dest

     */

    void (*idct_put)(uint8_t *dest/*align 8*/, int line_size, DCTELEM *block/*align 16*/);

    /**

     * block -> idct -> add dest -> clip to unsigned 8 bit -> dest.

     * @param line_size size in pixels of a horizotal line of dest

     */

    void (*idct_add)(uint8_t *dest/*align 8*/, int line_size, DCTELEM *block/*align 16*/);

    /**

     * idct input permutation.

     * an example to avoid confusion:

     * - (->decode coeffs -> zigzag reorder -> dequant -> reference idct ->...)

     * - (x -> referece dct -> reference idct -> x)

     * - (x -> referece dct -> simple_mmx_perm = idct_permutation -> simple_idct_mmx -> x)

     * - (->decode coeffs -> zigzag reorder -> simple_mmx_perm -> dequant -> simple_idct_mmx ->...)

     */

    uint8_t idct_permutation[64];

    int idct_permutation_type;

#define FF_NO_IDCT_PERM 1

#define FF_LIBMPEG2_IDCT_PERM 2

#define FF_SIMPLE_IDCT_PERM 3

#define FF_TRANSPOSE_IDCT_PERM 4

} DSPContext;

void dsputil_init(DSPContext* p, AVCodecContext *avctx);

/**

 * permute block according to permuatation.

 * @param last last non zero element in scantable order

 */

void ff_block_permute(DCTELEM *block, uint8_t *permutation, const uint8_t *scantable, int last);

/**

 * Empty mmx state.

 * this must be called between any dsp function and float/double code.

 * for example sin(); dsp->idct_put(); emms_c(); cos()

 */

#define emms_c()

/* should be defined by architectures supporting

   one or more MultiMedia extension */

int mm_support(void);

#if defined(HAVE_MMX)

#undef emms_c

#define MM_MMX    0x0001 /* standard MMX */

#define MM_3DNOW  0x0004 /* AMD 3DNOW */

#define MM_MMXEXT 0x0002 /* SSE integer functions or AMD MMX ext */

#define MM_SSE    0x0008 /* SSE functions */

#define MM_SSE2   0x0010 /* PIV SSE2 functions */

extern int mm_flags;

void add_pixels_clamped_mmx(const DCTELEM *block, uint8_t *pixels, int line_size);

void put_pixels_clamped_mmx(const DCTELEM *block, uint8_t *pixels, int line_size);

static inline void emms(void)

{

    __asm __volatile ("emms;":::"memory");

}

#define emms_c() \

{\

    if (mm_flags & MM_MMX)\

        emms();\

}

#define __align8 __attribute__ ((aligned (8)))

void dsputil_init_mmx(DSPContext* c, AVCodecContext *avctx);

void dsputil_init_pix_mmx(DSPContext* c, AVCodecContext *avctx);

#elif defined(ARCH_ARMV4L)

/* This is to use 4 bytes read to the IDCT pointers for some 'zero'

   line ptimizations */

#define __align8 __attribute__ ((aligned (4)))

void dsputil_init_armv4l(DSPContext* c, AVCodecContext *avctx);

#elif defined(HAVE_MLIB)

/* SPARC/VIS IDCT needs 8-byte aligned DCT blocks */

#define __align8 __attribute__ ((aligned (8)))

void dsputil_init_mlib(DSPContext* c, AVCodecContext *avctx);

#elif defined(ARCH_ALPHA)

#define __align8 __attribute__ ((aligned (8)))

void dsputil_init_alpha(DSPContext* c, AVCodecContext *avctx);

#elif defined(ARCH_POWERPC)

#define MM_ALTIVEC    0x0001 /* standard AltiVec */

extern int mm_flags;

#if defined(HAVE_ALTIVEC) && !defined(CONFIG_DARWIN)

#include <altivec.h>

#endif

#define __align8 __attribute__ ((aligned (16)))

void dsputil_init_ppc(DSPContext* c, AVCodecContext *avctx);

#elif defined(HAVE_MMI)

#define __align8 __attribute__ ((aligned (16)))

void dsputil_init_mmi(DSPContext* c, AVCodecContext *avctx);

#else

#define __align8

#endif

#ifdef __GNUC__

struct unaligned_64 { uint64_t l; } __attribute__((packed));

struct unaligned_32 { uint32_t l; } __attribute__((packed));

#define LD32(a) (((const struct unaligned_32 *) (a))->l)

#define LD64(a) (((const struct unaligned_64 *) (a))->l)

#define ST32(a, b) (((struct unaligned_32 *) (a))->l) = (b)

#else /* __GNUC__ */

#define LD32(a) (*((uint32_t*)(a)))

#define LD64(a) (*((uint64_t*)(a)))

#define ST32(a, b) *((uint32_t*)(a)) = (b)

#endif /* !__GNUC__ */

/* PSNR */

void get_psnr(uint8_t *orig_image[3], uint8_t *coded_image[3],

              int orig_linesize[3], int coded_linesize,

              AVCodecContext *avctx);

/* FFT computation */

/* NOTE: soon integer code will be added, so you must use the

   FFTSample type */

typedef float FFTSample;

typedef struct FFTComplex {

    FFTSample re, im;

} FFTComplex;

typedef struct FFTContext {

    int nbits;

    int inverse;

    uint16_t *revtab;

    FFTComplex *exptab;

    FFTComplex *exptab1; /* only used by SSE code */

    void (*fft_calc)(struct FFTContext *s, FFTComplex *z);

} FFTContext;

int fft_init(FFTContext *s, int nbits, int inverse);

void fft_permute(FFTContext *s, FFTComplex *z);

void fft_calc_c(FFTContext *s, FFTComplex *z);

void fft_calc_sse(FFTContext *s, FFTComplex *z);

void fft_calc_altivec(FFTContext *s, FFTComplex *z);

static inline void fft_calc(FFTContext *s, FFTComplex *z)

{

    s->fft_calc(s, z);

}

void fft_end(FFTContext *s);

/* MDCT computation */

typedef struct MDCTContext {

    int n;  /* size of MDCT (i.e. number of input data * 2) */

    int nbits; /* n = 2^nbits */

    /* pre/post rotation tables */

    FFTSample *tcos;

    FFTSample *tsin;

    FFTContext fft;

} MDCTContext;

int ff_mdct_init(MDCTContext *s, int nbits, int inverse);

void ff_imdct_calc(MDCTContext *s, FFTSample *output,

                const FFTSample *input, FFTSample *tmp);

void ff_mdct_calc(MDCTContext *s, FFTSample *out,

               const FFTSample *input, FFTSample *tmp);

void ff_mdct_end(MDCTContext *s);

#define WARPER88_1616(name8, name16)\

static int name16(void /*MpegEncContext*/ *s, uint8_t *dst, uint8_t *src, int stride){\

    return name8(s, dst           , src           , stride)\

          +name8(s, dst+8         , src+8         , stride)\

          +name8(s, dst  +8*stride, src  +8*stride, stride)\

          +name8(s, dst+8+8*stride, src+8+8*stride, stride);\

}

#ifndef HAVE_LRINTF

/* XXX: add ISOC specific test to avoid specific BSD testing. */

/* better than nothing implementation. */

/* btw, rintf() is existing on fbsd too -- alex */

static inline long int lrintf(float x)

{

#ifdef CONFIG_WIN32

    /* XXX: incorrect, but make it compile */

    return (int)(x);

#else

    return (int)(rint(x));

#endif

}

#endif

#endif