3 * Copyright (C) 2002-2003 Ushodaya Enterprises Limited
4 * Author: Dan Dennedy <dan@dennedy.org>
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.
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.
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.
25 #include <sys/types.h>
33 #include "miracle_unit.h"
34 #include "miracle_commands.h"
35 #include "miracle_log.h"
37 int miracle_load( command_argument cmd_arg )
39 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
40 char *filename = (char*) cmd_arg->argument;
44 if ( filename[0] == '!' )
50 if ( filename[0] == '/' )
53 snprintf( fullname, 1023, "%s%s", cmd_arg->root_dir, filename );
56 return RESPONSE_INVALID_UNIT;
59 int64_t in = -1, out = -1;
60 if ( valerie_tokeniser_count( cmd_arg->tokeniser ) == 5 )
62 in = atol( valerie_tokeniser_get_string( cmd_arg->tokeniser, 3 ) );
63 out = atol( valerie_tokeniser_get_string( cmd_arg->tokeniser, 4 ) );
65 if ( miracle_unit_load( unit, fullname, in, out, flush ) != valerie_ok )
66 return RESPONSE_BAD_FILE;
68 return RESPONSE_SUCCESS;
71 int miracle_list( command_argument cmd_arg )
73 miracle_unit unit = miracle_get_unit( cmd_arg->unit );
77 miracle_unit_report_list( unit, cmd_arg->response );
78 return RESPONSE_SUCCESS;
81 return RESPONSE_INVALID_UNIT;
84 static int parse_clip( command_argument cmd_arg, int arg )
86 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
87 int clip = miracle_unit_get_current_clip( unit );
89 if ( valerie_tokeniser_count( cmd_arg->tokeniser ) > arg )
91 char *token = valerie_tokeniser_get_string( cmd_arg->tokeniser, arg );
92 if ( token[ 0 ] == '+' )
93 clip += atoi( token + 1 );
94 else if ( token[ 0 ] == '-' )
95 clip -= atoi( token + 1 );
103 int miracle_insert( command_argument cmd_arg )
105 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
106 char *filename = (char*) cmd_arg->argument;
109 if ( filename[0] == '/' )
112 snprintf( fullname, 1023, "%s%s", cmd_arg->root_dir, filename );
115 return RESPONSE_INVALID_UNIT;
118 long in = -1, out = -1;
119 int index = parse_clip( cmd_arg, 3 );
121 if ( valerie_tokeniser_count( cmd_arg->tokeniser ) == 6 )
123 in = atoi( valerie_tokeniser_get_string( cmd_arg->tokeniser, 4 ) );
124 out = atoi( valerie_tokeniser_get_string( cmd_arg->tokeniser, 5 ) );
127 switch( miracle_unit_insert( unit, fullname, index, in, out ) )
130 return RESPONSE_SUCCESS;
132 return RESPONSE_BAD_FILE;
135 return RESPONSE_SUCCESS;
138 int miracle_remove( command_argument cmd_arg )
140 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
143 return RESPONSE_INVALID_UNIT;
146 int index = parse_clip( cmd_arg, 2 );
148 if ( miracle_unit_remove( unit, index ) != valerie_ok )
149 return RESPONSE_BAD_FILE;
151 return RESPONSE_SUCCESS;
154 int miracle_clean( command_argument cmd_arg )
156 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
159 return RESPONSE_INVALID_UNIT;
162 if ( miracle_unit_clean( unit ) != valerie_ok )
163 return RESPONSE_BAD_FILE;
165 return RESPONSE_SUCCESS;
168 int miracle_move( command_argument cmd_arg )
170 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
174 if ( valerie_tokeniser_count( cmd_arg->tokeniser ) > 2 )
176 int src = parse_clip( cmd_arg, 2 );
177 int dest = parse_clip( cmd_arg, 3 );
179 if ( miracle_unit_move( unit, src, dest ) != valerie_ok )
180 return RESPONSE_BAD_FILE;
184 return RESPONSE_MISSING_ARG;
189 return RESPONSE_INVALID_UNIT;
192 return RESPONSE_SUCCESS;
195 int miracle_append( command_argument cmd_arg )
197 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
198 char *filename = (char*) cmd_arg->argument;
201 if ( filename[0] == '/' )
204 snprintf( fullname, 1023, "%s%s", cmd_arg->root_dir, filename );
207 return RESPONSE_INVALID_UNIT;
210 int64_t in = -1, out = -1;
211 if ( valerie_tokeniser_count( cmd_arg->tokeniser ) == 5 )
213 in = atol( valerie_tokeniser_get_string( cmd_arg->tokeniser, 3 ) );
214 out = atol( valerie_tokeniser_get_string( cmd_arg->tokeniser, 4 ) );
216 switch ( miracle_unit_append( unit, fullname, in, out ) )
219 return RESPONSE_SUCCESS;
221 return RESPONSE_BAD_FILE;
224 return RESPONSE_SUCCESS;
227 int miracle_play( command_argument cmd_arg )
229 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
233 return RESPONSE_INVALID_UNIT;
238 if ( valerie_tokeniser_count( cmd_arg->tokeniser ) == 3 )
239 speed = atoi( valerie_tokeniser_get_string( cmd_arg->tokeniser, 2 ) );
240 miracle_unit_play( unit, speed );
243 return RESPONSE_SUCCESS;
246 int miracle_stop( command_argument cmd_arg )
248 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
250 return RESPONSE_INVALID_UNIT;
253 miracle_unit_play( unit, 0 );
254 miracle_unit_terminate( unit );
256 return RESPONSE_SUCCESS;
259 int miracle_pause( command_argument cmd_arg )
261 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
263 return RESPONSE_INVALID_UNIT;
265 miracle_unit_play( unit, 0 );
266 return RESPONSE_SUCCESS;
269 int miracle_rewind( command_argument cmd_arg )
271 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
273 return RESPONSE_INVALID_UNIT;
275 miracle_unit_play( unit, -2000 );
276 return RESPONSE_SUCCESS;
279 int miracle_step( command_argument cmd_arg )
281 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
284 return RESPONSE_INVALID_UNIT;
287 miracle_unit_play( unit, 0 );
288 miracle_unit_step( unit, *(int*) cmd_arg->argument );
290 return RESPONSE_SUCCESS;
293 int miracle_goto( command_argument cmd_arg )
295 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
296 int clip = parse_clip( cmd_arg, 3 );
298 if (unit == NULL || miracle_unit_is_offline(unit))
299 return RESPONSE_INVALID_UNIT;
301 miracle_unit_change_position( unit, clip, *(int*) cmd_arg->argument );
302 return RESPONSE_SUCCESS;
305 int miracle_ff( command_argument cmd_arg )
307 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
309 return RESPONSE_INVALID_UNIT;
311 miracle_unit_play( unit, 2000 );
312 return RESPONSE_SUCCESS;
315 int miracle_set_in_point( command_argument cmd_arg )
317 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
318 int clip = parse_clip( cmd_arg, 3 );
321 return RESPONSE_INVALID_UNIT;
324 int position = *(int *) cmd_arg->argument;
326 switch( miracle_unit_set_clip_in( unit, clip, position ) )
329 return RESPONSE_BAD_FILE;
331 return RESPONSE_OUT_OF_RANGE;
334 return RESPONSE_SUCCESS;
337 int miracle_set_out_point( command_argument cmd_arg )
339 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
340 int clip = parse_clip( cmd_arg, 3 );
343 return RESPONSE_INVALID_UNIT;
346 int position = *(int *) cmd_arg->argument;
348 switch( miracle_unit_set_clip_out( unit, clip, position ) )
351 return RESPONSE_BAD_FILE;
353 return RESPONSE_OUT_OF_RANGE;
357 return RESPONSE_SUCCESS;
360 int miracle_get_unit_status( command_argument cmd_arg )
362 valerie_status_t status;
363 int error = miracle_unit_get_status( miracle_get_unit( cmd_arg->unit ), &status );
366 return RESPONSE_INVALID_UNIT;
370 valerie_response_printf( cmd_arg->response, sizeof( text ), valerie_status_serialise( &status, text, sizeof( text ) ) );
371 return RESPONSE_SUCCESS_1;
377 int miracle_set_unit_property( command_argument cmd_arg )
379 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
380 char *name_value = (char*) cmd_arg->argument;
382 return RESPONSE_INVALID_UNIT;
384 miracle_unit_set( unit, name_value );
385 return RESPONSE_SUCCESS;
388 int miracle_get_unit_property( command_argument cmd_arg )
390 miracle_unit unit = miracle_get_unit(cmd_arg->unit);
391 char *name = (char*) cmd_arg->argument;
392 char *value = miracle_unit_get( unit, name );
394 return RESPONSE_INVALID_UNIT;
395 else if ( value != NULL )
396 valerie_response_printf( cmd_arg->response, 1024, "%s\n", value );
397 return RESPONSE_SUCCESS;
401 int miracle_transfer( command_argument cmd_arg )
403 miracle_unit src_unit = miracle_get_unit(cmd_arg->unit);
404 int dest_unit_id = -1;
405 char *string = (char*) cmd_arg->argument;
406 if ( string != NULL && ( string[ 0 ] == 'U' || string[ 0 ] == 'u' ) && strlen( string ) > 1 )
407 dest_unit_id = atoi( string + 1 );
409 if ( src_unit != NULL && dest_unit_id != -1 )
411 miracle_unit dest_unit = miracle_get_unit( dest_unit_id );
412 if ( dest_unit != NULL && !miracle_unit_is_offline(dest_unit) && dest_unit != src_unit )
414 miracle_unit_transfer( dest_unit, src_unit );
415 return RESPONSE_SUCCESS;
418 return RESPONSE_INVALID_UNIT;