2 * mlt_producer.c -- abstraction for all producer services
3 * Copyright (C) 2003-2004 Ushodaya Enterprises Limited
4 * Author: Charles Yates <charles.yates@pandora.be>
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.
22 #include "mlt_producer.h"
23 #include "mlt_frame.h"
29 /** Forward references.
32 static int producer_get_frame( mlt_service this, mlt_frame_ptr frame, int index );
37 int mlt_producer_init( mlt_producer this, void *child )
39 // Initialise the producer
40 memset( this, 0, sizeof( struct mlt_producer_s ) );
42 // Associate with the child
45 // Initialise the service
46 if ( mlt_service_init( &this->parent, this ) == 0 )
48 // The parent is the service
49 mlt_service parent = &this->parent;
51 // Get the properties of the parent
52 mlt_properties properties = mlt_service_properties( parent );
54 // Set the default properties
55 mlt_properties_set( properties, "mlt_type", "mlt_producer" );
56 mlt_properties_set_timecode( properties, "position", 0.0 );
57 mlt_properties_set_double( properties, "frame", 0 );
58 mlt_properties_set_double( properties, "fps", 25.0 );
59 mlt_properties_set_double( properties, "speed", 1.0 );
60 mlt_properties_set_timecode( properties, "in", 0.0 );
61 mlt_properties_set_timecode( properties, "out", 3600.0 );
62 mlt_properties_set_timecode( properties, "length", 3600.0 );
63 mlt_properties_set_int( properties, "known_length", 1 );
64 mlt_properties_set_double( properties, "aspect_ratio", 4.0 / 3.0 );
66 // Override service get_frame
67 parent->get_frame = producer_get_frame;
73 /** Get the parent service object.
76 mlt_service mlt_producer_service( mlt_producer this )
81 /** Get the producer properties.
84 mlt_properties mlt_producer_properties( mlt_producer this )
86 return mlt_service_properties( &this->parent );
89 /** Seek to a specified time code.
92 int mlt_producer_seek( mlt_producer this, mlt_timecode timecode )
97 if ( timecode > mlt_producer_get_playtime( this ) )
98 timecode = mlt_producer_get_playtime( this );
101 mlt_properties_set_timecode( mlt_producer_properties( this ), "position", timecode );
103 // Calculate the absolute frame
104 double frame = ( mlt_producer_get_in( this ) + timecode ) * mlt_producer_get_fps( this );
105 mlt_properties_set_double( mlt_producer_properties( this ), "frame", floor( frame + 0.5 ) );
110 /** Seek to a specified absolute frame.
113 int mlt_producer_seek_frame( mlt_producer this, uint64_t frame )
115 // Calculate the time code
116 double timecode = ( frame / mlt_producer_get_fps( this ) ) - mlt_producer_get_in( this );
118 // If timecode is invalid, then seek on time
121 // Seek to the in point
122 mlt_producer_seek( this, 0 );
124 else if ( timecode > mlt_producer_get_playtime( this ) )
126 // Seek to the out point
127 mlt_producer_seek( this, mlt_producer_get_playtime( this ) );
132 mlt_properties_set_timecode( mlt_producer_properties( this ), "position", timecode );
134 // Set the absolute frame
135 mlt_properties_set_double( mlt_producer_properties( this ), "frame", frame );
141 /** Get the current time code.
144 mlt_timecode mlt_producer_position( mlt_producer this )
146 return mlt_properties_get_timecode( mlt_producer_properties( this ), "position" );
149 /** Get the current frame.
152 uint64_t mlt_producer_frame( mlt_producer this )
154 return mlt_properties_get_double( mlt_producer_properties( this ), "frame" );
157 /** Set the playing speed.
160 int mlt_producer_set_speed( mlt_producer this, double speed )
162 return mlt_properties_set_double( mlt_producer_properties( this ), "speed", speed );
165 /** Get the playing speed.
168 double mlt_producer_get_speed( mlt_producer this )
170 return mlt_properties_get_double( mlt_producer_properties( this ), "speed" );
173 /** Get the frames per second.
176 double mlt_producer_get_fps( mlt_producer this )
178 return mlt_properties_get_double( mlt_producer_properties( this ), "fps" );
181 /** Set the in and out points.
184 int mlt_producer_set_in_and_out( mlt_producer this, mlt_timecode in, mlt_timecode out )
186 // Correct ins and outs if necessary
189 if ( in > mlt_producer_get_length( this ) )
190 in = mlt_producer_get_length( this );
193 if ( out > mlt_producer_get_length( this ) )
194 out = mlt_producer_get_length( this );
196 // Swap ins and outs if wrong
205 mlt_properties_set_timecode( mlt_producer_properties( this ), "in", in );
206 mlt_properties_set_timecode( mlt_producer_properties( this ), "out", out );
208 // Seek to the in point
209 mlt_producer_seek( this, 0 );
214 /** Get the in point.
217 mlt_timecode mlt_producer_get_in( mlt_producer this )
219 return mlt_properties_get_timecode( mlt_producer_properties( this ), "in" );
222 /** Get the out point.
225 mlt_timecode mlt_producer_get_out( mlt_producer this )
227 return mlt_properties_get_timecode( mlt_producer_properties( this ), "out" );
230 /** Get the total play time.
233 mlt_timecode mlt_producer_get_playtime( mlt_producer this )
235 return mlt_producer_get_out( this ) - mlt_producer_get_in( this );
238 /** Get the total length of the producer.
241 mlt_timecode mlt_producer_get_length( mlt_producer this )
243 return mlt_properties_get_timecode( mlt_producer_properties( this ), "length" );
246 /** Prepare for next frame.
249 void mlt_producer_prepare_next( mlt_producer this )
251 mlt_producer_seek_frame( this, mlt_producer_frame( this ) + mlt_producer_get_speed( this ) );
257 static int producer_get_frame( mlt_service service, mlt_frame_ptr frame, int index )
260 mlt_producer this = service->child;
262 // A properly instatiated producer will have a get_frame method...
263 if ( this->get_frame != NULL )
265 // Get the frame from the implementation
266 result = this->get_frame( this, frame, index );
270 // Generate a test frame
271 *frame = mlt_frame_init( );
274 result = mlt_frame_set_timecode( *frame, mlt_producer_position( this ) );
276 // Calculate the next timecode
277 mlt_producer_prepare_next( this );
280 // Copy the fps of the producer onto the frame
281 mlt_properties properties = mlt_frame_properties( *frame );
282 mlt_properties_set_double( properties, "fps", mlt_producer_get_fps( this ) );
287 /** Close the producer.
290 void mlt_producer_close( mlt_producer this )
292 if ( this->close != NULL )
295 mlt_service_close( &this->parent );