libmpcodecs/vf_qp.c

   1 /*
   2  * Copyright (C) 2004 Michael Niedermayer <michaelni@gmx.at>
   3  *
   4  * This file is part of MPlayer.
   5  *
   6  * MPlayer is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * MPlayer is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License along
  17  * with MPlayer; if not, write to the Free Software Foundation, Inc.,
  18  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  19  */
  20
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <string.h>
  24 #include <math.h>
  25 #include <inttypes.h>
  26
  27 #include "config.h"
  28
  29 #include "mp_msg.h"
  30 #include "cpudetect.h"
  31 #include "img_format.h"
  32 #include "mp_image.h"
  33 #include "vf.h"
  34 #include "libvo/fastmemcpy.h"
  35
  36 #include "libavcodec/avcodec.h"
  37 #include "libavcodec/eval.h"
  38
  39 #if HAVE_MALLOC_H
  40 #include <malloc.h>
  41 #endif
  42
  43
  44 struct vf_priv_s {
  45         char eq[200];
  46         int8_t *qp;
  47         int8_t lut[257];
  48         int qp_stride;
  49 };
  50
  51 static int config(struct vf_instance* vf,
  52         int width, int height, int d_width, int d_height,
  53         unsigned int flags, unsigned int outfmt){
  54         int h= (height+15)>>4;
  55         int i;
  56
  57         vf->priv->qp_stride= (width+15)>>4;
  58         vf->priv->qp= av_malloc(vf->priv->qp_stride*h*sizeof(int8_t));
  59
  60         for(i=-129; i<128; i++){
  61             double const_values[]={
  62                 M_PI,
  63                 M_E,
  64                 i != -129,
  65                 i,
  66                 0
  67             };
  68             const char * const const_names[]={
  69                 "PI",
  70                 "E",
  71                 "known",
  72                 "qp",
  73                 NULL
  74             };
  75
  76             const char *error = NULL;
  77             vf->priv->lut[i+129]= lrintf(ff_eval2(vf->priv->eq, const_values, const_names, NULL, NULL, NULL, NULL, NULL, &error));
  78             if (error)
  79                 mp_msg(MSGT_VFILTER, MSGL_ERR, "qp: Error evaluating \"%s\": %s\n", vf->priv->eq, error);
  80         }
  81
  82         return vf_next_config(vf,width,height,d_width,d_height,flags,outfmt);
  83 }
  84
  85 static void get_image(struct vf_instance* vf, mp_image_t *mpi){
  86     if(mpi->flags&MP_IMGFLAG_PRESERVE) return; // don't change
  87     // ok, we can do pp in-place (or pp disabled):
  88     vf->dmpi=vf_get_image(vf->next,mpi->imgfmt,
  89         mpi->type, mpi->flags, mpi->w, mpi->h);
  90     mpi->planes[0]=vf->dmpi->planes[0];
  91     mpi->stride[0]=vf->dmpi->stride[0];
  92     mpi->width=vf->dmpi->width;
  93     if(mpi->flags&MP_IMGFLAG_PLANAR){
  94         mpi->planes[1]=vf->dmpi->planes[1];
  95         mpi->planes[2]=vf->dmpi->planes[2];
  96         mpi->stride[1]=vf->dmpi->stride[1];
  97         mpi->stride[2]=vf->dmpi->stride[2];
  98     }
  99     mpi->flags|=MP_IMGFLAG_DIRECT;
 100 }
 101
 102 static int put_image(struct vf_instance* vf, mp_image_t *mpi, double pts){
 103         mp_image_t *dmpi;
 104         int x,y;
 105
 106         if(!(mpi->flags&MP_IMGFLAG_DIRECT)){
 107                 // no DR, so get a new image! hope we'll get DR buffer:
 108                 vf->dmpi=vf_get_image(vf->next,mpi->imgfmt,
 109                 MP_IMGTYPE_TEMP, MP_IMGFLAG_ACCEPT_STRIDE|MP_IMGFLAG_PREFER_ALIGNED_STRIDE,
 110                 mpi->w,mpi->h);
 111         }
 112
 113         dmpi= vf->dmpi;
 114
 115         if(!(mpi->flags&MP_IMGFLAG_DIRECT)){
 116                 memcpy_pic(dmpi->planes[0], mpi->planes[0], mpi->w, mpi->h, dmpi->stride[0], mpi->stride[0]);
 117                 if(mpi->flags&MP_IMGFLAG_PLANAR){
 118                     memcpy_pic(dmpi->planes[1], mpi->planes[1], mpi->w>>mpi->chroma_x_shift, mpi->h>>mpi->chroma_y_shift, dmpi->stride[1], mpi->stride[1]);
 119                     memcpy_pic(dmpi->planes[2], mpi->planes[2], mpi->w>>mpi->chroma_x_shift, mpi->h>>mpi->chroma_y_shift, dmpi->stride[2], mpi->stride[2]);
 120                 }
 121         }
 122         vf_clone_mpi_attributes(dmpi, mpi);
 123
 124         dmpi->qscale = vf->priv->qp;
 125         dmpi->qstride= vf->priv->qp_stride;
 126         if(mpi->qscale){
 127             for(y=0; y<((dmpi->h+15)>>4); y++){
 128                 for(x=0; x<vf->priv->qp_stride; x++){
 129                     dmpi->qscale[x + dmpi->qstride*y]=
 130                         vf->priv->lut[ 129 + ((int8_t)mpi->qscale[x + mpi->qstride*y]) ];
 131                 }
 132             }
 133         }else{
 134             int qp= vf->priv->lut[0];
 135             for(y=0; y<((dmpi->h+15)>>4); y++){
 136                 for(x=0; x<vf->priv->qp_stride; x++){
 137                     dmpi->qscale[x + dmpi->qstride*y]= qp;
 138                 }
 139             }
 140         }
 141
 142         return vf_next_put_image(vf,dmpi, pts);
 143 }
 144
 145 static void uninit(struct vf_instance* vf){
 146         if(!vf->priv) return;
 147
 148         if(vf->priv->qp) av_free(vf->priv->qp);
 149         vf->priv->qp= NULL;
 150
 151         av_free(vf->priv);
 152         vf->priv=NULL;
 153 }
 154
 155 //===========================================================================//
 156 static int open(vf_instance_t *vf, char* args){
 157     vf->config=config;
 158     vf->put_image=put_image;
 159     vf->get_image=get_image;
 160     vf->uninit=uninit;
 161     vf->priv=av_malloc(sizeof(struct vf_priv_s));
 162     memset(vf->priv, 0, sizeof(struct vf_priv_s));
 163
 164 //    avcodec_init();
 165
 166     if (args) strncpy(vf->priv->eq, args, 199);
 167
 168     return 1;
 169 }
 170
 171 const vf_info_t vf_info_qp = {
 172     "QP changer",
 173     "qp",
 174     "Michael Niedermayer",
 175     "",
 176     open,
 177     NULL
 178 };