2 * transition_region.c -- region transition
3 * Copyright (C) 2003-2004 Ushodaya Enterprises Limited
4 * Author: Charles Yates <charles.yates@pandora.be>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library 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 GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 #include "transition_region.h"
22 #include "transition_composite.h"
24 #include <framework/mlt.h>
30 static int create_instance( mlt_transition
this, char *name
, char *value
, int count
)
32 // Return from this function
35 // Duplicate the value
36 char *type
= strdup( value
);
38 // Pointer to filter argument
39 char *arg
= type
== NULL ? NULL
: strchr( type
, ':' );
41 // New filter being created
42 mlt_filter filter
= NULL
;
44 // Cleanup type and arg
49 mlt_profile profile
= mlt_service_profile( MLT_TRANSITION_SERVICE( this ) );
50 filter
= mlt_factory_filter( profile
, type
, arg
);
52 // If we have a filter, then initialise and store it
56 mlt_properties properties
= MLT_TRANSITION_PROPERTIES( this );
58 // String to hold the property name
61 // String to hold the passdown key
65 sprintf( id
, "_filter_%d", count
);
68 sprintf( key
, "%s.", name
);
70 // Just in case, let's assume that the filter here has a composite
71 //mlt_properties_set( MLT_FILTER_PROPERTIES( filter ), "composite.geometry", "0%,0%:100%x100%" );
72 //mlt_properties_set_int( MLT_FILTER_PROPERTIES( filter ), "composite.fill", 1 );
74 // Pass all the key properties on the filter down
75 mlt_properties_pass( MLT_FILTER_PROPERTIES( filter
), properties
, key
);
77 // Ensure that filter is assigned
78 mlt_properties_set_data( properties
, id
, filter
, 0, ( mlt_destructor
)mlt_filter_close
, NULL
);
82 // Indicate that an error has occurred
89 // Return error condition
93 static uint8_t *filter_get_alpha_mask( mlt_frame
this )
95 uint8_t *alpha
= NULL
;
97 // Obtain properties of frame
98 mlt_properties properties
= MLT_FRAME_PROPERTIES( this );
100 // Get the shape frame
101 mlt_frame shape_frame
= mlt_properties_get_data( properties
, "shape_frame", NULL
);
103 // Get the width and height of the image
104 int region_width
= mlt_properties_get_int( MLT_FRAME_PROPERTIES( this ), "width" );
105 int region_height
= mlt_properties_get_int( MLT_FRAME_PROPERTIES( this ), "height" );
106 uint8_t *image
= NULL
;
107 mlt_image_format format
= mlt_image_yuv422
;
109 // Get the shape image to trigger alpha creation
110 mlt_properties_set_int( MLT_FRAME_PROPERTIES( shape_frame
), "distort", 1 );
111 mlt_frame_get_image( shape_frame
, &image
, &format
, ®ion_width
, ®ion_height
, 0 );
113 alpha
= mlt_frame_get_alpha_mask( shape_frame
);
115 // Generate from the Y component of the image if no alpha available
118 int size
= region_width
* region_height
;
119 uint8_t *p
= mlt_pool_alloc( size
);
123 *p
++ = ( int )( ( ( *image
++ - 16 ) * 299 ) / 255 );
126 mlt_properties_set_data( MLT_FRAME_PROPERTIES( this ), "alpha", alpha
, region_width
* region_height
, mlt_pool_release
, NULL
);
130 mlt_properties_set_data( MLT_FRAME_PROPERTIES( this ), "alpha", alpha
, region_width
* region_height
, NULL
, NULL
);
133 this->get_alpha_mask
= NULL
;
141 static int transition_get_image( mlt_frame frame
, uint8_t **image
, mlt_image_format
*format
, int *width
, int *height
, int writable
)
143 // Error we will return
146 // We will get the 'b frame' from the frame stack
147 mlt_frame b_frame
= mlt_frame_pop_frame( frame
);
149 // Get the watermark transition object
150 mlt_transition
this = mlt_frame_pop_service( frame
);
152 // Get the properties of the transition
153 mlt_properties properties
= MLT_TRANSITION_PROPERTIES( this );
155 // Get the composite from the transition
156 mlt_transition composite
= mlt_properties_get_data( properties
, "composite", NULL
);
158 // Look for the first filter
159 mlt_filter filter
= mlt_properties_get_data( properties
, "_filter_0", NULL
);
161 // Get the unique id of the filter (used to reacquire the producer position)
162 char *name
= mlt_properties_get( properties
, "_unique_id" );
164 // Get the original producer position
165 mlt_position position
= mlt_properties_get_position( MLT_FRAME_PROPERTIES( frame
), name
);
167 // Create a composite if we don't have one
168 if ( composite
== NULL
)
170 // Create composite via the factory
171 mlt_profile profile
= mlt_service_profile( MLT_TRANSITION_SERVICE( this ) );
172 composite
= mlt_factory_transition( profile
, "composite", NULL
);
175 if ( composite
!= NULL
)
177 // Get the properties
178 mlt_properties composite_properties
= MLT_TRANSITION_PROPERTIES( composite
);
180 // We want to ensure that we don't get a wobble...
181 //mlt_properties_set_int( composite_properties, "distort", 1 );
182 mlt_properties_set_int( composite_properties
, "progressive", 1 );
184 // Pass all the composite. properties on the transition down
185 mlt_properties_pass( composite_properties
, properties
, "composite." );
187 // Register the composite for reuse/destruction
188 mlt_properties_set_data( properties
, "composite", composite
, 0, ( mlt_destructor
)mlt_transition_close
, NULL
);
193 // Pass all current properties down
194 mlt_properties composite_properties
= MLT_TRANSITION_PROPERTIES( composite
);
195 mlt_properties_pass( composite_properties
, properties
, "composite." );
199 if ( filter
== NULL
)
204 // Number of filters created
207 // Loop for all properties
208 for ( i
= 0; i
< mlt_properties_count( properties
); i
++ )
210 // Get the name of this property
211 char *name
= mlt_properties_get_name( properties
, i
);
213 // If the name does not contain a . and matches filter
214 if ( strchr( name
, '.' ) == NULL
&& !strncmp( name
, "filter", 6 ) )
216 // Get the filter constructor
217 char *value
= mlt_properties_get_value( properties
, i
);
219 // Create an instance
220 if ( create_instance( this, name
, value
, count
) == 0 )
225 // Look for the first filter again
226 filter
= mlt_properties_get_data( properties
, "_filter_0", NULL
);
230 // Pass all properties down
231 mlt_filter temp
= NULL
;
236 // Number of filters found
239 // Loop for all properties
240 for ( i
= 0; i
< mlt_properties_count( properties
); i
++ )
242 // Get the name of this property
243 char *name
= mlt_properties_get_name( properties
, i
);
245 // If the name does not contain a . and matches filter
246 if ( strchr( name
, '.' ) == NULL
&& !strncmp( name
, "filter", 6 ) )
248 // Strings to hold the id and pass down key
252 // Construct id and key
253 sprintf( id
, "_filter_%d", count
);
254 sprintf( key
, "%s.", name
);
257 temp
= mlt_properties_get_data( properties
, id
, NULL
);
261 mlt_properties_pass( MLT_FILTER_PROPERTIES( temp
), properties
, key
);
269 error
= mlt_frame_get_image( frame
, image
, format
, width
, height
, 1 );
271 // Only continue if we have both filter and composite
272 if ( composite
!= NULL
)
274 // Get the resource of this filter (could be a shape [rectangle/circle] or an alpha provider of choice
275 char *resource
= mlt_properties_get( properties
, "resource" );
277 // Get the old resource in case it's changed
278 char *old_resource
= mlt_properties_get( properties
, "_old_resource" );
280 // String to hold the filter to query on
283 // Index to hold the count
286 // We will get the 'b frame' from the composite only if it's NULL
287 if ( b_frame
== NULL
)
290 b_frame
= composite_copy_region( composite
, frame
, position
);
292 // Ensure a destructor
293 mlt_properties_set_data( MLT_FRAME_PROPERTIES( frame
), name
, b_frame
, 0, ( mlt_destructor
)mlt_frame_close
, NULL
);
296 // Set the position of the b_frame
297 mlt_frame_set_position( b_frame
, position
);
299 // Make sure the filter is in the correct position
300 while ( filter
!= NULL
)
303 if ( mlt_properties_get_int( MLT_FILTER_PROPERTIES( filter
), "off" ) == 0 )
304 mlt_filter_process( filter
, b_frame
);
306 // Generate the key for the next
307 sprintf( id
, "_filter_%d", ++ i
);
309 // Get the next filter
310 filter
= mlt_properties_get_data( properties
, id
, NULL
);
313 // Allow filters to be attached to a region filter
314 filter
= mlt_properties_get_data( properties
, "_region_filter", NULL
);
315 if ( filter
!= NULL
)
316 mlt_service_apply_filters( MLT_FILTER_SERVICE( filter
), b_frame
, 0 );
318 // Hmm - this is probably going to go wrong....
319 mlt_frame_set_position( frame
, position
);
321 // Get the b frame and process with composite if successful
322 mlt_transition_process( composite
, frame
, b_frame
);
324 // If we have a shape producer copy the alpha mask from the shape frame to the b_frame
325 if ( strcmp( resource
, "rectangle" ) != 0 )
327 // Get the producer from the transition
328 mlt_producer producer
= mlt_properties_get_data( properties
, "producer", NULL
);
330 // If We have no producer then create one
331 if ( producer
== NULL
|| ( old_resource
!= NULL
&& strcmp( resource
, old_resource
) ) )
333 // Get the factory producer service
334 char *factory
= mlt_properties_get( properties
, "factory" );
336 // Store the old resource
337 mlt_properties_set( properties
, "_old_resource", resource
);
339 // Special case circle resource
340 if ( strcmp( resource
, "circle" ) == 0 )
342 // Special case to ensure that fezzik produces a pixbuf with a NULL constructor
345 // Specify the svg circle
346 mlt_properties_set( properties
, "producer.resource", "<svg width='100' height='100'><circle cx='50' cy='50' r='50' fill='black'/></svg>" );
349 // Create the producer
350 mlt_profile profile
= mlt_service_profile( MLT_TRANSITION_SERVICE( this ) );
351 producer
= mlt_factory_producer( profile
, factory
, resource
);
354 if ( producer
!= NULL
)
356 // Get the producer properties
357 mlt_properties producer_properties
= MLT_PRODUCER_PROPERTIES( producer
);
359 // Ensure that we loop
360 mlt_properties_set( producer_properties
, "eof", "loop" );
362 // Now pass all producer. properties on the transition down
363 mlt_properties_pass( producer_properties
, properties
, "producer." );
365 // Register the producer for reuse/destruction
366 mlt_properties_set_data( properties
, "producer", producer
, 0, ( mlt_destructor
)mlt_producer_close
, NULL
);
370 // Now use the shape producer
371 if ( producer
!= NULL
)
373 // We will get the alpha frame from the producer
374 mlt_frame shape_frame
= NULL
;
376 // Make sure the producer is in the correct position
377 mlt_producer_seek( producer
, position
);
379 // Get the shape frame
380 if ( mlt_service_get_frame( MLT_PRODUCER_SERVICE( producer
), &shape_frame
, 0 ) == 0 )
382 // Ensure that the shape frame will be closed
383 mlt_properties_set_data( MLT_FRAME_PROPERTIES( b_frame
), "shape_frame", shape_frame
, 0, ( mlt_destructor
)mlt_frame_close
, NULL
);
385 // Specify the callback for evaluation
386 b_frame
->get_alpha_mask
= filter_get_alpha_mask
;
392 error
= mlt_frame_get_image( frame
, image
, format
, width
, height
, 0 );
398 /** Filter processing.
401 static mlt_frame
transition_process( mlt_transition
this, mlt_frame a_frame
, mlt_frame b_frame
)
403 // Get the properties of the frame
404 mlt_properties properties
= MLT_FRAME_PROPERTIES( a_frame
);
406 // Get a unique name to store the frame position
407 char *name
= mlt_properties_get( MLT_TRANSITION_PROPERTIES( this ), "_unique_id" );
409 // Assign the current position to the name
410 mlt_properties_set_position( properties
, name
, mlt_frame_get_position( a_frame
) );
412 // Push the transition on to the frame
413 mlt_frame_push_service( a_frame
, this );
415 // Push the b_frame on to the stack
416 mlt_frame_push_frame( a_frame
, b_frame
);
418 // Push the transition method
419 mlt_frame_push_get_image( a_frame
, transition_get_image
);
425 /** Constructor for the transition.
428 mlt_transition
transition_region_init( mlt_profile profile
, mlt_service_type type
, const char *id
, char *arg
)
430 // Create a new transition
431 mlt_transition
this = mlt_transition_new( );
433 // Further initialisation
436 // Get the properties from the transition
437 mlt_properties properties
= MLT_TRANSITION_PROPERTIES( this );
439 // Assign the transition process method
440 this->process
= transition_process
;
443 mlt_properties_set( properties
, "factory", "fezzik" );
445 // Resource defines the shape of the region
446 mlt_properties_set( properties
, "resource", arg
== NULL ?
"rectangle" : arg
);
448 // Inform apps and framework that this is a video only transition
449 mlt_properties_set_int( properties
, "_transition_type", 1 );
452 // Return the transition