#include "producer_pixbuf.h"
#include <framework/mlt_frame.h>
+#include <gdk-pixbuf/gdk-pixbuf.h>
+
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
-#include <gdk-pixbuf/gdk-pixbuf.h>
+#include <math.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
+#include <dirent.h>
static int producer_get_frame( mlt_producer parent, mlt_frame_ptr frame, int index );
static void producer_close( mlt_producer parent );
-mlt_producer producer_pixbuf_init( const char *filename )
+typedef enum
+{
+ SIGNAL_FORMAT_PAL,
+ SIGNAL_FORMAT_NTSC
+} mlt_signal_format;
+
+static int filter_files( const struct dirent *de )
+{
+ if ( de->d_name[ 0 ] != '.' )
+ return 1;
+ else
+ return 0;
+}
+
+
+mlt_producer producer_pixbuf_init( char *filename )
{
producer_pixbuf this = calloc( sizeof( struct producer_pixbuf_s ), 1 );
- if ( this != NULL && mlt_producer_init( &this->parent, this ) == 0 )
+ if ( filename != NULL && this != NULL && mlt_producer_init( &this->parent, this ) == 0 )
{
mlt_producer producer = &this->parent;
producer->get_frame = producer_get_frame;
producer->close = producer_close;
- this->filename = strdup( filename );
- this->counter = -1;
- this->is_pal = 1;
+ // Get the properties interface
+ mlt_properties properties = mlt_producer_properties( &this->parent );
+
+ // Set the default properties
+ mlt_properties_set( properties, "resource", filename );
+ mlt_properties_set_int( properties, "video_standard", mlt_video_standard_pal );
+ mlt_properties_set_int( properties, "ttl", 25 );
+
+ // Obtain filenames
+ if ( strchr( filename, '%' ) != NULL )
+ {
+ // handle picture sequences
+ int i = 0;
+ int gap = 0;
+ char full[1024];
+
+ while ( gap < 100 )
+ {
+ struct stat buf;
+ snprintf( full, 1023, filename, i ++ );
+ if ( stat( full, &buf ) == 0 )
+ {
+ this->filenames = realloc( this->filenames, sizeof( char * ) * ( this->count + 1 ) );
+ this->filenames[ this->count ++ ] = strdup( full );
+ gap = 0;
+ }
+ else
+ {
+ gap ++;
+ }
+ }
+ mlt_properties_set_position( properties, "out", this->count * 25 );
+ }
+ else if ( strstr( filename, "/.all." ) != NULL )
+ {
+ char *dir_name = strdup( filename );
+ char *extension = strrchr( filename, '.' );
+ *( strstr( dir_name, "/.all." ) + 1 ) = '\0';
+ char fullname[ 1024 ];
+ strcpy( fullname, dir_name );
+ struct dirent **de = NULL;
+ int n = scandir( fullname, &de, filter_files, alphasort );
+ int i;
+ struct stat info;
+
+ for (i = 0; i < n; i++ )
+ {
+ snprintf( fullname, 1023, "%s%s", dir_name, de[i]->d_name );
+
+ if ( lstat( fullname, &info ) == 0 &&
+ ( S_ISREG( info.st_mode ) || ( strstr( fullname, extension ) && info.st_mode | S_IXUSR ) ) )
+ {
+ this->filenames = realloc( this->filenames, sizeof( char * ) * ( this->count + 1 ) );
+ this->filenames[ this->count ++ ] = strdup( fullname );
+ }
+ free( de[ i ] );
+ }
+
+ free( de );
+ free( dir_name );
+ }
+ else
+ {
+ this->filenames = realloc( this->filenames, sizeof( char * ) * ( this->count + 1 ) );
+ this->filenames[ this->count ++ ] = strdup( filename );
+ mlt_properties_set_position( properties, "out", 25 );
+ }
+
+ // Initialise gobject types
g_type_init();
return producer;
return NULL;
}
-static int producer_get_image( mlt_frame this, uint8_t **buffer, mlt_image_format *format, int *width, int *height, int writable )
-{
- // Obtain properties of frame
- mlt_properties properties = mlt_frame_properties( this );
-
- // May need to know the size of the image to clone it
- int size = 0;
-
- // Get the image
- uint8_t *image = mlt_properties_get_data( properties, "image", &size );
-
- // Get width and height
- *width = mlt_properties_get_int( properties, "width" );
- *height = mlt_properties_get_int( properties, "height" );
-
- // Clone if necessary
- if ( writable )
- {
- // Clone our image
- uint8_t *copy = malloc( size );
- memcpy( copy, image, size );
-
- // We're going to pass the copy on
- image = copy;
-
- // Now update properties so we free the copy after
- mlt_properties_set_data( properties, "image", copy, size, free, NULL );
- }
-
- // Pass on the image
- *buffer = image;
-
- return 0;
-}
-
-static uint8_t *producer_get_alpha_mask( mlt_frame this )
-{
- // Obtain properties of frame
- mlt_properties properties = mlt_frame_properties( this );
-
- // Return the alpha mask
- return mlt_properties_get_data( properties, "alpha", NULL );
-}
-
-static int producer_get_frame( mlt_producer producer, mlt_frame_ptr frame, int index )
+static void refresh_image( mlt_frame frame, int width, int height )
{
- producer_pixbuf this = producer->child;
+ // Pixbuf
GdkPixbuf *pixbuf = NULL;
GError *error = NULL;
- // Generate a frame
- *frame = mlt_frame_init( );
-
// Obtain properties of frame
- mlt_properties properties = mlt_frame_properties( *frame );
+ mlt_properties properties = mlt_frame_properties( frame );
- // optimization for subsequent iterations on single picture
- if ( this->image != NULL )
- {
- // Set width/height
- mlt_properties_set_int( properties, "width", this->width );
- mlt_properties_set_int( properties, "height", this->height );
+ // Obtain the producer pango for this frame
+ producer_pixbuf this = mlt_properties_get_data( properties, "producer_pixbuf", NULL );
- // if picture sequence pass the image and alpha data without destructor
- mlt_properties_set_data( properties, "image", this->image, 0, NULL, NULL );
- mlt_properties_set_data( properties, "alpha", this->alpha, 0, NULL, NULL );
+ // Obtain the producer
+ mlt_producer producer = &this->parent;
- // Set alpha mask call back
- ( *frame )->get_alpha_mask = producer_get_alpha_mask;
+ // Obtain properties of producer
+ mlt_properties producer_props = mlt_producer_properties( producer );
- // Stack the get image callback
- mlt_frame_push_get_image( *frame, producer_get_image );
+ // Get the time to live for each frame
+ double ttl = mlt_properties_get_int( producer_props, "ttl" );
- }
- else if ( strchr( this->filename, '%' ) != NULL )
+ // Image index
+ int image_idx = ( int )floor( mlt_producer_position( producer ) / ttl ) % this->count;
+
+ // Update timecode on the frame we're creating
+ mlt_frame_set_position( frame, mlt_producer_position( producer ) );
+
+ // optimization for subsequent iterations on single picture
+ if ( this->image != NULL && image_idx == this->image_idx )
{
- // handle picture sequences
- char filename[1024];
- filename[1023] = 0;
- int current = this->counter;
- do
+ if ( width != this->width || height != this->height )
{
- ++this->counter;
- snprintf( filename, 1023, this->filename, this->counter );
- pixbuf = gdk_pixbuf_new_from_file( filename, &error );
- // allow discontinuity in frame numbers up to 99
- error = NULL;
- } while ( pixbuf == NULL && ( this->counter - current ) < 100 );
+ pixbuf = mlt_properties_get_data( producer_props, "pixbuf", NULL );
+ }
}
- else
+ else
{
- pixbuf = gdk_pixbuf_new_from_file( this->filename, &error );
+ free( this->image );
+ this->image = NULL;
+ free( this->alpha );
+ this->alpha = NULL;
+ this->image_idx = image_idx;
+ pixbuf = gdk_pixbuf_new_from_file( this->filenames[ image_idx ], &error );
+
+ if ( pixbuf != NULL )
+ {
+ // Register this pixbuf for destruction and reuse
+ mlt_properties_set_data( producer_props, "pixbuf", pixbuf, 0, ( mlt_destructor )g_object_unref, NULL );
+
+ mlt_properties_set_int( producer_props, "real_width", gdk_pixbuf_get_width( pixbuf ) );
+ mlt_properties_set_int( producer_props, "real_height", gdk_pixbuf_get_height( pixbuf ) );
+
+ // Store the width/height of the pixbuf temporarily
+ this->width = gdk_pixbuf_get_width( pixbuf );
+ this->height = gdk_pixbuf_get_height( pixbuf );
+ }
}
// If we have a pixbuf
- if ( pixbuf )
+ if ( pixbuf && width > 0 )
{
- // Scale to adjust for sample aspect ratio
- if ( this->is_pal )
- {
- GdkPixbuf *temp = pixbuf;
- GdkPixbuf *scaled = gdk_pixbuf_scale_simple( pixbuf,
- (gint) ( (float) gdk_pixbuf_get_width( pixbuf ) * 54.0/59.0),
- gdk_pixbuf_get_height( pixbuf ), GDK_INTERP_HYPER );
- pixbuf = scaled;
- g_object_unref( temp );
- }
- else
- {
- GdkPixbuf *temp = pixbuf;
- GdkPixbuf *scaled = gdk_pixbuf_scale_simple( pixbuf,
- (gint) ( (float) gdk_pixbuf_get_width( pixbuf ) * 11.0/10.0 ),
- gdk_pixbuf_get_height( pixbuf ), GDK_INTERP_HYPER );
- pixbuf = scaled;
- g_object_unref( temp );
- }
+ // Note - the original pixbuf is already safe and ready for destruction
+ pixbuf = gdk_pixbuf_scale_simple( pixbuf, width, height, GDK_INTERP_HYPER );
// Store width and height
this->width = gdk_pixbuf_get_width( pixbuf );
// Finished with pixbuf now
g_object_unref( pixbuf );
- // Set width/height of frame
- mlt_properties_set_int( properties, "width", this->width );
- mlt_properties_set_int( properties, "height", this->height );
-
// Pass alpha and image on properties with or without destructor
- if ( this->counter >= 0 )
- {
- // if picture sequence pass the image and alpha data with destructor
- mlt_properties_set_data( properties, "image", image, 0, free, NULL );
- mlt_properties_set_data( properties, "alpha", alpha, 0, free, NULL );
- }
- else
- {
- // if single picture, reference the image and alpha in the producer
- this->image = image;
- this->alpha = alpha;
+ this->image = image;
+ this->alpha = alpha;
+ }
- // pass the image and alpha data without destructor
- mlt_properties_set_data( properties, "image", image, 0, NULL, NULL );
- mlt_properties_set_data( properties, "alpha", alpha, 0, NULL, NULL );
- }
+ // Set width/height of frame
+ mlt_properties_set_int( properties, "width", this->width );
+ mlt_properties_set_int( properties, "height", this->height );
+ mlt_properties_set_int( properties, "real_width", mlt_properties_get_int( producer_props, "real_width" ) );
+ mlt_properties_set_int( properties, "real_height", mlt_properties_get_int( producer_props, "real_height" ) );
+
+ // pass the image and alpha data without destructor
+ mlt_properties_set_data( properties, "image", this->image, this->width * this->height * 2, NULL, NULL );
+ mlt_properties_set_data( properties, "alpha", this->alpha, this->width * this->height, NULL, NULL );
+}
+
+static int producer_get_image( mlt_frame frame, uint8_t **buffer, mlt_image_format *format, int *width, int *height, int writable )
+{
+ // Obtain properties of frame
+ mlt_properties properties = mlt_frame_properties( frame );
+
+ // Refresh the image
+ refresh_image( frame, *width, *height );
- // Set alpha call back
- ( *frame )->get_alpha_mask = producer_get_alpha_mask;
+ // May need to know the size of the image to clone it
+ int size = 0;
+
+ // Get the image
+ uint8_t *image = mlt_properties_get_data( properties, "image", &size );
- // Push the get_image method
- mlt_frame_push_get_image( *frame, producer_get_image );
+ // Get width and height
+ *width = mlt_properties_get_int( properties, "width" );
+ *height = mlt_properties_get_int( properties, "height" );
+
+ // Clone if necessary
+ // NB: Cloning is necessary with this producer (due to processing of images ahead of use)
+ // The fault is not in the design of mlt, but in the implementation of pixbuf...
+ //if ( writable )
+ {
+ size = *width * *height * 2;
+
+ // Clone our image
+ uint8_t *copy = malloc( size );
+ memcpy( copy, image, size );
+
+ // We're going to pass the copy on
+ image = copy;
+
+ // Now update properties so we free the copy after
+ mlt_properties_set_data( properties, "image", copy, size, free, NULL );
}
- // Update timecode on the frame we're creating
- mlt_frame_set_timecode( *frame, mlt_producer_position( producer ) );
+ // Pass on the image
+ *buffer = image;
+
+ return 0;
+}
+
+static uint8_t *producer_get_alpha_mask( mlt_frame this )
+{
+ // Obtain properties of frame
+ mlt_properties properties = mlt_frame_properties( this );
+
+ // Return the alpha mask
+ return mlt_properties_get_data( properties, "alpha", NULL );
+}
+
+static int producer_get_frame( mlt_producer producer, mlt_frame_ptr frame, int index )
+{
+ // Get the real structure for this producer
+ producer_pixbuf this = producer->child;
+
+ // Generate a frame
+ *frame = mlt_frame_init( );
+
+ // Obtain properties of frame and producer
+ mlt_properties properties = mlt_frame_properties( *frame );
+
+ // Set the producer on the frame properties
+ mlt_properties_set_data( properties, "producer_pixbuf", this, 0, NULL, NULL );
+
+ // Refresh the pango image
+ refresh_image( *frame, 0, 0 );
+
+ // Set alpha call back
+ ( *frame )->get_alpha_mask = producer_get_alpha_mask;
+
+ // Push the get_image method
+ mlt_frame_push_get_image( *frame, producer_get_image );
// Calculate the next timecode
mlt_producer_prepare_next( producer );
static void producer_close( mlt_producer parent )
{
producer_pixbuf this = parent->child;
- if ( this->filename )
- free( this->filename );
- if ( this->image )
- free( this->image );
- if ( this->alpha )
- free( this->alpha );
+ free( this->image );
+ free( this->alpha );
parent->close = NULL;
mlt_producer_close( parent );
free( this );