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", 36000.0 );
62 mlt_properties_set_timecode( properties
, "length", 36000.0 );
63 mlt_properties_set_int( properties
, "known_length", 1 );
64 mlt_properties_set_double( properties
, "aspect_ratio", 4.0 / 3.0 );
65 mlt_properties_set( properties
, "log_id", "multitrack" );
67 // Override service get_frame
68 parent
->get_frame
= producer_get_frame
;
74 /** Get the parent service object.
77 mlt_service
mlt_producer_service( mlt_producer
this )
82 /** Get the producer properties.
85 mlt_properties
mlt_producer_properties( mlt_producer
this )
87 return mlt_service_properties( &this->parent
);
90 /** Convert frame position to timecode.
93 mlt_timecode
mlt_producer_time( mlt_producer
this, int64_t frame
)
98 return ( mlt_timecode
)frame
/ mlt_producer_get_fps( this );
101 /** Convert timecode to frame position.
104 int64_t mlt_producer_frame_position( mlt_producer
this, mlt_timecode position
)
109 return ( int64_t )( floor( position
* mlt_producer_get_fps( this ) + 0.5 ) );
112 /** Seek to a specified time code.
115 int mlt_producer_seek( mlt_producer
this, mlt_timecode timecode
)
120 if ( timecode
> mlt_producer_get_playtime( this ) )
121 timecode
= mlt_producer_get_playtime( this );
124 mlt_properties_set_timecode( mlt_producer_properties( this ), "position", timecode
);
126 // Calculate the absolute frame
127 double frame
= ( mlt_producer_get_in( this ) + timecode
) * mlt_producer_get_fps( this );
128 mlt_properties_set_double( mlt_producer_properties( this ), "frame", floor( frame
+ 0.5 ) );
133 /** Seek to a specified absolute frame.
136 int mlt_producer_seek_frame( mlt_producer
this, int64_t frame
)
138 // Calculate the time code
139 double timecode
= ( frame
/ mlt_producer_get_fps( this ) ) - mlt_producer_get_in( this );
141 // If timecode is invalid, then seek on time
142 if ( frame
< 0 || timecode
< 0 )
144 // Seek to the in point
145 mlt_producer_seek( this, 0 );
147 else if ( timecode
> mlt_producer_get_playtime( this ) )
149 // Seek to the out point
150 mlt_producer_seek( this, mlt_producer_get_playtime( this ) );
155 mlt_properties_set_timecode( mlt_producer_properties( this ), "position", timecode
);
157 // Set the absolute frame
158 mlt_properties_set_double( mlt_producer_properties( this ), "frame", frame
);
164 /** Get the current time code.
167 mlt_timecode
mlt_producer_position( mlt_producer
this )
169 return mlt_properties_get_timecode( mlt_producer_properties( this ), "position" );
172 /** Get the current frame.
175 uint64_t mlt_producer_frame( mlt_producer
this )
177 return mlt_properties_get_double( mlt_producer_properties( this ), "frame" );
180 /** Set the playing speed.
183 int mlt_producer_set_speed( mlt_producer
this, double speed
)
185 return mlt_properties_set_double( mlt_producer_properties( this ), "speed", speed
);
188 /** Get the playing speed.
191 double mlt_producer_get_speed( mlt_producer
this )
193 return mlt_properties_get_double( mlt_producer_properties( this ), "speed" );
196 /** Get the frames per second.
199 double mlt_producer_get_fps( mlt_producer
this )
201 return mlt_properties_get_double( mlt_producer_properties( this ), "fps" );
204 /** Set the in and out points.
207 int mlt_producer_set_in_and_out( mlt_producer
this, mlt_timecode in
, mlt_timecode out
)
209 // Correct ins and outs if necessary
212 if ( in
> mlt_producer_get_length( this ) )
213 in
= mlt_producer_get_length( this );
216 if ( out
> mlt_producer_get_length( this ) )
217 out
= mlt_producer_get_length( this );
219 // Swap ins and outs if wrong
228 mlt_properties_set_timecode( mlt_producer_properties( this ), "in", in
);
229 mlt_properties_set_timecode( mlt_producer_properties( this ), "out", out
);
231 // Seek to the in point
232 mlt_producer_seek( this, 0 );
237 /** Get the in point.
240 mlt_timecode
mlt_producer_get_in( mlt_producer
this )
242 return mlt_properties_get_timecode( mlt_producer_properties( this ), "in" );
245 /** Get the out point.
248 mlt_timecode
mlt_producer_get_out( mlt_producer
this )
250 return mlt_properties_get_timecode( mlt_producer_properties( this ), "out" );
253 /** Get the total play time.
256 mlt_timecode
mlt_producer_get_playtime( mlt_producer
this )
258 return mlt_producer_get_out( this ) - mlt_producer_get_in( this );
261 /** Get the total length of the producer.
264 mlt_timecode
mlt_producer_get_length( mlt_producer
this )
266 return mlt_properties_get_timecode( mlt_producer_properties( this ), "length" );
269 /** Prepare for next frame.
272 void mlt_producer_prepare_next( mlt_producer
this )
274 mlt_producer_seek_frame( this, mlt_producer_frame( this ) + mlt_producer_get_speed( this ) );
280 static int producer_get_frame( mlt_service service
, mlt_frame_ptr frame
, int index
)
283 mlt_producer
this = service
->child
;
285 // A properly instatiated producer will have a get_frame method...
286 if ( this->get_frame
!= NULL
)
288 // Get the frame from the implementation
289 result
= this->get_frame( this, frame
, index
);
291 mlt_properties frame_properties
= mlt_frame_properties( *frame
);
292 double speed
= mlt_producer_get_speed( this );
293 mlt_properties_set_double( frame_properties
, "speed", speed
);
297 // Generate a test frame
298 *frame
= mlt_frame_init( );
301 result
= mlt_frame_set_timecode( *frame
, mlt_producer_position( this ) );
303 // Calculate the next timecode
304 mlt_producer_prepare_next( this );
307 // Copy the fps of the producer onto the frame
308 mlt_properties properties
= mlt_frame_properties( *frame
);
309 mlt_properties_set_double( properties
, "fps", mlt_producer_get_fps( this ) );
314 /** Close the producer.
317 void mlt_producer_close( mlt_producer
this )
319 if ( this->close
!= NULL
)
322 mlt_service_close( &this->parent
);