]> git.sesse.net Git - mlt/blob - src/modules/sdl/consumer_sdl_preview.c
Attempt at an aspect ratio clean up
[mlt] / 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
65                 // Get the properties
66                 mlt_properties properties = mlt_consumer_properties( parent );
67
68                 // Get the width and height
69                 int width = mlt_properties_get_int( properties, "width" );
70                 int height = mlt_properties_get_int( properties, "height" );
71
72                 // Process actual param
73                 if ( arg == NULL || sscanf( arg, "%dx%d", &width, &height ) == 2 )
74                 {
75                         mlt_properties_set_int( properties, "width", width );
76                         mlt_properties_set_int( properties, "height", height );
77                 }
78
79                 // Create child consumers
80                 this->play = mlt_factory_consumer( "sdl", arg );
81                 this->still = mlt_factory_consumer( "sdl_still", arg );
82                 mlt_properties_set( mlt_consumer_properties( parent ), "real_time", "0" );
83                 parent->close = consumer_close;
84                 parent->start = consumer_start;
85                 parent->stop = consumer_stop;
86                 parent->is_stopped = consumer_is_stopped;
87                 this->joined = 1;
88                 mlt_events_listen( mlt_consumer_properties( this->play ), this, "consumer-frame-show", ( mlt_listener )consumer_frame_show_cb );
89                 mlt_events_listen( mlt_consumer_properties( this->still ), this, "consumer-frame-show", ( mlt_listener )consumer_frame_show_cb );
90                 mlt_events_listen( mlt_consumer_properties( this->play ), this, "consumer-sdl-event", ( mlt_listener )consumer_sdl_event_cb );
91                 mlt_events_listen( mlt_consumer_properties( this->still ), this, "consumer-sdl-event", ( mlt_listener )consumer_sdl_event_cb );
92                 return parent;
93         }
94         free( this );
95         return NULL;
96 }
97
98 void consumer_frame_show_cb( mlt_consumer sdl, mlt_consumer parent, mlt_frame frame )
99 {
100         consumer_sdl this = parent->child;
101         this->last_speed = mlt_properties_get_double( mlt_frame_properties( frame ), "_speed" );
102         mlt_events_fire( mlt_consumer_properties( parent ), "consumer-frame-show", frame, NULL );
103 }
104
105 static void consumer_sdl_event_cb( mlt_consumer sdl, mlt_consumer parent, SDL_Event *event )
106 {
107         mlt_events_fire( mlt_consumer_properties( parent ), "consumer-sdl-event", event, NULL );
108 }
109
110 static int consumer_start( mlt_consumer parent )
111 {
112         consumer_sdl this = parent->child;
113
114         if ( !this->running )
115         {
116                 pthread_attr_t thread_attributes;
117                 
118                 consumer_stop( parent );
119
120                 this->running = 1;
121                 this->joined = 0;
122                 this->last_speed = 1;
123
124                 // Inherit the scheduling priority
125                 pthread_attr_init( &thread_attributes );
126                 pthread_attr_setinheritsched( &thread_attributes, PTHREAD_INHERIT_SCHED );
127
128                 pthread_create( &this->thread, &thread_attributes, consumer_thread, this );
129         }
130
131         return 0;
132 }
133
134 static int consumer_stop( mlt_consumer parent )
135 {
136         // Get the actual object
137         consumer_sdl this = parent->child;
138
139         if ( this->joined == 0 )
140         {
141                 // Kill the thread and clean up
142                 this->running = 0;
143
144                 pthread_join( this->thread, NULL );
145                 this->joined = 1;
146         }
147
148         return 0;
149 }
150
151 static int consumer_is_stopped( mlt_consumer parent )
152 {
153         consumer_sdl this = parent->child;
154         return !this->running;
155 }
156
157 static void *consumer_thread( void *arg )
158 {
159         // Identify the arg
160         consumer_sdl this = arg;
161
162         // Get the consumer
163         mlt_consumer consumer = &this->parent;
164
165         // internal intialization
166         int first = 1;
167         mlt_frame frame = NULL;
168
169         // properties
170         mlt_properties properties = mlt_consumer_properties( consumer );
171         mlt_properties play = mlt_consumer_properties( this->play );
172         mlt_properties still = mlt_consumer_properties( this->still );
173
174         if ( SDL_Init( SDL_INIT_VIDEO | SDL_INIT_NOPARACHUTE ) < 0 )
175         {
176                 fprintf( stderr, "Failed to initialize SDL: %s\n", SDL_GetError() );
177                 return NULL;
178         }
179
180         SDL_EnableKeyRepeat( SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL );
181         SDL_EnableUNICODE( 1 );
182
183         // Inform child consumers that we control the sdl
184         mlt_properties_set_int( play, "sdl_started", 1 );
185         mlt_properties_set_int( still, "sdl_started", 1 );
186
187         // Pass properties down
188         mlt_properties_set_data( play, "transport_producer", mlt_properties_get_data( properties, "transport_producer", NULL ), 0, NULL, NULL );
189         mlt_properties_set_data( still, "transport_producer", mlt_properties_get_data( properties, "transport_producer", NULL ), 0, NULL, NULL );
190         mlt_properties_set_data( play, "transport_callback", mlt_properties_get_data( properties, "transport_callback", NULL ), 0, NULL, NULL );
191         mlt_properties_set_data( still, "transport_callback", mlt_properties_get_data( properties, "transport_callback", NULL ), 0, NULL, NULL );
192         mlt_properties_set( play, "rescale", mlt_properties_get( properties, "rescale" ) );
193         mlt_properties_set( still, "rescale", mlt_properties_get( properties, "rescale" ) );
194         mlt_properties_set( play, "width", mlt_properties_get( properties, "width" ) );
195         mlt_properties_set( still, "width", mlt_properties_get( properties, "width" ) );
196         mlt_properties_set( play, "height", mlt_properties_get( properties, "height" ) );
197         mlt_properties_set( still, "height", mlt_properties_get( properties, "height" ) );
198
199         mlt_properties_pass( play, mlt_consumer_properties( consumer ), "play." );
200         mlt_properties_pass( still, mlt_consumer_properties( consumer ), "still." );
201
202         mlt_properties_set_data( play, "app_lock", mlt_properties_get_data( properties, "app_lock", NULL ), 0, NULL, NULL );
203         mlt_properties_set_data( still, "app_lock", mlt_properties_get_data( properties, "app_lock", NULL ), 0, NULL, NULL );
204         mlt_properties_set_data( play, "app_unlock", mlt_properties_get_data( properties, "app_unlock", NULL ), 0, NULL, NULL );
205         mlt_properties_set_data( still, "app_unlock", mlt_properties_get_data( properties, "app_unlock", NULL ), 0, NULL, NULL );
206
207         mlt_properties_set_int( play, "progressive", 1 );
208         mlt_properties_set_int( still, "progressive", 1 );
209
210         mlt_properties_set_int( play, "put_mode", 1 );
211         mlt_properties_set_int( still, "put_mode", 1 );
212
213         // Loop until told not to
214         while( this->running )
215         {
216                 // Get a frame from the attached producer
217                 frame = mlt_consumer_get_frame( consumer );
218
219                 // Ensure that we have a frame
220                 if ( frame != NULL )
221                 {
222                         // Get the speed of the frame
223                         double speed = mlt_properties_get_double( mlt_frame_properties( frame ), "_speed" );
224
225                         // Determine which speed to use
226                         double use_speed = first ? speed : this->last_speed;
227
228                         // Get changed requests to the preview (focus changes)
229                         int changed = mlt_properties_get_int( properties, "changed" );
230
231                         // Get refresh request for the current frame (effect changes in still mode)
232                         int refresh = mlt_properties_get_int( properties, "refresh" );
233
234                         // Decrement refresh and clear changed
235                         mlt_properties_set_int( properties, "refresh", refresh > 0 ? refresh - 1 : 0 );
236                         mlt_properties_set_int( properties, "changed", 0 );
237
238                         // Set the changed property on this frame for the benefit of still
239                         mlt_properties_set_int( mlt_frame_properties( frame ), "refresh", refresh );
240
241                         // Make sure the recipient knows that this frame isn't really rendered
242                         mlt_properties_set_int( mlt_frame_properties( frame ), "rendered", 0 );
243
244                         // If we're not the first frame and both consumers are stopped, then stop ourselves
245                         if ( !first && mlt_consumer_is_stopped( this->play ) && mlt_consumer_is_stopped( this->still ) )
246                         {
247                                 this->running = 0;
248                                 mlt_frame_close( frame );
249                         }
250                         // Allow a little grace time before switching consumers on speed changes
251                         else if ( this->ignore_change -- > 0 && this->active != NULL && !mlt_consumer_is_stopped( this->active ) )
252                         {
253                                 mlt_consumer_put_frame( this->active, frame );
254                                 mlt_properties_set_int( still, "changed", changed );
255                         }
256                         // If we aren't playing normally, then use the still
257                         else if ( use_speed != 1 )
258                         {
259                                 if ( !mlt_consumer_is_stopped( this->play ) )
260                                         mlt_consumer_stop( this->play );
261                                 if ( mlt_consumer_is_stopped( this->still ) )
262                                 {
263                                         this->last_speed = use_speed;
264                                         this->active = this->still;
265                                         mlt_consumer_start( this->still );
266                                 }
267                                 mlt_properties_set_int( still, "changed", changed );
268                                 mlt_consumer_put_frame( this->still, frame );
269                         }
270                         // Otherwise use the normal player
271                         else
272                         {
273                                 if ( !mlt_consumer_is_stopped( this->still ) )
274                                         mlt_consumer_stop( this->still );
275                                 if ( mlt_consumer_is_stopped( this->play ) )
276                                 {
277                                         this->last_speed = use_speed;
278                                         this->active = this->play;
279                                         this->ignore_change = 25;
280                                         mlt_consumer_start( this->play );
281                                 }
282                                 mlt_properties_set_int( still, "changed", changed );
283                                 mlt_consumer_put_frame( this->play, frame );
284                         }
285
286                         // Copy the rectangle info from the active consumer
287                         if ( this->running )
288                         {
289                                 mlt_properties active = mlt_consumer_properties( this->active );
290                                 mlt_properties_set_int( properties, "rect_x", mlt_properties_get_int( active, "rect_x" ) );
291                                 mlt_properties_set_int( properties, "rect_y", mlt_properties_get_int( active, "rect_y" ) );
292                                 mlt_properties_set_int( properties, "rect_w", mlt_properties_get_int( active, "rect_w" ) );
293                                 mlt_properties_set_int( properties, "rect_h", mlt_properties_get_int( active, "rect_h" ) );
294                         }
295
296                         // We are definitely not waiting on the first frame any more
297                         first = 0;
298                 }
299         }
300
301         mlt_consumer_stop( this->play );
302         mlt_consumer_stop( this->still );
303
304         SDL_Quit( );
305
306         return NULL;
307 }
308
309 /** Callback to allow override of the close method.
310 */
311
312 static void consumer_close( mlt_consumer parent )
313 {
314         // Get the actual object
315         consumer_sdl this = parent->child;
316
317         // Stop the consumer
318         mlt_consumer_stop( parent );
319
320         // Now clean up the rest
321         mlt_consumer_close( parent );
322
323         // Close the child consumers
324         mlt_consumer_close( this->play );
325         mlt_consumer_close( this->still );
326
327         // Finally clean up this
328         free( this );
329 }