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