Mercurial > mplayer.hg
view libmpcodecs/vf_hqdn3d.c @ 32277:ba416e78c273
Remove some unnecessary windows.h #includes in configure checks.
author | diego |
---|---|
date | Sun, 26 Sep 2010 18:22:06 +0000 |
parents | a972c1a4a012 |
children | 8fa2f43cb760 |
line wrap: on
line source
/* * Copyright (C) 2003 Daniel Moreno <comac@comac.darktech.org> * * This file is part of MPlayer. * * MPlayer is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * MPlayer 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 General Public License for more details. * * You should have received a copy of the GNU General Public License along * with MPlayer; if not, write to the Free Software Foundation, Inc., * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. */ #include <stdio.h> #include <stdlib.h> #include <string.h> #include <inttypes.h> #include <math.h> #include "mp_msg.h" #include "img_format.h" #include "mp_image.h" #include "vf.h" #define PARAM1_DEFAULT 4.0 #define PARAM2_DEFAULT 3.0 #define PARAM3_DEFAULT 6.0 //===========================================================================// struct vf_priv_s { int Coefs[4][512*16]; unsigned int *Line; unsigned short *Frame[3]; }; /***************************************************************************/ static void uninit(struct vf_instance *vf){ if(vf->priv->Line){free(vf->priv->Line);vf->priv->Line=NULL;} if(vf->priv->Frame[0]){free(vf->priv->Frame[0]);vf->priv->Frame[0]=NULL;} if(vf->priv->Frame[1]){free(vf->priv->Frame[1]);vf->priv->Frame[1]=NULL;} if(vf->priv->Frame[2]){free(vf->priv->Frame[2]);vf->priv->Frame[2]=NULL;} } static int config(struct vf_instance *vf, int width, int height, int d_width, int d_height, unsigned int flags, unsigned int outfmt){ uninit(vf); vf->priv->Line = malloc(width*sizeof(int)); return vf_next_config(vf,width,height,d_width,d_height,flags,outfmt); } static inline unsigned int LowPassMul(unsigned int PrevMul, unsigned int CurrMul, int* Coef){ // int dMul= (PrevMul&0xFFFFFF)-(CurrMul&0xFFFFFF); int dMul= PrevMul-CurrMul; unsigned int d=((dMul+0x10007FF)>>12); return CurrMul + Coef[d]; } static void deNoiseTemporal( unsigned char *Frame, // mpi->planes[x] unsigned char *FrameDest, // dmpi->planes[x] unsigned short *FrameAnt, int W, int H, int sStride, int dStride, int *Temporal) { long X, Y; unsigned int PixelDst; for (Y = 0; Y < H; Y++){ for (X = 0; X < W; X++){ PixelDst = LowPassMul(FrameAnt[X]<<8, Frame[X]<<16, Temporal); FrameAnt[X] = ((PixelDst+0x1000007F)>>8); FrameDest[X]= ((PixelDst+0x10007FFF)>>16); } Frame += sStride; FrameDest += dStride; FrameAnt += W; } } static void deNoiseSpacial( unsigned char *Frame, // mpi->planes[x] unsigned char *FrameDest, // dmpi->planes[x] unsigned int *LineAnt, // vf->priv->Line (width bytes) int W, int H, int sStride, int dStride, int *Horizontal, int *Vertical) { long X, Y; long sLineOffs = 0, dLineOffs = 0; unsigned int PixelAnt; unsigned int PixelDst; /* First pixel has no left nor top neighbor. */ PixelDst = LineAnt[0] = PixelAnt = Frame[0]<<16; FrameDest[0]= ((PixelDst+0x10007FFF)>>16); /* First line has no top neighbor, only left. */ for (X = 1; X < W; X++){ PixelDst = LineAnt[X] = LowPassMul(PixelAnt, Frame[X]<<16, Horizontal); FrameDest[X]= ((PixelDst+0x10007FFF)>>16); } for (Y = 1; Y < H; Y++){ unsigned int PixelAnt; sLineOffs += sStride, dLineOffs += dStride; /* First pixel on each line doesn't have previous pixel */ PixelAnt = Frame[sLineOffs]<<16; PixelDst = LineAnt[0] = LowPassMul(LineAnt[0], PixelAnt, Vertical); FrameDest[dLineOffs]= ((PixelDst+0x10007FFF)>>16); for (X = 1; X < W; X++){ unsigned int PixelDst; /* The rest are normal */ PixelAnt = LowPassMul(PixelAnt, Frame[sLineOffs+X]<<16, Horizontal); PixelDst = LineAnt[X] = LowPassMul(LineAnt[X], PixelAnt, Vertical); FrameDest[dLineOffs+X]= ((PixelDst+0x10007FFF)>>16); } } } static void deNoise(unsigned char *Frame, // mpi->planes[x] unsigned char *FrameDest, // dmpi->planes[x] unsigned int *LineAnt, // vf->priv->Line (width bytes) unsigned short **FrameAntPtr, int W, int H, int sStride, int dStride, int *Horizontal, int *Vertical, int *Temporal) { long X, Y; long sLineOffs = 0, dLineOffs = 0; unsigned int PixelAnt; unsigned int PixelDst; unsigned short* FrameAnt=(*FrameAntPtr); if(!FrameAnt){ (*FrameAntPtr)=FrameAnt=malloc(W*H*sizeof(unsigned short)); for (Y = 0; Y < H; Y++){ unsigned short* dst=&FrameAnt[Y*W]; unsigned char* src=Frame+Y*sStride; for (X = 0; X < W; X++) dst[X]=src[X]<<8; } } if(!Horizontal[0] && !Vertical[0]){ deNoiseTemporal(Frame, FrameDest, FrameAnt, W, H, sStride, dStride, Temporal); return; } if(!Temporal[0]){ deNoiseSpacial(Frame, FrameDest, LineAnt, W, H, sStride, dStride, Horizontal, Vertical); return; } /* First pixel has no left nor top neighbor. Only previous frame */ LineAnt[0] = PixelAnt = Frame[0]<<16; PixelDst = LowPassMul(FrameAnt[0]<<8, PixelAnt, Temporal); FrameAnt[0] = ((PixelDst+0x1000007F)>>8); FrameDest[0]= ((PixelDst+0x10007FFF)>>16); /* First line has no top neighbor. Only left one for each pixel and * last frame */ for (X = 1; X < W; X++){ LineAnt[X] = PixelAnt = LowPassMul(PixelAnt, Frame[X]<<16, Horizontal); PixelDst = LowPassMul(FrameAnt[X]<<8, PixelAnt, Temporal); FrameAnt[X] = ((PixelDst+0x1000007F)>>8); FrameDest[X]= ((PixelDst+0x10007FFF)>>16); } for (Y = 1; Y < H; Y++){ unsigned int PixelAnt; unsigned short* LinePrev=&FrameAnt[Y*W]; sLineOffs += sStride, dLineOffs += dStride; /* First pixel on each line doesn't have previous pixel */ PixelAnt = Frame[sLineOffs]<<16; LineAnt[0] = LowPassMul(LineAnt[0], PixelAnt, Vertical); PixelDst = LowPassMul(LinePrev[0]<<8, LineAnt[0], Temporal); LinePrev[0] = ((PixelDst+0x1000007F)>>8); FrameDest[dLineOffs]= ((PixelDst+0x10007FFF)>>16); for (X = 1; X < W; X++){ unsigned int PixelDst; /* The rest are normal */ PixelAnt = LowPassMul(PixelAnt, Frame[sLineOffs+X]<<16, Horizontal); LineAnt[X] = LowPassMul(LineAnt[X], PixelAnt, Vertical); PixelDst = LowPassMul(LinePrev[X]<<8, LineAnt[X], Temporal); LinePrev[X] = ((PixelDst+0x1000007F)>>8); FrameDest[dLineOffs+X]= ((PixelDst+0x10007FFF)>>16); } } } static int put_image(struct vf_instance *vf, mp_image_t *mpi, double pts){ int cw= mpi->w >> mpi->chroma_x_shift; int ch= mpi->h >> mpi->chroma_y_shift; int W = mpi->w, H = mpi->h; mp_image_t *dmpi=vf_get_image(vf->next,mpi->imgfmt, MP_IMGTYPE_TEMP, MP_IMGFLAG_ACCEPT_STRIDE, mpi->w,mpi->h); if(!dmpi) return 0; deNoise(mpi->planes[0], dmpi->planes[0], vf->priv->Line, &vf->priv->Frame[0], W, H, mpi->stride[0], dmpi->stride[0], vf->priv->Coefs[0], vf->priv->Coefs[0], vf->priv->Coefs[1]); deNoise(mpi->planes[1], dmpi->planes[1], vf->priv->Line, &vf->priv->Frame[1], cw, ch, mpi->stride[1], dmpi->stride[1], vf->priv->Coefs[2], vf->priv->Coefs[2], vf->priv->Coefs[3]); deNoise(mpi->planes[2], dmpi->planes[2], vf->priv->Line, &vf->priv->Frame[2], cw, ch, mpi->stride[2], dmpi->stride[2], vf->priv->Coefs[2], vf->priv->Coefs[2], vf->priv->Coefs[3]); return vf_next_put_image(vf,dmpi, pts); } //===========================================================================// static int query_format(struct vf_instance *vf, unsigned int fmt){ switch(fmt) { case IMGFMT_YV12: case IMGFMT_I420: case IMGFMT_IYUV: case IMGFMT_YVU9: case IMGFMT_444P: case IMGFMT_422P: case IMGFMT_411P: return vf_next_query_format(vf, fmt); } return 0; } #define ABS(A) ( (A) > 0 ? (A) : -(A) ) static void PrecalcCoefs(int *Ct, double Dist25) { int i; double Gamma, Simil, C; Gamma = log(0.25) / log(1.0 - Dist25/255.0 - 0.00001); for (i = -255*16; i <= 255*16; i++) { Simil = 1.0 - ABS(i) / (16*255.0); C = pow(Simil, Gamma) * 65536.0 * (double)i / 16.0; Ct[16*256+i] = (C<0) ? (C-0.5) : (C+0.5); } Ct[0] = (Dist25 != 0); } static int vf_open(vf_instance_t *vf, char *args){ double LumSpac, LumTmp, ChromSpac, ChromTmp; double Param1, Param2, Param3, Param4; vf->config=config; vf->put_image=put_image; vf->query_format=query_format; vf->uninit=uninit; vf->priv=malloc(sizeof(struct vf_priv_s)); memset(vf->priv, 0, sizeof(struct vf_priv_s)); if (args) { switch(sscanf(args, "%lf:%lf:%lf:%lf", &Param1, &Param2, &Param3, &Param4 )) { case 0: LumSpac = PARAM1_DEFAULT; LumTmp = PARAM3_DEFAULT; ChromSpac = PARAM2_DEFAULT; ChromTmp = LumTmp * ChromSpac / LumSpac; break; case 1: LumSpac = Param1; LumTmp = PARAM3_DEFAULT * Param1 / PARAM1_DEFAULT; ChromSpac = PARAM2_DEFAULT * Param1 / PARAM1_DEFAULT; ChromTmp = LumTmp * ChromSpac / LumSpac; break; case 2: LumSpac = Param1; LumTmp = PARAM3_DEFAULT * Param1 / PARAM1_DEFAULT; ChromSpac = Param2; ChromTmp = LumTmp * ChromSpac / LumSpac; break; case 3: LumSpac = Param1; LumTmp = Param3; ChromSpac = Param2; ChromTmp = LumTmp * ChromSpac / LumSpac; break; case 4: LumSpac = Param1; LumTmp = Param3; ChromSpac = Param2; ChromTmp = Param4; break; default: LumSpac = PARAM1_DEFAULT; LumTmp = PARAM3_DEFAULT; ChromSpac = PARAM2_DEFAULT; ChromTmp = LumTmp * ChromSpac / LumSpac; } } else { LumSpac = PARAM1_DEFAULT; LumTmp = PARAM3_DEFAULT; ChromSpac = PARAM2_DEFAULT; ChromTmp = LumTmp * ChromSpac / LumSpac; } PrecalcCoefs(vf->priv->Coefs[0], LumSpac); PrecalcCoefs(vf->priv->Coefs[1], LumTmp); PrecalcCoefs(vf->priv->Coefs[2], ChromSpac); PrecalcCoefs(vf->priv->Coefs[3], ChromTmp); return 1; } const vf_info_t vf_info_hqdn3d = { "High Quality 3D Denoiser", "hqdn3d", "Daniel Moreno & A'rpi", "", vf_open, NULL }; //===========================================================================//