git.sesse.net Git - mlt/blob - src/modules/opengl/transition_movit_mix.cpp

   1 /*
   2  * transition_movit_mix.cpp
   3  * Copyright (C) 2013 Dan Dennedy <dan@dennedy.org>
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program 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
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software Foundation,
  17  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18  */
  19
  20
  21 #include <framework/mlt.h>
  22 #include <string.h>
  23 #include <assert.h>
  24
  25 #include "glsl_manager.h"
  26 #include <movit/init.h>
  27 #include <movit/effect_chain.h>
  28 #include <movit/util.h>
  29 #include <movit/mix_effect.h>
  30 #include "mlt_movit_input.h"
  31 #include "mlt_flip_effect.h"
  32
  33 static int get_image( mlt_frame a_frame, uint8_t **image, mlt_image_format *format, int *width, int *height, int writable )
  34 {
  35         int error = 0;
  36
  37         // Get the b frame from the stack
  38         mlt_frame b_frame = (mlt_frame) mlt_frame_pop_frame( a_frame );
  39
  40         // Get the transition object
  41         mlt_transition transition = (mlt_transition) mlt_frame_pop_service( a_frame );
  42
  43         // Get the properties of the transition
  44         mlt_properties properties = MLT_TRANSITION_PROPERTIES( transition );
  45
  46         // Get the properties of the a frame
  47         mlt_properties a_props = MLT_FRAME_PROPERTIES( a_frame );
  48
  49         // Get the movit objects
  50         mlt_service service = MLT_TRANSITION_SERVICE( transition );
  51         EffectChain* chain = GlslManager::get_chain( service );
  52         Effect* effect = (Effect*) mlt_properties_get_data( properties, "movit effect", NULL );
  53         MltInput* a_input = GlslManager::get_input( service );
  54         MltInput* b_input = (MltInput*) mlt_properties_get_data( properties, "movit input B", NULL );
  55         mlt_image_format output_format = *format;
  56
  57         // Get the transition parameters
  58         int reverse = mlt_properties_get_int( properties, "reverse" );
  59         double mix = mlt_properties_get( properties, "mix" ) ?
  60                 mlt_properties_get_double( properties, "mix" ) :
  61                 mlt_transition_get_progress( transition, a_frame );
  62         double inverse = 1.0 - mix;
  63
  64         // Set the movit parameters
  65         bool ok = effect->set_float( "strength_first",  reverse ? mix : inverse );
  66         ok     |= effect->set_float( "strength_second", reverse ? inverse : mix );
  67         assert( ok );
  68
  69         // Get the frames' textures
  70         GLuint* texture_id[2] = {0, 0};
  71         *format = mlt_image_glsl_texture;
  72         mlt_frame_get_image( a_frame, (uint8_t**) &texture_id[0], format, width, height, 0 );
  73         a_input->useFBOInput( chain, *texture_id[0] );
  74         *format = mlt_image_glsl_texture;
  75         mlt_frame_get_image( b_frame, (uint8_t**) &texture_id[1], format, width, height, 0 );
  76         b_input->useFBOInput( chain, *texture_id[1] );
  77
  78         // Set resolution to that of the a_frame
  79         *width = mlt_properties_get_int( a_props, "width" );
  80         *height = mlt_properties_get_int( a_props, "height" );
  81
  82         // Setup rendering to an FBO
  83         GlslManager* glsl = GlslManager::get_instance();
  84         glsl_fbo fbo = glsl->get_fbo( *width, *height );
  85         if ( output_format == mlt_image_glsl_texture ) {
  86                 glsl_texture texture = glsl->get_texture( *width, *height, GL_RGBA );
  87
  88                 glBindFramebuffer( GL_FRAMEBUFFER, fbo->fbo );
  89                 check_error();
  90                 glFramebufferTexture2D( GL_FRAMEBUFFER, GL_COLOR_ATTACHMENT0, GL_TEXTURE_2D, texture->texture, 0 );
  91                 check_error();
  92                 glBindFramebuffer( GL_FRAMEBUFFER, 0 );
  93                 check_error();
  94
  95                 GlslManager::render( service, chain, fbo->fbo, *width, *height );
  96
  97                 glFinish();
  98                 check_error();
  99                 glBindFramebuffer( GL_FRAMEBUFFER, 0 );
 100                 check_error();
 101
 102                 *image = (uint8_t*) &texture->texture;
 103                 mlt_frame_set_image( a_frame, *image, 0, NULL );
 104                 mlt_properties_set_data( properties, "movit.convert", texture, 0,
 105                         (mlt_destructor) GlslManager::release_texture, NULL );
 106                 *format = output_format;
 107         }
 108         else {
 109                 // Use a PBO to hold the data we read back with glReadPixels()
 110                 // (Intel/DRI goes into a slow path if we don't read to PBO)
 111                 GLenum gl_format = ( output_format == mlt_image_rgb24a || output_format == mlt_image_opengl )?
 112                         GL_RGBA : GL_RGB;
 113                 int img_size = *width * *height * ( gl_format == GL_RGB? 3 : 4 );
 114                 glsl_pbo pbo = glsl->get_pbo( img_size );
 115                 glsl_texture texture = glsl->get_texture( *width, *height, gl_format );
 116
 117                 if ( fbo && pbo && texture ) {
 118                         // Set the FBO
 119                         glBindFramebuffer( GL_FRAMEBUFFER, fbo->fbo );
 120                         check_error();
 121                         glFramebufferTexture2D( GL_FRAMEBUFFER, GL_COLOR_ATTACHMENT0, GL_TEXTURE_2D, texture->texture, 0 );
 122                         check_error();
 123                         glBindFramebuffer( GL_FRAMEBUFFER, 0 );
 124                         check_error();
 125
 126                         GlslManager::render( service, chain, fbo->fbo, *width, *height );
 127
 128                         // Read FBO into PBO
 129                         glBindBuffer( GL_PIXEL_PACK_BUFFER_ARB, pbo->pbo );
 130                         check_error();
 131                         glBufferData( GL_PIXEL_PACK_BUFFER_ARB, img_size, NULL, GL_STREAM_READ );
 132                         check_error();
 133                         glReadPixels( 0, 0, *width, *height, gl_format, GL_UNSIGNED_BYTE, BUFFER_OFFSET(0) );
 134                         check_error();
 135
 136                         // Copy from PBO
 137                         uint8_t* buf = (uint8_t*) glMapBuffer( GL_PIXEL_PACK_BUFFER_ARB, GL_READ_ONLY );
 138                         check_error();
 139
 140                         *format = gl_format == GL_RGBA ? mlt_image_rgb24a : mlt_image_rgb24;
 141                         *image = (uint8_t*) mlt_pool_alloc( img_size );
 142                         mlt_frame_set_image( a_frame, *image, img_size, mlt_pool_release );
 143                         memcpy( *image, buf, img_size );
 144
 145                         // Release PBO and FBO
 146                         glUnmapBuffer( GL_PIXEL_PACK_BUFFER_ARB );
 147                         check_error();
 148                         glBindBuffer( GL_PIXEL_PACK_BUFFER_ARB, 0 );
 149                         check_error();
 150                         glBindFramebuffer( GL_FRAMEBUFFER, 0 );
 151                         check_error();
 152                         glBindTexture( GL_TEXTURE_2D, 0 );
 153                         check_error();
 154                         GlslManager::release_texture( texture );
 155                 }
 156                 else {
 157                         error = 1;
 158                 }
 159         }
 160         if ( fbo ) GlslManager::release_fbo( fbo );
 161
 162         return error;
 163 }
 164
 165 static mlt_frame process( mlt_transition transition, mlt_frame a_frame, mlt_frame b_frame )
 166 {
 167         mlt_service service = MLT_TRANSITION_SERVICE(transition);
 168
 169         if ( !GlslManager::init_chain( service ) ) {
 170                 // Create the Movit effect chain
 171                 EffectChain* chain = GlslManager::get_chain( service );
 172                 mlt_profile profile = mlt_service_profile( service );
 173                 Input* b_input = new MltInput( profile->width, profile->height );
 174                 ImageFormat output_format;
 175                 output_format.color_space = COLORSPACE_sRGB;
 176                 output_format.gamma_curve = GAMMA_sRGB;
 177                 chain->add_input( b_input );
 178                 chain->add_output( output_format, OUTPUT_ALPHA_FORMAT_POSTMULTIPLIED );
 179                 chain->set_dither_bits( 8 );
 180
 181                 Effect* effect = chain->add_effect( new MixEffect(),
 182                         GlslManager::get_input( service ), b_input );
 183
 184                 // Save these new effects on properties for get_image
 185                 mlt_properties properties = MLT_TRANSITION_PROPERTIES(transition);
 186                 mlt_properties_set_data( properties, "movit effect", effect, 0, NULL, NULL );
 187                 mlt_properties_set_data( properties, "movit input B", b_input, 0, NULL, NULL );
 188         }
 189
 190         // Push the transition on to the frame
 191         mlt_frame_push_service( a_frame, transition );
 192
 193         // Push the b_frame on to the stack
 194         mlt_frame_push_frame( a_frame, b_frame );
 195
 196         // Push the transition method
 197         mlt_frame_push_get_image( a_frame, get_image );
 198
 199         return a_frame;
 200 }
 201
 202 extern "C"
 203 mlt_transition transition_movit_mix_init( mlt_profile profile, mlt_service_type type, const char *id, char *arg )
 204 {
 205         mlt_transition transition = NULL;
 206         GlslManager* glsl = GlslManager::get_instance();
 207         if ( glsl && ( transition = mlt_transition_new() ) ) {
 208                 transition->process = process;
 209                 mlt_properties_set( MLT_TRANSITION_PROPERTIES( transition ), "mix", arg );
 210
 211                 // Inform apps and framework that this is a video only transition
 212                 mlt_properties_set_int( MLT_TRANSITION_PROPERTIES( transition ), "_transition_type", 1 );
 213         }
 214         return transition;
 215 }