research.m1stereo.tv/gitweb/ - melted/blob - src/modules/oldfilm/filter_tcolor.c

   1 /*
   2  * filter_tcolor.c -- tcolor filter
   3  * Copyright (c) 2007 Marco Gittler <g.marco@freenet.de>
   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.1 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 #include <framework/mlt_filter.h>
  21 #include <framework/mlt_frame.h>
  22
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <math.h>
  26
  27 #define MIN(a,b) (a<b?a:b)
  28 #define MAX(a,b) (a<b?b:a)
  29
  30 static int filter_get_image( mlt_frame this, uint8_t **image, mlt_image_format *format, int *width, int *height, int writable )
  31 {
  32
  33         mlt_filter filter = mlt_frame_pop_service( this );
  34         int error = mlt_frame_get_image( this, image, format, width, height, 1 );
  35
  36         if ( error == 0 && *image && *format == mlt_image_yuv422 )
  37         {
  38
  39                 double over_cr = mlt_properties_get_double( MLT_FILTER_PROPERTIES( filter ), "oversaturate_cr" )/100.0;
  40                 double over_cb = mlt_properties_get_double( MLT_FILTER_PROPERTIES( filter ), "oversaturate_cb" )/100.0;
  41
  42                 int video_width = *width;
  43                 int video_height = *height;
  44
  45                 int x,y;
  46
  47                 for (y=0;y<video_height;y++){
  48                         for (x=0;x<video_width;x+=2){
  49                                 uint8_t *pix=(*image+y*video_width*2+x*2+1);
  50                                 uint8_t *pix1=(*image+y*video_width*2+x*2+3);
  51                                 *pix=MIN(MAX( ((double)*pix-127.0)*over_cb+127.0,0),255);
  52                                 *pix1=MIN(MAX( ((double)*pix1-127.0)*over_cr+127.0,0),255);
  53                         }
  54                 }
  55                 // short a, short b, short c, short d
  56                 // a= gray val pix 1
  57                 // b: +=blue, -=yellow
  58                 // c: =gray pix 2
  59                 // d: +=red,-=green
  60         }
  61
  62         return error;
  63 }
  64
  65 static mlt_frame filter_process( mlt_filter this, mlt_frame frame )
  66 {
  67         mlt_frame_push_service( frame, this );
  68         mlt_frame_push_get_image( frame, filter_get_image );
  69         return frame;
  70 }
  71
  72
  73 mlt_filter filter_tcolor_init( mlt_profile profile, mlt_service_type type, const char *id, char *arg )
  74 {
  75         mlt_filter this = mlt_filter_new( );
  76         if ( this != NULL )
  77         {
  78                 this->process = filter_process;
  79                 mlt_properties_set( MLT_FILTER_PROPERTIES( this ), "oversaturate_cr", "190" );
  80                 mlt_properties_set( MLT_FILTER_PROPERTIES( this ), "oversaturate_cb", "190" );
  81         }
  82         return this;
  83 }
  84
  85