Minor sdl hack
[melted] / src / modules / sdl / consumer_sdl.c
index 1be99ce..bdae25c 100644 (file)
@@ -27,6 +27,7 @@
 #include <pthread.h>
 #include <SDL/SDL.h>
 #include <SDL/SDL_syswm.h>
+#include <sys/timeb.h>
 
 /** This classes definition.
 */
@@ -40,7 +41,7 @@ struct consumer_sdl_s
        mlt_deque queue;
        pthread_t thread;
        int running;
-       uint8_t audio_buffer[ 4096 * 3 ];
+       uint8_t audio_buffer[ 4096 * 24 ];
        int audio_avail;
        pthread_mutex_t audio_mutex;
        pthread_cond_t audio_cond;
@@ -235,7 +236,7 @@ static void sdl_fill_audio( void *udata, uint8_t *stream, int len )
        pthread_mutex_unlock( &this->audio_mutex );
 }
 
-static int consumer_play_audio( consumer_sdl this, mlt_frame frame, int init_audio )
+static int consumer_play_audio( consumer_sdl this, mlt_frame frame, int init_audio, int *duration )
 {
        // Get the properties of this consumer
        mlt_properties properties = this->properties;
@@ -254,6 +255,7 @@ static int consumer_play_audio( consumer_sdl this, mlt_frame frame, int init_aud
        int bytes;
 
        mlt_frame_get_audio( frame, &pcm, &afmt, &frequency, &channels, &samples );
+       *duration = ( ( samples * 1000 ) / frequency );
 
        if ( mlt_properties_get_int( properties, "audio_off" ) )
        {
@@ -266,21 +268,19 @@ static int consumer_play_audio( consumer_sdl this, mlt_frame frame, int init_aud
                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 = 1024;
+               request.samples = 4096;
                request.callback = sdl_fill_audio;
                request.userdata = (void *)this;
                if ( SDL_OpenAudio( &request, &got ) != 0 )
                {
                        fprintf( stderr, "SDL failed to open audio: %s\n", SDL_GetError() );
+                       mlt_properties_set_int( properties, "audio_off", 1 );
                        init_audio = 2;
                }
                else if ( got.size != 0 )
@@ -313,8 +313,9 @@ static int consumer_play_audio( consumer_sdl this, mlt_frame frame, int init_aud
        return init_audio;
 }
 
-static int consumer_play_video( consumer_sdl this, mlt_frame frame )
+static int consumer_play_video( consumer_sdl this, mlt_frame frame, int64_t elapsed, int64_t playtime )
 {
+       int error = 0;
        // Get the properties of this consumer
        mlt_properties properties = this->properties;
 
@@ -322,6 +323,9 @@ static int consumer_play_video( consumer_sdl this, mlt_frame frame )
        int width = this->width, height = this->height;
        uint8_t *image;
        int changed = 0;
+       struct timeb now;
+       ftime( &now );
+       int64_t start = ( ( int64_t )now.time * 1000 + now.millitm );
 
        if ( mlt_properties_get_int( properties, "video_off" ) )
        {
@@ -329,23 +333,86 @@ static int consumer_play_video( consumer_sdl this, mlt_frame frame )
                return 0;
        }
 
-       // Push this frame to the back of the queue
-       mlt_deque_push_back( this->queue, frame );
+       if ( frame != NULL )
+       {
+               // Set playtime
+               mlt_properties_set_position( mlt_frame_properties( frame ), "playtime", playtime );
+               mlt_properties_set_double( mlt_frame_properties( frame ), "consumer_scale", ( double )height / mlt_properties_get_double( properties, "height" ) );
+
+               // Push this frame to the back of the queue
+               mlt_deque_push_back( this->queue, frame );
+       }
 
        if ( this->playing )
        {
-               // Get the frame at the front of the queue
-               frame = mlt_deque_pop_front( this->queue );
+               // We might want to use an old frame if the current frame is skipped
+               mlt_frame candidate = NULL;
+               frame = NULL;
+
+               while ( frame == NULL && mlt_deque_count( this->queue ) )
+               {
+                       frame = mlt_deque_peek_front( this->queue );
+                       playtime = mlt_properties_get_position( mlt_frame_properties( frame ), "playtime" );
+
+                       // Check if frame is in the future or past
+                       if ( playtime > elapsed + 500 )
+                       {
+                               // Too far in the future - play it now
+                               frame = mlt_deque_pop_front( this->queue );
+                       }
+                       else if ( playtime > elapsed + 160 )
+                       {
+                               // Time to squeeze a few more frames in
+                               frame = candidate;
+                               candidate = NULL;
+                               error = 1;
+                               break;
+                       }
+                       else if ( playtime < elapsed )
+                       {
+                               if ( candidate != NULL )
+                                       mlt_frame_close( candidate );
+                               candidate = mlt_deque_pop_front( this->queue );
+                               frame = NULL;
+                       }
+                       else
+                       {
+                               // Get the frame at the front of the queue
+                               frame = mlt_deque_pop_front( this->queue );
+                       }
+               }
+
+               if ( frame == NULL )
+                       frame = candidate;
+               else if ( candidate != NULL )
+                       mlt_frame_close( candidate );
+       }
+       else
+       {
+               if ( frame != NULL )
+                       mlt_frame_get_image( frame, &image, &vfmt, &width, &height, 0 );
+               frame = NULL;
+       }
 
+       if ( this->playing && frame != NULL )
+       {
                // Get the image, width and height
                mlt_frame_get_image( frame, &image, &vfmt, &width, &height, 0 );
+               ftime( &now );
+               elapsed += ( ( int64_t )now.time * 1000 + now.millitm ) - start;
+
+               playtime = mlt_properties_get_position( mlt_frame_properties( frame ), "playtime" );
+               struct timespec slow = { 0, ( playtime - elapsed ) * 1000 };
+               if ( slow.tv_nsec > 50 )
+                       nanosleep( &slow, NULL );
 
+               // 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 )
@@ -369,9 +436,8 @@ static int consumer_play_video( consumer_sdl this, mlt_frame frame )
                                                break;
                                }
                        }
-
                }
-
+       
                if ( width != this->width || height != this->height )
                {
                        this->width = width;
@@ -443,25 +509,12 @@ static int consumer_play_video( consumer_sdl this, mlt_frame frame )
                        }
                }
        }
-       else
-       {
-               frame = NULL;
-       }
 
        // Close the frame
        if ( frame != NULL )
                mlt_frame_close( frame );
 
-       if ( mlt_deque_count( this->queue ) )
-       {
-               // 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;
+       return error || frame == NULL;
 }
 
 /** Threaded wrapper for pipe.
@@ -478,27 +531,68 @@ static void *consumer_thread( void *arg )
        // 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;
+
+       // Initialise the SDL subsystem
        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;
        }
-       
+
+       // Additional initialisation
+       SDL_EnableKeyRepeat( SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL );
+       SDL_EnableUNICODE( 1 );
+
        // Loop until told not to
        while( this->running )
        {
                // Get a frame from the attached producer
                mlt_frame frame = mlt_consumer_get_frame( consumer );
+               mlt_frame video_frame = frame;
+               int done = 0;
 
                // Ensure that we have a frame
-               if ( frame != NULL )
+               while ( !done )
                {
-                       // 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 ) );
-                       
-                       init_audio = consumer_play_audio( this, frame, init_audio );
-                       consumer_play_video( this, frame );
+                       // Play audio
+                       if ( sizeof( this->audio_buffer ) - this->audio_avail > 8192 || mlt_deque_count( this->queue ) < 2 )
+                       {
+                               init_audio = consumer_play_audio( this, frame, init_audio, &duration );
+                               done = 1;
+                       }
+
+                       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;
+                       }
+
+                       if ( consumer_play_video( this, video_frame, elapsed, playtime ) )
+                       {
+                               if ( !done )
+                               {
+                                       init_audio = consumer_play_audio( this, frame, init_audio, &duration );
+                                       done = 1;
+                               }
+                       }
+
+                       if ( video_frame != NULL )
+                       {
+                               video_frame = NULL;
+                               playtime += duration;
+                       }
                }
        }