research.m1stereo.tv/gitweb/ - melted/blob - src/modules/sdl/consumer_sdl_preview.c

   1 /*
   2  * consumer_sdl_preview.c -- A Simple DirectMedia Layer consumer
   3  * Copyright (C) 2004-2005 Ushodaya Enterprises Limited
   4  * Author: Charles Yates
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software Foundation,
  18  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  19  */
  20
  21 #include "consumer_sdl.h"
  22 #include <framework/mlt_frame.h>
  23 #include <framework/mlt_factory.h>
  24 #include <framework/mlt_producer.h>
  25 #include <stdlib.h>
  26 #include <pthread.h>
  27 #include <SDL/SDL.h>
  28 #include <SDL/SDL_syswm.h>
  29
  30 typedef struct consumer_sdl_s *consumer_sdl;
  31
  32 struct consumer_sdl_s
  33 {
  34         struct mlt_consumer_s parent;
  35         mlt_consumer active;
  36         int ignore_change;
  37         mlt_consumer play;
  38         mlt_consumer still;
  39         pthread_t thread;
  40         int joined;
  41         int running;
  42         int sdl_flags;
  43         double last_speed;
  44 };
  45
  46 /** Forward references to static functions.
  47 */
  48
  49 static int consumer_start( mlt_consumer parent );
  50 static int consumer_stop( mlt_consumer parent );
  51 static int consumer_is_stopped( mlt_consumer parent );
  52 static void consumer_close( mlt_consumer parent );
  53 static void *consumer_thread( void * );
  54 static void consumer_frame_show_cb( mlt_consumer sdl, mlt_consumer this, mlt_frame frame );
  55 static void consumer_sdl_event_cb( mlt_consumer sdl, mlt_consumer this, SDL_Event *event );
  56
  57 mlt_consumer consumer_sdl_preview_init( char *arg )
  58 {
  59         consumer_sdl this = calloc( sizeof( struct consumer_sdl_s ), 1 );
  60         if ( this != NULL && mlt_consumer_init( &this->parent, this ) == 0 )
  61         {
  62                 // Get the parent consumer object
  63                 mlt_consumer parent = &this->parent;
  64                 this->play = mlt_factory_consumer( "sdl", arg );
  65                 this->still = mlt_factory_consumer( "sdl_still", arg );
  66                 mlt_properties_set( mlt_consumer_properties( parent ), "real_time", "0" );
  67                 parent->close = consumer_close;
  68                 parent->start = consumer_start;
  69                 parent->stop = consumer_stop;
  70                 parent->is_stopped = consumer_is_stopped;
  71                 this->joined = 1;
  72                 mlt_events_listen( mlt_consumer_properties( this->play ), this, "consumer-frame-show", ( mlt_listener )consumer_frame_show_cb );
  73                 mlt_events_listen( mlt_consumer_properties( this->still ), this, "consumer-frame-show", ( mlt_listener )consumer_frame_show_cb );
  74                 return parent;
  75         }
  76         free( this );
  77         return NULL;
  78 }
  79
  80 void consumer_frame_show_cb( mlt_consumer sdl, mlt_consumer parent, mlt_frame frame )
  81 {
  82         consumer_sdl this = parent->child;
  83         this->last_speed = mlt_properties_get_double( mlt_frame_properties( frame ), "_speed" );
  84         mlt_events_fire( mlt_consumer_properties( parent ), "consumer-frame-show", frame, NULL );
  85 }
  86
  87 static void consumer_sdl_event_cb( mlt_consumer sdl, mlt_consumer parent, SDL_Event *event )
  88 {
  89         mlt_events_fire( mlt_consumer_properties( parent ), "consumer-sdl-event", event, NULL );
  90 }
  91
  92 static int consumer_start( mlt_consumer parent )
  93 {
  94         consumer_sdl this = parent->child;
  95
  96         if ( !this->running )
  97         {
  98                 pthread_attr_t thread_attributes;
  99
 100                 consumer_stop( parent );
 101
 102                 this->running = 1;
 103                 this->joined = 0;
 104                 this->last_speed = 1;
 105
 106                 // Inherit the scheduling priority
 107                 pthread_attr_init( &thread_attributes );
 108                 pthread_attr_setinheritsched( &thread_attributes, PTHREAD_INHERIT_SCHED );
 109
 110                 pthread_create( &this->thread, &thread_attributes, consumer_thread, this );
 111         }
 112
 113         return 0;
 114 }
 115
 116 static int consumer_stop( mlt_consumer parent )
 117 {
 118         // Get the actual object
 119         consumer_sdl this = parent->child;
 120
 121         if ( this->joined == 0 )
 122         {
 123                 // Kill the thread and clean up
 124                 this->running = 0;
 125
 126                 pthread_join( this->thread, NULL );
 127                 this->joined = 1;
 128         }
 129
 130         return 0;
 131 }
 132
 133 static int consumer_is_stopped( mlt_consumer parent )
 134 {
 135         consumer_sdl this = parent->child;
 136         return !this->running;
 137 }
 138
 139 static void *consumer_thread( void *arg )
 140 {
 141         // Identify the arg
 142         consumer_sdl this = arg;
 143
 144         // Get the consumer
 145         mlt_consumer consumer = &this->parent;
 146
 147         // internal intialization
 148         int first = 1;
 149         mlt_frame frame = NULL;
 150
 151         // properties
 152         mlt_properties properties = mlt_consumer_properties( consumer );
 153         mlt_properties play = mlt_consumer_properties( this->play );
 154         mlt_properties still = mlt_consumer_properties( this->still );
 155
 156         if ( SDL_Init( SDL_INIT_VIDEO | SDL_INIT_NOPARACHUTE ) < 0 )
 157         {
 158                 fprintf( stderr, "Failed to initialize SDL: %s\n", SDL_GetError() );
 159                 return NULL;
 160         }
 161
 162         SDL_EnableKeyRepeat( SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL );
 163         SDL_EnableUNICODE( 1 );
 164
 165         // Inform child consumers that we control the sdl
 166         mlt_properties_set_int( play, "sdl_started", 1 );
 167         mlt_properties_set_int( still, "sdl_started", 1 );
 168
 169         // Pass properties down
 170         mlt_properties_set_data( play, "transport_producer", mlt_properties_get_data( properties, "transport_producer", NULL ), 0, NULL, NULL );
 171         mlt_properties_set_data( still, "transport_producer", mlt_properties_get_data( properties, "transport_producer", NULL ), 0, NULL, NULL );
 172         mlt_properties_set_data( play, "transport_callback", mlt_properties_get_data( properties, "transport_callback", NULL ), 0, NULL, NULL );
 173         mlt_properties_set_data( still, "transport_callback", mlt_properties_get_data( properties, "transport_callback", NULL ), 0, NULL, NULL );
 174         mlt_properties_set( play, "rescale", mlt_properties_get( properties, "rescale" ) );
 175         mlt_properties_set( still, "rescale", mlt_properties_get( properties, "rescale" ) );
 176         mlt_properties_set( play, "width", mlt_properties_get( properties, "width" ) );
 177         mlt_properties_set( still, "width", mlt_properties_get( properties, "width" ) );
 178         mlt_properties_set( play, "height", mlt_properties_get( properties, "height" ) );
 179         mlt_properties_set( still, "height", mlt_properties_get( properties, "height" ) );
 180
 181         mlt_properties_pass( play, mlt_consumer_properties( consumer ), "play." );
 182         mlt_properties_pass( still, mlt_consumer_properties( consumer ), "still." );
 183
 184         mlt_properties_set_data( play, "app_lock", mlt_properties_get_data( properties, "app_lock", NULL ), 0, NULL, NULL );
 185         mlt_properties_set_data( still, "app_lock", mlt_properties_get_data( properties, "app_lock", NULL ), 0, NULL, NULL );
 186         mlt_properties_set_data( play, "app_unlock", mlt_properties_get_data( properties, "app_unlock", NULL ), 0, NULL, NULL );
 187         mlt_properties_set_data( still, "app_unlock", mlt_properties_get_data( properties, "app_unlock", NULL ), 0, NULL, NULL );
 188
 189         mlt_properties_set_int( play, "put_mode", 1 );
 190         mlt_properties_set_int( still, "put_mode", 1 );
 191
 192         // Loop until told not to
 193         while( this->running )
 194         {
 195                 // Get a frame from the attached producer
 196                 frame = mlt_consumer_get_frame( consumer );
 197
 198                 // Ensure that we have a frame
 199                 if ( frame != NULL )
 200                 {
 201                         // Get the speed of the frame
 202                         double speed = mlt_properties_get_double( mlt_frame_properties( frame ), "_speed" );
 203
 204                         // Determine which speed to use
 205                         double use_speed = first ? speed : this->last_speed;
 206
 207                         // Get changed requests to the preview
 208                         int changed = mlt_properties_get_int( properties, "changed" );
 209                         mlt_properties_set_int( properties, "changed", 0 );
 210
 211                         // Make sure the recipient knows that this frame isn't really rendered
 212                         mlt_properties_set_int( mlt_frame_properties( frame ), "rendered", 0 );
 213
 214                         if ( !first && mlt_consumer_is_stopped( this->play ) && mlt_consumer_is_stopped( this->still ) )
 215                         {
 216                                 this->running = 0;
 217                                 mlt_frame_close( frame );
 218                         }
 219                         else if ( this->ignore_change -- > 0 && this->active != NULL && !mlt_consumer_is_stopped( this->active ) )
 220                         {
 221                                 mlt_consumer_put_frame( this->active, frame );
 222                                 if ( this->active == this->still )
 223                                         mlt_properties_set_int( still, "changed", changed );
 224                         }
 225                         else if ( use_speed != 1 )
 226                         {
 227                                 if ( !mlt_consumer_is_stopped( this->play ) )
 228                                 {
 229                                         mlt_consumer_stop( this->play );
 230                                 }
 231                                 if ( mlt_consumer_is_stopped( this->still ) )
 232                                 {
 233                                         this->last_speed = use_speed;
 234                                         this->active = this->still;
 235                                         this->ignore_change = 5;
 236                                         mlt_consumer_start( this->still );
 237                                 }
 238                                 mlt_properties_set_int( still, "changed", changed );
 239                                 mlt_consumer_put_frame( this->still, frame );
 240                         }
 241                         else
 242                         {
 243                                 if ( !mlt_consumer_is_stopped( this->still ) )
 244                                 {
 245                                         mlt_consumer_stop( this->still );
 246                                 }
 247                                 if ( mlt_consumer_is_stopped( this->play ) )
 248                                 {
 249                                         this->last_speed = use_speed;
 250                                         this->active = this->play;
 251                                         this->ignore_change = 25;
 252                                         mlt_consumer_start( this->play );
 253                                 }
 254                                 mlt_consumer_put_frame( this->play, frame );
 255                         }
 256                         first = 0;
 257                 }
 258         }
 259
 260         mlt_consumer_stop( this->play );
 261         mlt_consumer_stop( this->still );
 262
 263         SDL_Quit( );
 264
 265         return NULL;
 266 }
 267
 268 /** Callback to allow override of the close method.
 269 */
 270
 271 static void consumer_close( mlt_consumer parent )
 272 {
 273         // Get the actual object
 274         consumer_sdl this = parent->child;
 275
 276         // Stop the consumer
 277         mlt_consumer_stop( parent );
 278
 279         // Now clean up the rest
 280         mlt_consumer_close( parent );
 281
 282         // Close the child consumers
 283         mlt_consumer_close( this->play );
 284         mlt_consumer_close( this->still );
 285
 286         // Finally clean up this
 287         free( this );
 288 }