#include <stdlib.h>
#include <string.h>
+typedef struct producer_ppm_s *producer_ppm;
+
+struct producer_ppm_s
+{
+ struct mlt_producer_s parent;
+ char *command;
+ FILE *video;
+ FILE *audio;
+ uint64_t expected;
+};
+
static int producer_get_frame( mlt_producer producer, mlt_frame_ptr frame, int index );
static void producer_close( mlt_producer parent );
if ( this != NULL && mlt_producer_init( &this->parent, this ) == 0 )
{
mlt_producer producer = &this->parent;
+ mlt_properties properties = mlt_producer_properties( producer );
producer->get_frame = producer_get_frame;
producer->close = producer_close;
- if ( command == NULL )
- this->command = strdup( "image2raw -n -a -r 3 -ppm /usr/share/pixmaps/*.png" );
- else
+ if ( command != NULL )
+ {
+ mlt_properties_set( properties, "resource", command );
this->command = strdup( command );
-
- this->pipe = popen( this->command, "r" );
+ }
+ else
+ {
+ mlt_properties_set( properties, "resource", "ppm test" );
+ }
return producer;
}
// Get the frames properties
mlt_properties properties = mlt_frame_properties( this );
- // Get the RGB image
- uint8_t *rgb = mlt_properties_get_data( properties, "image", NULL );
+ if ( mlt_properties_get_int( properties, "has_image" ) )
+ {
+ // Get the RGB image
+ uint8_t *rgb = mlt_properties_get_data( properties, "image", NULL );
- // Get width and height
- *width = mlt_properties_get_int( properties, "width" );
- *height = mlt_properties_get_int( properties, "height" );
+ // Get width and height
+ *width = mlt_properties_get_int( properties, "width" );
+ *height = mlt_properties_get_int( properties, "height" );
- // Convert to requested format
- if ( *format == mlt_image_yuv422 )
+ // Convert to requested format
+ if ( *format == mlt_image_yuv422 )
+ {
+ uint8_t *image = malloc( *width * *height * 2 );
+ mlt_convert_rgb24_to_yuv422( rgb, *width, *height, *width * 3, image );
+ mlt_properties_set_data( properties, "image", image, *width * *height * 2, free, NULL );
+ *buffer = image;
+ }
+ else if ( *format == mlt_image_rgb24 )
+ {
+ *buffer = rgb;
+ }
+ }
+ else
{
- uint8_t *image = malloc( *width * *height * 2 );
- mlt_convert_rgb24_to_yuv422( rgb, *width, *height, *width * 3, image );
- mlt_properties_set_data( properties, "image", image, *width * *height * 2, free, NULL );
- *buffer = image;
+ mlt_frame_get_image( this, buffer, format, width, height, writable );
}
- else if ( *format == mlt_image_rgb24 )
+
+ return 0;
+}
+
+FILE *producer_ppm_run_video( producer_ppm this )
+{
+ if ( this->video == NULL )
{
- *buffer = rgb;
+ if ( this->command == NULL )
+ {
+ this->video = popen( "image2raw -k -r 25 -ppm /usr/share/pixmaps/*.png", "r" );
+ }
+ else
+ {
+ char command[ 1024 ];
+ float fps = mlt_producer_get_fps( &this->parent );
+ float position = mlt_producer_position( &this->parent );
+ sprintf( command, "ffmpeg -i \"%s\" -ss %f -f imagepipe -r %f -img ppm - 2>/dev/null", this->command, position, fps );
+ this->video = popen( command, "r" );
+ }
}
+ return this->video;
+}
+
+FILE *producer_ppm_run_audio( producer_ppm this )
+{
+ if ( this->audio == NULL )
+ {
+ if ( this->command != NULL )
+ {
+ char command[ 1024 ];
+ float position = mlt_producer_position( &this->parent );
+ sprintf( command, "ffmpeg -i \"%s\" -ss %f -f s16le -ar 48000 -ac 2 - 2>/dev/null", this->command, position );
+ this->audio = popen( command, "r" );
+ }
+ }
+ return this->audio;
+}
+
+static void producer_ppm_position( producer_ppm this, uint64_t requested )
+{
+ if ( requested != this->expected )
+ {
+ if ( this->video != NULL )
+ pclose( this->video );
+ this->video = NULL;
+ if ( this->audio != NULL )
+ pclose( this->audio );
+ this->audio = NULL;
+ }
+
+ // This is the next frame we expect
+ this->expected = mlt_producer_frame( &this->parent ) + 1;
+
+ // Open the pipe
+ this->video = producer_ppm_run_video( this );
+
+ // Open the audio pipe
+ this->audio = producer_ppm_run_audio( this );
+
+}
+
+static int producer_get_audio( mlt_frame this, int16_t **buffer, mlt_audio_format *format, int *frequency, int *channels, int *samples )
+{
+ // Get the frames properties
+ mlt_properties properties = mlt_frame_properties( this );
+
+ FILE *pipe = mlt_properties_get_data( properties, "audio.pipe", NULL );
+
+ *frequency = 48000;
+ *channels = 2;
+ *samples = 1920;
+
+ // Size
+ int size = *samples * *channels * 2;
+
+ // Allocate an image
+ *buffer = malloc( size );
+
+ // Read it
+ if ( pipe != NULL )
+ fread( *buffer, size, 1, pipe );
+ else
+ memset( *buffer, 0, size );
+
+ // Pass the data on the frame properties
+ mlt_properties_set_data( properties, "audio", *buffer, size, free, NULL );
return 0;
}
+static int read_ppm_header( FILE *video, int *width, int *height )
+{
+ int count = 0;
+ {
+ char temp[ 132 ];
+ fgets( temp, 132, video );
+ fgets( temp, 132, video );
+ count += sscanf( temp, "%d %d", width, height );
+ fgets( temp, 132, video );
+ }
+ return count;
+}
+
static int producer_get_frame( mlt_producer producer, mlt_frame_ptr frame, int index )
{
producer_ppm this = producer->child;
// Construct a test frame
*frame = mlt_frame_init( );
- // Scan the header
- if ( fscanf( this->pipe, "P6\n%d %d\n255\n", &width, &height ) == 2 )
+ // Are we at the position expected?
+ producer_ppm_position( this, mlt_producer_frame( producer ) );
+
+ // Get the frames properties
+ mlt_properties properties = mlt_frame_properties( *frame );
+
+ FILE *video = this->video;
+ FILE *audio = this->audio;
+
+ // Read the video
+ if ( video != NULL && read_ppm_header( video, &width, &height ) == 2 )
{
- // Get the frames properties
- mlt_properties properties = mlt_frame_properties( *frame );
// Allocate an image
uint8_t *image = malloc( width * height * 3 );
// Read it
- fread( image, width * height * 3, 1, this->pipe );
+ fread( image, width * height * 3, 1, video );
// Pass the data on the frame properties
mlt_properties_set_data( properties, "image", image, width * height * 3, free, NULL );
mlt_properties_set_int( properties, "width", width );
mlt_properties_set_int( properties, "height", height );
+ mlt_properties_set_int( properties, "has_image", 1 );
// Push the image callback
mlt_frame_push_get_image( *frame, producer_get_image );
}
+ else
+ {
+ // Push the image callback
+ mlt_frame_push_get_image( *frame, producer_get_image );
+ }
+
+ // Set the audio pipe
+ mlt_properties_set_data( properties, "audio.pipe", audio, 0, NULL, NULL );
+
+ // Hmm - register audio callback
+ ( *frame )->get_audio = producer_get_audio;
// Update timecode on the frame we're creating
- mlt_frame_set_timecode( *frame, mlt_producer_position( producer ) );
+ mlt_frame_set_position( *frame, mlt_producer_position( producer ) );
// Calculate the next timecode
mlt_producer_prepare_next( producer );
static void producer_close( mlt_producer parent )
{
producer_ppm this = parent->child;
- pclose( this->pipe );
+ if ( this->video )
+ pclose( this->video );
+ if ( this->audio )
+ pclose( this->audio );
free( this->command );
parent->close = NULL;
mlt_producer_close( parent );