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_factory.h"
24 #include "mlt_frame.h"
30 /** Forward references.
33 static int producer_get_frame( mlt_service
this, mlt_frame_ptr frame
, int index
);
38 int mlt_producer_init( mlt_producer
this, void *child
)
40 // Check that we haven't received NULL
41 int error
= this == NULL
;
43 // Continue if no error
46 // Initialise the producer
47 memset( this, 0, sizeof( struct mlt_producer_s
) );
49 // Associate with the child
52 // Initialise the service
53 if ( mlt_service_init( &this->parent
, this ) == 0 )
55 // Get the normalisation preference
56 char *normalisation
= mlt_environment( "MLT_NORMALISATION" );
58 // The parent is the service
59 mlt_service parent
= &this->parent
;
61 // Get the properties of the parent
62 mlt_properties properties
= mlt_service_properties( parent
);
64 // Set the default properties
65 mlt_properties_set( properties
, "mlt_type", "mlt_producer" );
66 mlt_properties_set_position( properties
, "_position", 0.0 );
67 mlt_properties_set_double( properties
, "_frame", 0 );
68 if ( normalisation
== NULL
|| strcmp( normalisation
, "NTSC" ) )
70 mlt_properties_set_double( properties
, "fps", 25.0 );
71 mlt_properties_set_double( properties
, "aspect_ratio", 72.0 / 79.0 );
75 mlt_properties_set_double( properties
, "fps", 30000.0 / 1001.0 );
76 mlt_properties_set_double( properties
, "aspect_ratio", 128.0 / 117.0 );
78 mlt_properties_set_double( properties
, "_speed", 1.0 );
79 mlt_properties_set_position( properties
, "in", 0 );
80 mlt_properties_set_position( properties
, "out", 14999 );
81 mlt_properties_set_position( properties
, "length", 15000 );
82 mlt_properties_set( properties
, "eof", "pause" );
83 mlt_properties_set( properties
, "resource", "<producer>" );
85 // Override service get_frame
86 parent
->get_frame
= producer_get_frame
;
93 /** Create a new producer.
96 mlt_producer
mlt_producer_new( )
98 mlt_producer
this = malloc( sizeof( struct mlt_producer_s
) );
99 mlt_producer_init( this, NULL
);
103 /** Get the parent service object.
106 mlt_service
mlt_producer_service( mlt_producer
this )
108 return &this->parent
;
111 /** Get the producer properties.
114 mlt_properties
mlt_producer_properties( mlt_producer
this )
116 return mlt_service_properties( &this->parent
);
119 /** Seek to a specified position.
122 int mlt_producer_seek( mlt_producer
this, mlt_position position
)
124 // Determine eof handling
125 char *eof
= mlt_properties_get( mlt_producer_properties( this ), "eof" );
126 int use_points
= 1 - mlt_properties_get_int( mlt_producer_properties( this ), "ignore_points" );
133 else if ( use_points
&& !strcmp( eof
, "pause" ) && position
>= mlt_producer_get_playtime( this ) )
135 mlt_producer_set_speed( this, 0 );
136 position
= mlt_producer_get_playtime( this ) - 1;
138 else if ( use_points
&& !strcmp( eof
, "loop" ) && position
>= mlt_producer_get_playtime( this ) )
140 position
= position
% mlt_producer_get_playtime( this );
144 mlt_properties_set_position( mlt_producer_properties( this ), "_position", position
);
146 // Calculate the absolute frame
147 mlt_properties_set_position( mlt_producer_properties( this ), "_frame", use_points
* mlt_producer_get_in( this ) + position
);
152 /** Get the current position (relative to in point).
155 mlt_position
mlt_producer_position( mlt_producer
this )
157 return mlt_properties_get_position( mlt_producer_properties( this ), "_position" );
160 /** Get the current position (relative to start of producer).
163 mlt_position
mlt_producer_frame( mlt_producer
this )
165 return mlt_properties_get_position( mlt_producer_properties( this ), "_frame" );
168 /** Set the playing speed.
171 int mlt_producer_set_speed( mlt_producer
this, double speed
)
173 return mlt_properties_set_double( mlt_producer_properties( this ), "_speed", speed
);
176 /** Get the playing speed.
179 double mlt_producer_get_speed( mlt_producer
this )
181 return mlt_properties_get_double( mlt_producer_properties( this ), "_speed" );
184 /** Get the frames per second.
187 double mlt_producer_get_fps( mlt_producer
this )
189 return mlt_properties_get_double( mlt_producer_properties( this ), "fps" );
192 /** Set the in and out points.
195 int mlt_producer_set_in_and_out( mlt_producer
this, mlt_position in
, mlt_position out
)
197 // Correct ins and outs if necessary
200 else if ( in
> mlt_producer_get_length( this ) )
201 in
= mlt_producer_get_length( this );
205 else if ( out
> mlt_producer_get_length( this ) )
206 out
= mlt_producer_get_length( this );
208 // Swap ins and outs if wrong
217 mlt_properties_set_position( mlt_producer_properties( this ), "in", in
);
218 mlt_properties_set_position( mlt_producer_properties( this ), "out", out
);
223 /** Get the in point.
226 mlt_position
mlt_producer_get_in( mlt_producer
this )
228 return mlt_properties_get_position( mlt_producer_properties( this ), "in" );
231 /** Get the out point.
234 mlt_position
mlt_producer_get_out( mlt_producer
this )
236 return mlt_properties_get_position( mlt_producer_properties( this ), "out" );
239 /** Get the total play time.
242 mlt_position
mlt_producer_get_playtime( mlt_producer
this )
244 return mlt_producer_get_out( this ) - mlt_producer_get_in( this ) + 1;
247 /** Get the total length of the producer.
250 mlt_position
mlt_producer_get_length( mlt_producer
this )
252 return mlt_properties_get_position( mlt_producer_properties( this ), "length" );
255 /** Prepare for next frame.
258 void mlt_producer_prepare_next( mlt_producer
this )
260 mlt_producer_seek( this, mlt_producer_position( this ) + mlt_producer_get_speed( this ) );
266 static int producer_get_frame( mlt_service service
, mlt_frame_ptr frame
, int index
)
269 mlt_producer
this = service
->child
;
271 // Determine eof handling
272 char *eof
= mlt_properties_get( mlt_producer_properties( this ), "eof" );
274 // A properly instatiated producer will have a get_frame method...
275 if ( this->get_frame
== NULL
|| ( !strcmp( eof
, "continue" ) && mlt_producer_position( this ) > mlt_producer_get_out( this ) ) )
277 // Generate a test frame
278 *frame
= mlt_frame_init( );
281 result
= mlt_frame_set_position( *frame
, mlt_producer_position( this ) );
283 // Mark as a test card
284 mlt_properties_set_int( mlt_frame_properties( *frame
), "test_image", 1 );
285 mlt_properties_set_int( mlt_frame_properties( *frame
), "test_audio", 1 );
287 // Calculate the next position
288 mlt_producer_prepare_next( this );
292 // Get the frame from the implementation
293 result
= this->get_frame( this, frame
, index
);
296 // Copy the fps and speed of the producer onto the frame
297 mlt_properties properties
= mlt_frame_properties( *frame
);
298 mlt_properties_set_double( properties
, "fps", mlt_producer_get_fps( this ) );
299 double speed
= mlt_producer_get_speed( this );
300 mlt_properties_set_double( properties
, "_speed", speed
);
301 mlt_properties_set_int( properties
, "test_audio", mlt_frame_is_test_audio( *frame
) );
302 mlt_properties_set_int( properties
, "test_image", mlt_frame_is_test_card( *frame
) );
307 /** Close the producer.
310 void mlt_producer_close( mlt_producer
this )
312 if ( this->close
!= NULL
)
315 mlt_service_close( &this->parent
);