projects / melted / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
+ Keyboard handling events on Darwin
[melted] / src / inigo / inigo.c
1 #include <stdio.h>
2 #include <stdlib.h>
3 #include <string.h>
4 #include <sched.h>
5
6 #include <framework/mlt.h>
7
8 #include "io.h"
9
10 static void transport_action( mlt_producer producer, char *value )
11 {
12 mlt_properties properties = MLT_PRODUCER_PROPERTIES( producer );
13 mlt_multitrack multitrack = mlt_properties_get_data( properties, "multitrack", NULL );
14 mlt_consumer consumer = mlt_properties_get_data( properties, "transport_consumer", NULL );
15
16 mlt_properties_set_int( properties, "stats_off", 0 );
17
18 if ( strlen( value ) == 1 )
19 {
20 switch( value[ 0 ] )
21 {
22 case 'q':
23 mlt_properties_set_int( properties, "done", 1 );
24 break;
25 case '0':
26 mlt_producer_set_speed( producer, 1 );
27 mlt_producer_seek( producer, 0 );
28 break;
29 case '1':
30 mlt_producer_set_speed( producer, -10 );
31 break;
32 case '2':
33 mlt_producer_set_speed( producer, -5 );
34 break;
35 case '3':
36 mlt_producer_set_speed( producer, -2 );
37 break;
38 case '4':
39 mlt_producer_set_speed( producer, -1 );
40 break;
41 case '5':
42 mlt_producer_set_speed( producer, 0 );
43 break;
44 case '6':
45 case ' ':
46 mlt_producer_set_speed( producer, 1 );
47 break;
48 case '7':
49 mlt_producer_set_speed( producer, 2 );
50 break;
51 case '8':
52 mlt_producer_set_speed( producer, 5 );
53 break;
54 case '9':
55 mlt_producer_set_speed( producer, 10 );
56 break;
57 case 'd':
58 if ( multitrack != NULL )
59 {
60 int i = 0;
61 mlt_position last = -1;
62 fprintf( stderr, "\n" );
63 for ( i = 0; 1; i ++ )
64 {
65 mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_start, i );
66 if ( time == last )
67 break;
68 last = time;
69 fprintf( stderr, "%d: %d\n", i, (int)time );
70 }
71 }
72 break;
73
74 case 'g':
75 if ( multitrack != NULL )
76 {
77 mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_current, 0 );
78 mlt_producer_seek( producer, time );
79 }
80 break;
81 case 'H':
82 if ( producer != NULL )
83 {
84 mlt_position position = mlt_producer_position( producer );
85 mlt_producer_seek( producer, position - ( mlt_producer_get_fps( producer ) * 60 ) );
86 }
87 break;
88 case 'h':
89 if ( producer != NULL )
90 {
91 mlt_position position = mlt_producer_position( producer );
92 mlt_producer_set_speed( producer, 0 );
93 mlt_producer_seek( producer, position - 1 );
94 }
95 break;
96 case 'j':
97 if ( multitrack != NULL )
98 {
99 mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_current, 1 );
100 mlt_producer_seek( producer, time );
101 }
102 break;
103 case 'k':
104 if ( multitrack != NULL )
105 {
106 mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_current, -1 );
107 mlt_producer_seek( producer, time );
108 }
109 break;
110 case 'l':
111 if ( producer != NULL )
112 {
113 mlt_position position = mlt_producer_position( producer );
114 if ( mlt_producer_get_speed( producer ) != 0 )
115 mlt_producer_set_speed( producer, 0 );
116 else
117 mlt_producer_seek( producer, position + 1 );
118 }
119 break;
120 case 'L':
121 if ( producer != NULL )
122 {
123 mlt_position position = mlt_producer_position( producer );
124 mlt_producer_seek( producer, position + ( mlt_producer_get_fps( producer ) * 60 ) );
125 }
126 break;
127 }
128
129 mlt_properties_set_int( MLT_CONSUMER_PROPERTIES( consumer ), "refresh", 1 );
130 }
131
132 mlt_properties_set_int( properties, "stats_off", 0 );
133 }
134
135 static mlt_consumer create_consumer( char *id, mlt_producer producer )
136 {
137 char *arg = id != NULL ? strchr( id, ':' ) : NULL;
138 if ( arg != NULL )
139 *arg ++ = '\0';
140 mlt_consumer consumer = mlt_factory_consumer( id, arg );
141 if ( consumer != NULL )
142 {
143 mlt_properties properties = MLT_CONSUMER_PROPERTIES( consumer );
144 mlt_properties_set_data( properties, "transport_callback", transport_action, 0, NULL, NULL );
145 mlt_properties_set_data( properties, "transport_producer", producer, 0, NULL, NULL );
146 mlt_properties_set_data( MLT_PRODUCER_PROPERTIES( producer ), "transport_consumer", consumer, 0, NULL, NULL );
147 }
148 return consumer;
149 }
150
151 #ifdef __DARWIN__
152
153 static void event_handling( mlt_producer producer, mlt_consumer consumer )
154 {
155 SDL_Event event;
156
157 while ( SDL_PollEvent( &event ) )
158 {
159 switch( event.type )
160 {
161 case SDL_QUIT:
162 mlt_properties_set_int( MLT_PRODUCER_PROPERTIES( consumer ), "done", 1 );
163 break;
164
165 case SDL_KEYDOWN:
166 if ( event.key.keysym.unicode < 0x80 && event.key.keysym.unicode > 0 )
167 {
168 char keyboard[ 2 ] = { event.key.keysym.unicode, 0 };
169 transport_action( producer, keyboard );
170 }
171 break;
172 }
173 }
174 }
175
176 #endif
177
178 static void transport( mlt_producer producer, mlt_consumer consumer )
179 {
180 mlt_properties properties = MLT_PRODUCER_PROPERTIES( producer );
181 int silent = mlt_properties_get_int( MLT_CONSUMER_PROPERTIES( consumer ), "silent" );
182 struct timespec tm = { 0, 40000 };
183
184 if ( mlt_properties_get_int( properties, "done" ) == 0 && !mlt_consumer_is_stopped( consumer ) )
185 {
186 if ( !silent )
187 {
188 term_init( );
189
190 fprintf( stderr, "+-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+\n" );
191 fprintf( stderr, "|1=-10| |2= -5| |3= -2| |4= -1| |5= 0| |6= 1| |7= 2| |8= 5| |9= 10|\n" );
192 fprintf( stderr, "+-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+\n" );
193
194 fprintf( stderr, "+---------------------------------------------------------------------+\n" );
195 fprintf( stderr, "| H = back 1 minute, L = forward 1 minute |\n" );
196 fprintf( stderr, "| h = previous frame, l = next frame |\n" );
197 fprintf( stderr, "| g = start of clip, j = next clip, k = previous clip |\n" );
198 fprintf( stderr, "| 0 = restart, q = quit, space = play |\n" );
199 fprintf( stderr, "+---------------------------------------------------------------------+\n" );
200 }
201
202 while( mlt_properties_get_int( properties, "done" ) == 0 && !mlt_consumer_is_stopped( consumer ) )
203 {
204 int value = silent ? -1 : term_read( );
205
206 if ( value != -1 )
207 {
208 char string[ 2 ] = { value, 0 };
209 transport_action( producer, string );
210 }
211
212 #ifdef __DARWIN__
213 event_handling( producer, consumer );
214 #endif
215
216 if ( !silent && mlt_properties_get_int( properties, "stats_off" ) == 0 )
217 fprintf( stderr, "Current Position: %10d\r", (int)mlt_producer_position( producer ) );
218
219 if ( silent )
220 nanosleep( &tm, NULL );
221 }
222
223 if ( !silent )
224 fprintf( stderr, "\n" );
225 }
226 }
227
228 int main( int argc, char **argv )
229 {
230 int i;
231 mlt_consumer consumer = NULL;
232 mlt_producer inigo = NULL;
233 FILE *store = NULL;
234 char *name = NULL;
235 struct sched_param scp;
236
237 // Use realtime scheduling if possible
238 memset( &scp, '\0', sizeof( scp ) );
239 scp.sched_priority = sched_get_priority_max( SCHED_FIFO ) - 1;
240 #ifndef __DARWIN__
241 sched_setscheduler( 0, SCHED_FIFO, &scp );
242 #endif
243
244 // Construct the factory
245 mlt_factory_init( NULL );
246
247 // Check for serialisation switch first
248 for ( i = 1; i < argc; i ++ )
249 {
250 if ( !strcmp( argv[ i ], "-serialise" ) )
251 {
252 name = argv[ ++ i ];
253 if ( strstr( name, ".inigo" ) )
254 store = fopen( name, "w" );
255 }
256 }
257
258 // Get inigo producer
259 if ( argc > 1 )
260 inigo = mlt_factory_producer( "inigo", &argv[ 1 ] );
261
262 if ( argc > 1 && inigo != NULL && mlt_producer_get_length( inigo ) > 0 )
263 {
264 // Get inigo's properties
265 mlt_properties inigo_props = MLT_PRODUCER_PROPERTIES( inigo );
266
267 // Get the last group
268 mlt_properties group = mlt_properties_get_data( inigo_props, "group", 0 );
269
270 // Parse the arguments
271 for ( i = 1; i < argc; i ++ )
272 {
273 if ( !strcmp( argv[ i ], "-consumer" ) )
274 {
275 consumer = create_consumer( argv[ ++ i ], inigo );
276 while ( argv[ i + 1 ] != NULL && strstr( argv[ i + 1 ], "=" ) )
277 mlt_properties_parse( group, argv[ ++ i ] );
278 }
279 else if ( !strcmp( argv[ i ], "-serialise" ) )
280 {
281 i ++;
282 }
283 else
284 {
285 if ( store != NULL )
286 fprintf( store, "%s\n", argv[ i ] );
287
288 i ++;
289
290 while ( argv[ i ] != NULL && argv[ i ][ 0 ] != '-' )
291 {
292 if ( store != NULL )
293 fprintf( store, "%s\n", argv[ i ] );
294 i += 1;
295 }
296
297 i --;
298 }
299 }
300
301 // If we have no consumer, default to sdl
302 if ( store == NULL && consumer == NULL )
303 consumer = create_consumer( NULL, inigo );
304
305 if ( consumer != NULL && store == NULL )
306 {
307 // Apply group settings
308 mlt_properties properties = MLT_CONSUMER_PROPERTIES( consumer );
309 mlt_properties_inherit( properties, group );
310
311 // Connect consumer to inigo
312 mlt_consumer_connect( consumer, MLT_PRODUCER_SERVICE( inigo ) );
313
314 // Start the consumer
315 mlt_consumer_start( consumer );
316
317 // Transport functionality
318 transport( inigo, consumer );
319
320 // Stop the consumer
321 mlt_consumer_stop( consumer );
322 }
323 else if ( store != NULL )
324 {
325 fprintf( stderr, "Project saved as %s.\n", name );
326 fclose( store );
327 }
328 }
329 else
330 {
331 fprintf( stderr, "Usage: inigo [ -group [ name=value ]* ]\n"
332 " [ -consumer id[:arg] [ name=value ]* ]\n"
333 " [ -filter filter[:arg] [ name=value ] * ]\n"
334 " [ -attach filter[:arg] [ name=value ] * ]\n"
335 " [ -mix length [ -mixer transition ]* ]\n"
336 " [ -transition id[:arg] [ name=value ] * ]\n"
337 " [ -blank frames ]\n"
338 " [ -track ]\n"
339 " [ -split relative-frame ]\n"
340 " [ -join clips ]\n"
341 " [ -repeat times ]\n"
342 " [ producer [ name=value ] * ]+\n" );
343 }
344
345 // Close the consumer
346 if ( consumer != NULL )
347 mlt_consumer_close( consumer );
348
349 // Close the producer
350 if ( inigo != NULL )
351 mlt_producer_close( inigo );
352
353 // Close the factory
354 mlt_factory_close( );
355
356 return 0;
357 }
my melted branch