research.m1stereo.tv/gitweb/ - melted/blob - src/modules/core/filter_luma.c

   1 /*
   2  * filter_luma.c -- luma filter
   3  * Copyright (C) 2003-2004 Ushodaya Enterprises Limited
   4  * Author: Charles Yates <charles.yates@pandora.be>
   5  *
   6  * This program 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  * This program 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
  17  * along with this program; if not, write to the Free Software Foundation,
  18  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  19  */
  20
  21 #include "filter_luma.h"
  22
  23 #include <framework/mlt_factory.h>
  24 #include <framework/mlt_frame.h>
  25 #include <framework/mlt_producer.h>
  26 #include <framework/mlt_transition.h>
  27
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30 #include <string.h>
  31
  32 /** Do it :-).
  33 */
  34
  35 static int filter_get_image( mlt_frame this, uint8_t **image, mlt_image_format *format, int *width, int *height, int writable )
  36 {
  37         int error = 0;
  38         mlt_filter filter = mlt_frame_pop_service( this );
  39         mlt_properties properties = MLT_FILTER_PROPERTIES( filter );
  40         mlt_transition luma = mlt_properties_get_data( properties, "luma", NULL );
  41         mlt_frame b_frame = mlt_properties_get_data( properties, "frame", NULL );
  42         int out = mlt_properties_get_int( properties, "period" );
  43
  44         if ( out == 0 )
  45                 out = 24;
  46
  47         if ( luma == NULL )
  48         {
  49                 char *resource = mlt_properties_get( properties, "resource" );
  50                 luma = mlt_factory_transition( "luma", resource );
  51                 if ( luma != NULL )
  52                 {
  53                         mlt_properties luma_properties = MLT_TRANSITION_PROPERTIES( luma );
  54                         mlt_properties_set_int( luma_properties, "in", 0 );
  55                         mlt_properties_set_int( luma_properties, "out", out );
  56                         mlt_properties_set_int( luma_properties, "reverse", 1 );
  57                         mlt_properties_set_data( properties, "luma", luma, 0, ( mlt_destructor )mlt_transition_close, NULL );
  58                 }
  59         }
  60
  61         if ( b_frame == NULL )
  62         {
  63                 b_frame = mlt_frame_init( );
  64                 mlt_properties_set_data( properties, "frame", b_frame, 0, ( mlt_destructor )mlt_frame_close, NULL );
  65         }
  66
  67         if ( luma != NULL &&
  68                 ( mlt_properties_get( properties, "blur" ) != NULL ||
  69                   (int)mlt_frame_get_position( this ) % ( out + 1 ) != out ) )
  70         {
  71                 mlt_properties luma_properties = MLT_TRANSITION_PROPERTIES( luma );
  72                 mlt_properties_pass( luma_properties, properties, "luma." );
  73                 mlt_transition_process( luma, this, b_frame );
  74         }
  75
  76         error = mlt_frame_get_image( this, image, format, width, height, 1 );
  77
  78         if ( error == 0 )
  79         {
  80                 mlt_properties a_props = MLT_FRAME_PROPERTIES( this );
  81                 int size = 0;
  82                 uint8_t *src = mlt_properties_get_data( a_props, "image", &size );
  83                 uint8_t *dst = mlt_pool_alloc( size );
  84
  85                 if ( dst != NULL )
  86                 {
  87                         mlt_properties b_props = MLT_FRAME_PROPERTIES( b_frame );
  88                         memcpy( dst, src, size );
  89                         mlt_properties_set_data( b_props, "image", dst, size, mlt_pool_release, NULL );
  90                         mlt_properties_set_int( b_props, "width", *width );
  91                         mlt_properties_set_int( b_props, "height", *height );
  92                         mlt_properties_set_int( b_props, "format", *format );
  93                 }
  94         }
  95
  96         return error;
  97 }
  98
  99 /** Filter processing.
 100 */
 101
 102 static mlt_frame filter_process( mlt_filter this, mlt_frame frame )
 103 {
 104         // Push the filter on to the stack
 105         mlt_frame_push_service( frame, this );
 106
 107         // Push the get_image on to the stack
 108         mlt_frame_push_get_image( frame, filter_get_image );
 109
 110         return frame;
 111 }
 112
 113 /** Constructor for the filter.
 114 */
 115
 116 mlt_filter filter_luma_init( void *arg )
 117 {
 118         mlt_filter this = mlt_filter_new( );
 119         if ( this != NULL )
 120         {
 121                 mlt_properties properties = MLT_FILTER_PROPERTIES( this );
 122                 this->process = filter_process;
 123                 if ( arg != NULL )
 124                         mlt_properties_set( properties, "resource", arg );
 125         }
 126         return this;
 127 }