research.m1stereo.tv/gitweb/ - melted/blob - src/modules/frei0r/frei0r_helper.c

   1 /*
   2  * frei0r_helper.c -- frei0r helper
   3  * Copyright (c) 2008 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 #include "frei0r_helper.h"
  20 #include <frei0r.h>
  21 #include <string.h>
  22
  23  int process_frei0r_item( mlt_service_type type,  double position , mlt_properties prop , mlt_frame this, uint8_t **image, mlt_image_format *format, int *width, int *height, int writable ){
  24
  25         int i=0;
  26         f0r_instance_t ( *f0r_construct ) ( unsigned int , unsigned int ) =  mlt_properties_get_data(  prop , "f0r_construct" ,NULL);
  27         void (*f0r_update)(f0r_instance_t instance, double time, const uint32_t* inframe, uint32_t* outframe)=mlt_properties_get_data(  prop , "f0r_update" ,NULL);
  28         void (*f0r_destruct)(f0r_instance_t instance)=mlt_properties_get_data(  prop , "f0r_destruct" ,NULL);
  29
  30         void (*f0r_get_plugin_info)(f0r_plugin_info_t*)=mlt_properties_get_data( prop, "f0r_get_plugin_info" ,NULL);
  31         void (*f0r_get_param_info)(f0r_param_info_t* info, int param_index)=mlt_properties_get_data( prop ,  "f0r_get_param_info" ,NULL);
  32         void (*f0r_set_param_value)(f0r_instance_t instance, f0r_param_t param, int param_index)=mlt_properties_get_data(  prop , "f0r_set_param_value" ,NULL);
  33         void (*f0r_get_param_value)(f0r_instance_t instance, f0r_param_t param, int param_index)=mlt_properties_get_data(  prop , "f0r_get_param_value" ,NULL);
  34         void (*f0r_update2) (f0r_instance_t instance, double time,
  35                          const uint32_t* inframe1,const uint32_t* inframe2,const uint32_t* inframe3,
  36          uint32_t* outframe)=mlt_properties_get_data(  prop , "f0r_update2" ,NULL);
  37
  38
  39         //use as name the width and height
  40         f0r_instance_t inst;
  41         char ctorname[1024]="";
  42         sprintf(ctorname,"ctor-%dx%d",*width,*height);
  43
  44         void* neu=mlt_properties_get_data( prop , ctorname ,NULL );
  45         if (!f0r_construct){
  46                 //printf("no ctor\n");
  47                 return -1;
  48         }
  49         if ( neu == 0 ){
  50                 inst= f0r_construct(*width,*height);
  51                 mlt_properties_set_data(  prop  ,  ctorname , inst, sizeof(void*) , f0r_destruct , NULL );;
  52         }else{
  53                 inst=mlt_properties_get_data( prop ,  ctorname , NULL );
  54         }
  55         if (f0r_get_plugin_info){
  56                 f0r_plugin_info_t info;
  57                 f0r_get_plugin_info(&info);
  58                 for (i=0;i<info.num_params;i++){
  59                         f0r_param_info_t pinfo;
  60                         f0r_get_param_info(&pinfo,i);
  61                                 //set param if found
  62                         if (pinfo.type==F0R_PARAM_DOUBLE || pinfo.type==F0R_PARAM_BOOL){
  63                                 double t=0.0;
  64                                 f0r_get_param_value(inst,&t,i);
  65
  66                                 if (mlt_properties_get( prop , pinfo.name ) !=NULL ){
  67                                         t=mlt_properties_get_double( prop , pinfo.name );
  68                                         f0r_set_param_value(inst,&t,i);
  69                                 }
  70                         }
  71                 }
  72         }
  73
  74         int video_area = *width * *height;
  75         uint32_t *img_a = mlt_pool_alloc( video_area * sizeof(uint32_t) );
  76         uint32_t *img_b = mlt_pool_alloc( video_area * sizeof(uint32_t) );
  77
  78         if (type==filter_type){
  79                 mlt_convert_yuv422_to_rgb24a(*image, (uint8_t *)img_a, video_area);
  80                 f0r_update ( inst , position , img_a , img_b );
  81                 mlt_convert_rgb24a_to_yuv422((uint8_t *)img_b , *width, *height, *width * sizeof(uint32_t),
  82                                                                                                 *image, NULL );
  83         }else if (type==transition_type && f0r_update2 ){
  84                 uint32_t *result = mlt_pool_alloc( video_area * sizeof(uint32_t) );
  85
  86                 mlt_convert_yuv422_to_rgb24a ( image[0] , (uint8_t *)img_a , video_area );
  87                 mlt_convert_yuv422_to_rgb24a ( image[1] , (uint8_t *)img_b , video_area );
  88                 f0r_update2 ( inst , position , img_a , img_b , NULL , result );
  89
  90                 uint8_t * image_ptr=mlt_properties_get_data(MLT_FRAME_PROPERTIES(this), "image", NULL );
  91                 if (image_ptr)
  92                     mlt_convert_rgb24a_to_yuv422((uint8_t *)result, *width, *height, *width * sizeof(uint32_t), image_ptr , NULL );
  93
  94                 mlt_pool_release(result);
  95         }
  96         mlt_pool_release(img_a);
  97         mlt_pool_release(img_b);
  98
  99         return 0;
 100 }
 101
 102 void destruct (mlt_properties prop ) {
 103
 104         void (*f0r_destruct)(f0r_instance_t instance)=mlt_properties_get_data(  prop , "f0r_destruct" , NULL );
 105         void (*f0r_deinit)(void)=mlt_properties_get_data ( prop , "f0r_deinit" , NULL);
 106         int i=0;
 107
 108         if ( f0r_deinit != NULL )
 109                 f0r_deinit();
 110
 111         for ( i=0 ; i < mlt_properties_count ( prop ) ; i++ ){
 112                 if ( strstr ( mlt_properties_get_name ( prop , i ) , "ctor-" ) != NULL ){
 113                         void * inst=mlt_properties_get_data( prop , mlt_properties_get_name ( prop , i ) , NULL );
 114                         if ( inst != NULL ){
 115                                 f0r_destruct( (f0r_instance_t) inst);
 116                         }
 117                 }
 118         }
 119         void (*dlclose)(void*)=mlt_properties_get_data ( prop , "_dlclose" , NULL);
 120         void *handle=mlt_properties_get_data ( prop , "_dlclose_handle" , NULL);
 121
 122         if (handle && dlclose ){
 123                 dlclose ( handle );
 124         }
 125
 126 }