#include "consumer_sdl.h"
#include <framework/mlt_frame.h>
+#include <framework/mlt_deque.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <pthread.h>
#include <SDL/SDL.h>
#include <SDL/SDL_syswm.h>
+#include <sys/timeb.h>
/** This classes definition.
*/
{
struct mlt_consumer_s parent;
mlt_properties properties;
- int format;
- int video;
+ mlt_deque queue;
pthread_t thread;
int running;
uint8_t audio_buffer[ 4096 * 6 ];
pthread_cond_t audio_cond;
int window_width;
int window_height;
+ float aspect_ratio;
int width;
int height;
+ int playing;
+ int sdl_flags;
+ SDL_Surface *sdl_screen;
+ SDL_Overlay *sdl_overlay;
+ uint8_t *buffer;
};
/** Forward references to static functions.
*/
+static int consumer_start( mlt_consumer parent );
+static int consumer_stop( mlt_consumer parent );
+static int consumer_is_stopped( mlt_consumer parent );
static void consumer_close( mlt_consumer parent );
static void *consumer_thread( void * );
static int consumer_get_dimensions( int *width, int *height );
// If no malloc'd and consumer init ok
if ( this != NULL && mlt_consumer_init( &this->parent, this ) == 0 )
{
+ // Create the queue
+ this->queue = mlt_deque_init( );
+
// Get the parent consumer object
mlt_consumer parent = &this->parent;
mlt_properties_set_double( this->properties, "volume", 1.0 );
// This is the initialisation of the consumer
- this->running = 1;
pthread_mutex_init( &this->audio_mutex, NULL );
pthread_cond_init( &this->audio_cond, NULL);
+ // Default scaler (for now we'll use nearest)
+ mlt_properties_set( this->properties, "rescale", "nearest" );
+
+ // Default progressive true
+ mlt_properties_set_int( this->properties, "progressive", 1 );
+
+ // Get aspect ratio
+ this->aspect_ratio = mlt_properties_get_double( this->properties, "aspect_ratio" );
+
// process actual param
- if ( arg == NULL || !strcmp( arg, "PAL" ) )
- {
- this->width = 720;
- this->height = 576;
- }
- else if ( !strcmp( arg, "NTSC" ) )
- {
- this->width = 720;
- this->height = 480;
- }
- else if ( sscanf( arg, "%dx%d", &this->width, &this->height ) != 2 )
+ if ( arg == NULL || sscanf( arg, "%dx%d", &this->width, &this->height ) != 2 )
{
- this->width = 720;
- this->height = 576;
+ this->width = mlt_properties_get_int( this->properties, "width" );
+ this->height = mlt_properties_get_int( this->properties, "height" );
}
+ // Default window size
+ this->window_width = (int)( (float)this->height * this->aspect_ratio ) + 1;
+ this->window_height = this->height;
+
+ // Set the sdl flags
+ this->sdl_flags = SDL_HWSURFACE | SDL_ASYNCBLIT | SDL_HWACCEL | SDL_RESIZABLE;
- // Create the the thread
- pthread_create( &this->thread, NULL, consumer_thread, this );
+ // Allow thread to be started/stopped
+ parent->start = consumer_start;
+ parent->stop = consumer_stop;
+ parent->is_stopped = consumer_is_stopped;
// Return the consumer produced
return parent;
return NULL;
}
+int consumer_start( mlt_consumer parent )
+{
+ consumer_sdl this = parent->child;
+
+ if ( !this->running )
+ {
+ this->running = 1;
+ pthread_create( &this->thread, NULL, consumer_thread, this );
+ }
+
+ return 0;
+}
+
+int consumer_stop( mlt_consumer parent )
+{
+ // Get the actual object
+ consumer_sdl this = parent->child;
+
+ if ( this->running )
+ {
+ // Kill the thread and clean up
+ this->running = 0;
+
+ pthread_mutex_lock( &this->audio_mutex );
+ pthread_cond_broadcast( &this->audio_cond );
+ pthread_mutex_unlock( &this->audio_mutex );
+
+ pthread_join( this->thread, NULL );
+ }
+
+ return 0;
+}
+
+int consumer_is_stopped( mlt_consumer parent )
+{
+ consumer_sdl this = parent->child;
+ return !this->running;
+}
+
static int sdl_lock_display( )
{
SDL_Surface *screen = SDL_GetVideoSurface( );
SDL_UnlockSurface( screen );
}
-void sdl_fill_audio( void *udata, uint8_t *stream, int len )
+static void sdl_fill_audio( void *udata, uint8_t *stream, int len )
{
consumer_sdl this = udata;
pthread_mutex_lock( &this->audio_mutex );
- // Experimental - block until audio received
+ // Block until audio received
while ( this->running && len > this->audio_avail )
pthread_cond_wait( &this->audio_cond, &this->audio_mutex );
// No audio left
this->audio_avail = 0;
}
+
+ // We're definitely playing now
+ this->playing = 1;
+
pthread_cond_broadcast( &this->audio_cond );
pthread_mutex_unlock( &this->audio_mutex );
}
-/** Threaded wrapper for pipe.
-*/
-
-static void *consumer_thread( void *arg )
+static int consumer_play_audio( consumer_sdl this, mlt_frame frame, int init_audio, int *duration )
{
- // Identify the arg
- consumer_sdl this = arg;
-
- // Get the consumer
- mlt_consumer consumer = &this->parent;
-
- // Get the service assoicated to the consumer
- mlt_service service = mlt_consumer_service( consumer );
-
// Get the properties of this consumer
mlt_properties properties = this->properties;
+ mlt_audio_format afmt = mlt_audio_pcm;
- // Define a frame pointer
- mlt_frame frame;
+ // Set the preferred params of the test card signal
+ int channels = 2;
+ int frequency = 48000;
+ static int counter = 0;
+ if ( mlt_properties_get_int( properties, "frequency" ) != 0 )
+ frequency = mlt_properties_get_int( properties, "frequency" );
- // internal intialization
- int sdl_flags = SDL_HWSURFACE | SDL_DOUBLEBUF | SDL_HWACCEL | SDL_RESIZABLE;
- SDL_Surface *sdl_screen = NULL;
- SDL_Overlay *sdl_overlay = NULL;
- uint8_t *buffer = NULL;
- int init_audio = 1;
+ int samples = mlt_sample_calculator( mlt_properties_get_double( this->properties, "fps" ), frequency, counter++ );
+
+ int16_t *pcm;
int bytes;
- if ( SDL_Init( SDL_INIT_VIDEO | SDL_INIT_AUDIO | SDL_INIT_NOPARACHUTE ) < 0 )
+ mlt_frame_get_audio( frame, &pcm, &afmt, &frequency, &channels, &samples );
+ *duration = ( ( samples * 1000 ) / frequency );
+
+ if ( mlt_properties_get_int( properties, "audio_off" ) )
{
- fprintf( stderr, "Failed to initialize SDL: %s\n", SDL_GetError() );
- return NULL;
+ this->playing = 1;
+ return init_audio;
}
-
- // Loop until told not to
- while( this->running )
+
+ if ( init_audio == 1 )
{
- // Get a frame from the service (should never return anything other than 0)
- if ( mlt_service_get_frame( service, &frame, 0 ) == 0 )
+ SDL_AudioSpec request;
+ SDL_AudioSpec got;
+
+ SDL_EnableKeyRepeat( SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL );
+ SDL_EnableUNICODE( 1 );
+
+ // specify audio format
+ memset( &request, 0, sizeof( SDL_AudioSpec ) );
+ this->playing = 0;
+ request.freq = frequency;
+ request.format = AUDIO_S16;
+ request.channels = channels;
+ request.samples = 2048;
+ request.callback = sdl_fill_audio;
+ request.userdata = (void *)this;
+ if ( SDL_OpenAudio( &request, &got ) != 0 )
{
- mlt_image_format vfmt = mlt_image_yuv422;
- int width = this->width, height = this->height;
- uint8_t *image;
-
- mlt_audio_format afmt = mlt_audio_pcm;
- int channels;
- int samples;
- int frequency;
- int16_t *pcm;
- int changed = 0;
-
- mlt_frame_get_audio( frame, &pcm, &afmt, &frequency, &channels, &samples );
- if ( init_audio == 1 )
- {
- SDL_AudioSpec request;
-
- // specify audio format
- request.freq = frequency;
- request.format = AUDIO_S16;
- request.channels = channels;
- request.samples = 1024;
- request.callback = sdl_fill_audio;
- request.userdata = (void *)this;
- if ( SDL_OpenAudio( &request, NULL ) < 0 )
- {
- fprintf( stderr, "SDL failed to open audio: %s\n", SDL_GetError() );
- break;
- }
- SDL_PauseAudio( 0 );
- init_audio = 0;
- }
- bytes = ( samples * channels * 2 );
- pthread_mutex_lock( &this->audio_mutex );
- while ( bytes > ( sizeof( this->audio_buffer) - this->audio_avail ) )
- pthread_cond_wait( &this->audio_cond, &this->audio_mutex );
+ fprintf( stderr, "SDL failed to open audio: %s\n", SDL_GetError() );
+ init_audio = 2;
+ }
+ else if ( got.size != 0 )
+ {
+ SDL_PauseAudio( 0 );
+ init_audio = 0;
+ }
+ }
+
+ if ( init_audio == 0 )
+ {
+ bytes = ( samples * channels * 2 );
+ pthread_mutex_lock( &this->audio_mutex );
+ while ( bytes > ( sizeof( this->audio_buffer) - this->audio_avail ) )
+ pthread_cond_wait( &this->audio_cond, &this->audio_mutex );
+ mlt_properties properties = mlt_frame_properties( frame );
+ if ( mlt_properties_get_double( properties, "_speed" ) == 1 )
memcpy( &this->audio_buffer[ this->audio_avail ], pcm, bytes );
- this->audio_avail += bytes;
- pthread_cond_broadcast( &this->audio_cond );
- pthread_mutex_unlock( &this->audio_mutex );
+ else
+ memset( &this->audio_buffer[ this->audio_avail ], 0, bytes );
+ this->audio_avail += bytes;
+ pthread_cond_broadcast( &this->audio_cond );
+ pthread_mutex_unlock( &this->audio_mutex );
+ }
+ else
+ {
+ this->playing = 1;
+ }
- // Get the image, width and height
- mlt_frame_get_image( frame, &image, &vfmt, &width, &height, 0 );
+ return init_audio;
+}
- if ( sdl_screen != NULL )
- {
- SDL_Event event;
+static int consumer_play_video( consumer_sdl this, mlt_frame frame, int64_t elapsed, int skip, int64_t playtime )
+{
+ // Get the properties of this consumer
+ mlt_properties properties = this->properties;
- changed = consumer_get_dimensions( &this->window_width, &this->window_height );
+ mlt_image_format vfmt = mlt_image_yuv422;
+ int width = this->width, height = this->height;
+ uint8_t *image;
+ int changed = 0;
+ int show = 1;
- while ( SDL_PollEvent( &event ) )
- {
- switch( event.type )
+ if ( mlt_properties_get_int( properties, "video_off" ) )
+ {
+ mlt_frame_close( frame );
+ return 0;
+ }
+
+ // Handle events
+ if ( this->sdl_screen != NULL )
+ {
+ SDL_Event event;
+
+ changed = consumer_get_dimensions( &this->window_width, &this->window_height );
+
+ while ( SDL_PollEvent( &event ) )
+ {
+ switch( event.type )
+ {
+ case SDL_VIDEORESIZE:
+ this->window_width = event.resize.w;
+ this->window_height = event.resize.h;
+ changed = 1;
+ break;
+ case SDL_KEYDOWN:
{
- case SDL_VIDEORESIZE:
- this->window_width = event.resize.w;
- this->window_height = event.resize.h;
- changed = 1;
- break;
- case SDL_KEYDOWN:
- {
- mlt_producer producer = mlt_properties_get_data( properties, "transport_producer", NULL );
- void (*callback)( mlt_producer, char * ) = mlt_properties_get_data( properties, "transport_callback", NULL );
- if ( callback != NULL && producer != NULL )
- callback( producer, SDL_GetKeyName(event.key.keysym.sym) );
- }
- break;
+ mlt_producer producer = mlt_properties_get_data( properties, "transport_producer", NULL );
+ char keyboard[ 2 ] = " ";
+ void (*callback)( mlt_producer, char * ) = mlt_properties_get_data( properties, "transport_callback", NULL );
+ if ( callback != NULL && producer != NULL && event.key.keysym.unicode < 0x80 && event.key.keysym.unicode > 0 )
+ {
+ keyboard[ 0 ] = ( char )event.key.keysym.unicode;
+ callback( producer, keyboard );
+ }
}
- }
+ break;
}
+ }
+ }
+
+ // Set skip
+ mlt_properties_set_int( mlt_frame_properties( frame ), "skip", skip );
+ mlt_properties_set_position( mlt_frame_properties( frame ), "playtime", playtime );
- if ( sdl_screen == NULL || changed )
+ // Push this frame to the back of the queue
+ mlt_deque_push_back( this->queue, frame );
+ frame = NULL;
+
+ if ( this->playing )
+ {
+ // We might want to use an old frame if the current frame is skipped
+ mlt_frame candidate = NULL;
+
+ while ( frame == NULL && mlt_deque_count( this->queue ) )
+ {
+ frame = mlt_deque_peek_front( this->queue );
+ show = !mlt_properties_get_int( mlt_frame_properties( frame ), "skip" );
+ playtime = mlt_properties_get_position( mlt_frame_properties( frame ), "playtime" );
+
+ // Check if frame is in the future or past
+ if ( !show )
+ {
+ frame = mlt_deque_pop_front( this->queue );
+ mlt_frame_close( frame );
+ frame = NULL;
+ }
+ else if ( playtime > elapsed )
+ {
+ // no frame to show or remove
+ frame = NULL;
+ break;
+ }
+ else if ( playtime < elapsed - 40 )
+ {
+ if ( candidate != NULL )
+ mlt_frame_close( candidate );
+ candidate = mlt_deque_pop_front( this->queue );
+ frame = NULL;
+ }
+ else
{
- double aspect_ratio = mlt_frame_get_aspect_ratio( frame );
+ // Get the frame at the front of the queue
+ frame = mlt_deque_pop_front( this->queue );
+ }
+ }
- if ( this->window_width == 0 || this->window_height == 0 )
- {
- this->window_width = width;
- this->window_height = height;
- }
+ if ( frame == NULL )
+ frame = candidate;
+ else if ( candidate != NULL )
+ mlt_frame_close( candidate );
+ }
- // open SDL window with video overlay, if possible
- sdl_screen = SDL_SetVideoMode( this->window_width, this->window_height, 0, sdl_flags );
+ if ( this->playing && frame != NULL )
+ {
+ // Get the image, width and height
+ mlt_frame_get_image( frame, &image, &vfmt, &width, &height, 0 );
- if ( sdl_screen != NULL )
- {
- SDL_Rect rect;
- if ( this->window_width < this->window_height * aspect_ratio )
- {
- rect.w = this->window_width;
- rect.h = this->window_width / aspect_ratio;
- }
- else
- {
- rect.w = this->window_height * aspect_ratio;
- rect.h = this->window_height;
- }
+ if ( width != this->width || height != this->height )
+ {
+ this->width = width;
+ this->height = height;
+ changed = 1;
+ }
+
+ if ( this->sdl_screen == NULL || changed )
+ {
+ double aspect_ratio = mlt_frame_get_aspect_ratio( frame );
+ float display_aspect_ratio = (float)width / (float)height;
+ SDL_Rect rect;
- rect.x = ( this->window_width - rect.w ) / 2;
- rect.y = ( this->window_height - rect.h ) / 2;
-
- SDL_SetClipRect( sdl_screen, &rect );
-
- // Force an overlay recreation
- if ( sdl_overlay != NULL )
- SDL_FreeYUVOverlay( sdl_overlay );
- sdl_lock_display();
- sdl_overlay = SDL_CreateYUVOverlay( this->width, this->height, SDL_YUY2_OVERLAY, sdl_screen );
- sdl_unlock_display();
- }
+ if ( mlt_properties_get_double( properties, "aspect_ratio" ) )
+ aspect_ratio = mlt_properties_get_double( properties, "aspect_ratio" );
+
+ if ( aspect_ratio == 1 )
+ {
+ rect.w = this->window_width;
+ rect.h = this->window_height;
}
-
- if ( sdl_screen != NULL && sdl_overlay != NULL )
+ else if ( this->window_width < this->window_height * aspect_ratio )
{
- buffer = sdl_overlay->pixels[ 0 ];
- if ( sdl_lock_display() )
- {
- if ( SDL_LockYUVOverlay( sdl_overlay ) >= 0 )
- {
- mlt_resize_yuv422( buffer, this->width, this->height, image, width, height );
- SDL_UnlockYUVOverlay( sdl_overlay );
- SDL_DisplayYUVOverlay( sdl_overlay, &sdl_screen->clip_rect );
- }
- sdl_unlock_display();
- }
+ rect.w = this->window_width;
+ rect.h = this->window_width / aspect_ratio;
}
else
{
- // TODO: allocate buffer?
+ rect.w = this->window_height * aspect_ratio;
+ rect.h = this->window_height;
+ }
+
+ if ( mlt_properties_get_int( properties, "scale_overlay" ) )
+ {
+ if ( ( float )rect.w * display_aspect_ratio < this->window_width )
+ rect.w = ( int )( ( float )rect.w * display_aspect_ratio );
+ else if ( ( float )rect.h * display_aspect_ratio < this->window_height )
+ rect.h = ( int )( ( float )rect.h * display_aspect_ratio );
}
- // Close the frame
- mlt_frame_close( frame );
+ rect.x = ( this->window_width - rect.w ) / 2;
+ rect.y = ( this->window_height - rect.h ) / 2;
+
+ // Force an overlay recreation
+ if ( this->sdl_overlay != NULL )
+ SDL_FreeYUVOverlay( this->sdl_overlay );
+
+ // open SDL window with video overlay, if possible
+ this->sdl_screen = SDL_SetVideoMode( this->window_width, this->window_height, 0, this->sdl_flags );
+
+ if ( this->sdl_screen != NULL )
+ {
+ SDL_SetClipRect( this->sdl_screen, &rect );
+
+ sdl_lock_display();
+ this->sdl_overlay = SDL_CreateYUVOverlay( this->width - (this->width % 4), this->height- (this->height % 2 ), SDL_YUY2_OVERLAY, this->sdl_screen );
+ sdl_unlock_display();
+ }
}
- else
+
+ if ( this->sdl_screen != NULL && this->sdl_overlay != NULL )
+ {
+ this->buffer = this->sdl_overlay->pixels[ 0 ];
+ if ( SDL_LockYUVOverlay( this->sdl_overlay ) >= 0 )
+ {
+ memcpy( this->buffer, image, width * height * 2 );
+ SDL_UnlockYUVOverlay( this->sdl_overlay );
+ SDL_DisplayYUVOverlay( this->sdl_overlay, &this->sdl_screen->clip_rect );
+ }
+ }
+ }
+
+ // Close the frame
+ if ( frame != NULL )
+ mlt_frame_close( frame );
+
+ if ( mlt_deque_count( this->queue ) && !skip )
+ {
+ // Tell the producers about our scale relative to the normalisation
+ frame = mlt_deque_peek_front( this->queue );
+ mlt_properties_set_double( mlt_frame_properties( frame ), "consumer_scale",
+ ( double )height / mlt_properties_get_double( properties, "height" ) );
+ mlt_frame_get_image( frame, &image, &vfmt, &width, &height, 0 );
+ }
+
+ return 0;
+}
+
+/** Threaded wrapper for pipe.
+*/
+
+static void *consumer_thread( void *arg )
+{
+ // Identify the arg
+ consumer_sdl this = arg;
+
+ // Get the consumer
+ mlt_consumer consumer = &this->parent;
+
+ // internal intialization
+ int init_audio = 1;
+
+ // Obtain time of thread start
+ struct timeb now;
+ int64_t start = 0;
+ int64_t elapsed = 0;
+ int duration = 0;
+ int64_t playtime = 0;
+ int skip = 0;
+
+ if ( SDL_Init( SDL_INIT_VIDEO | SDL_INIT_AUDIO | SDL_INIT_NOPARACHUTE ) < 0 )
+ {
+ fprintf( stderr, "Failed to initialize SDL: %s\n", SDL_GetError() );
+ return NULL;
+ }
+
+ // Loop until told not to
+ while( this->running )
+ {
+ // Get a frame from the attached producer
+ mlt_frame frame = mlt_consumer_get_frame( consumer );
+
+ // Ensure that we have a frame
+ if ( frame != NULL )
{
- break;
+ skip = 0;
+
+ // SDL adapts display aspect, but set this so pixel aspect can be normalised
+// mlt_properties_set_double( mlt_frame_properties( frame ), "consumer_aspect_ratio",
+// mlt_frame_get_aspect_ratio( frame ) );
+
+ // Play audio
+ init_audio = consumer_play_audio( this, frame, init_audio, &duration );
+
+ if ( this->playing )
+ {
+ // Get the current time
+ ftime( &now );
+
+ // Determine elapsed time
+ if ( start == 0 )
+ start = ( int64_t )now.time * 1000 + now.millitm;
+ else
+ elapsed = ( ( int64_t )now.time * 1000 + now.millitm ) - start;
+
+ skip = playtime < elapsed;
+
+ if ( skip )
+ start = start + ( elapsed - playtime );
+ }
+
+ consumer_play_video( this, frame, elapsed, skip, playtime );
+
+ playtime += duration;
}
- } // while
+ }
// internal cleanup
if ( init_audio == 0 )
SDL_AudioQuit( );
- if ( sdl_overlay != NULL )
- SDL_FreeYUVOverlay( sdl_overlay );
+ if ( this->sdl_overlay != NULL )
+ SDL_FreeYUVOverlay( this->sdl_overlay );
SDL_Quit( );
+ while( mlt_deque_count( this->queue ) )
+ mlt_frame_close( mlt_deque_pop_back( this->queue ) );
+
+ this->sdl_screen = NULL;
+ this->sdl_overlay = NULL;
+ this->audio_avail = 0;
+
return NULL;
}
// Get the actual object
consumer_sdl this = parent->child;
- // Kill the thread and clean up
- this->running = 0;
-
- pthread_mutex_lock( &this->audio_mutex );
- pthread_cond_broadcast( &this->audio_cond );
- pthread_mutex_unlock( &this->audio_mutex );
+ // Stop the consumer
+ mlt_consumer_stop( parent );
- pthread_join( this->thread, NULL );
+ // Destroy mutexes
pthread_mutex_destroy( &this->audio_mutex );
pthread_cond_destroy( &this->audio_cond );
- // Now clean up the rest (the close = NULL is a bit nasty but needed for now)
- parent->close = NULL;
+ // Now clean up the rest
mlt_consumer_close( parent );
// Finally clean up this