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