]> git.sesse.net Git - mlt/blob - src/modules/qimage/producer_kdenlivetitle.c
Fix calloc() parameter ordering
[mlt] / src / modules / qimage / producer_kdenlivetitle.c
1 /*
2  * producer_kdenlivetitle.c -- kdenlive producer
3  * Copyright (c) 2009 Marco Gittler <g.marco@freenet.de>
4  * Copyright (c) 2009 Jean-Baptiste Mardelle <jb@kdenlive.org>
5  *
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.
10  *
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.
15  *
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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
19  */
20
21 #include "kdenlivetitle_wrapper.h"
22
23 #include <framework/mlt.h>
24 #include <stdlib.h>
25 #include <string.h>
26
27
28 void read_xml(mlt_properties properties)
29 {
30         FILE *f = fopen( mlt_properties_get( properties, "resource" ), "r");
31         if ( f != NULL )
32         {
33                 int size = 0;
34                 long lSize;
35  
36                 fseek (f , 0 , SEEK_END);
37                 lSize = ftell (f);
38                 rewind (f);
39
40                 char *infile = (char*) mlt_pool_alloc(lSize);
41                 size=fread(infile,1,lSize,f);
42                 infile[size] = '\0';
43                 fclose(f);
44                 mlt_properties_set(properties, "_xmldata", infile);
45                 mlt_pool_release( infile );
46         }
47 }
48
49 static int producer_get_image( mlt_frame frame, uint8_t **buffer, mlt_image_format *format, int *width, int *height, int writable )
50 {
51         /* Obtain properties of frame */
52         mlt_properties properties = MLT_FRAME_PROPERTIES( frame );
53
54         /* Obtain the producer for this frame */
55         producer_ktitle this = mlt_properties_get_data( properties, "producer_kdenlivetitle", NULL );
56         
57         /* Obtain properties of producer */
58         mlt_properties producer_props = MLT_PRODUCER_PROPERTIES( &this->parent );
59         
60         *width = mlt_properties_get_int( properties, "rescale_width" );
61         *height = mlt_properties_get_int( properties, "rescale_height" );
62         
63         mlt_service_lock( MLT_PRODUCER_SERVICE( &this->parent ) );
64
65         /* Allocate the image */
66         *format = mlt_image_rgb24a;
67         mlt_position time = mlt_producer_position( &this->parent ) + mlt_producer_get_in( &this->parent );
68         if ( mlt_properties_get_int( producer_props, "force_reload" ) ) {
69                 if (mlt_properties_get_int( producer_props, "force_reload" ) > 1) read_xml(producer_props);
70                 mlt_properties_set_int( producer_props, "force_reload", 0 );
71                 drawKdenliveTitle( this, frame, *width, *height, time, 1);
72         }
73         else drawKdenliveTitle( this, frame, *width, *height, time, 0);
74
75         // Get width and height (may have changed during the refresh)
76         *width = mlt_properties_get_int( properties, "width" );
77         *height = mlt_properties_get_int( properties, "height" );
78                 
79         if ( this->current_image )
80         {
81                 // Clone the image and the alpha
82                 int image_size = this->current_width * ( this->current_height ) * 4;
83                 uint8_t *image_copy = mlt_pool_alloc( image_size );
84                 memcpy( image_copy, this->current_image, image_size );
85                 // Now update properties so we free the copy after
86                 mlt_frame_set_image( frame, image_copy, image_size, mlt_pool_release );
87                 // We're going to pass the copy on
88                 *buffer = image_copy;           
89
90                 mlt_log_debug( MLT_PRODUCER_SERVICE( &this->parent ), "width:%d height:%d %s\n", *width, *height, mlt_image_format_name( *format ) );
91         }
92
93         mlt_service_unlock( MLT_PRODUCER_SERVICE( &this->parent ) );
94
95         return 0;
96 }
97
98 static int producer_get_frame( mlt_producer producer, mlt_frame_ptr frame, int index )
99
100 {
101         // Get the real structure for this producer
102         producer_ktitle this = producer->child;
103
104         /* Generate a frame */
105         *frame = mlt_frame_init( MLT_PRODUCER_SERVICE( producer ) );
106
107         if ( *frame != NULL )
108         {
109                 /* Obtain properties of frame and producer */
110                 mlt_properties properties = MLT_FRAME_PROPERTIES( *frame );
111
112                 /* Obtain properties of producer */
113                 mlt_properties producer_props = MLT_PRODUCER_PROPERTIES( producer );
114
115                 /* Set the producer on the frame properties */
116                 mlt_properties_set_data( properties, "producer_kdenlivetitle", this, 0, NULL, NULL );
117
118                 /* Update timecode on the frame we're creating */
119                 mlt_frame_set_position( *frame, mlt_producer_position( producer ) );
120
121                 /* Set producer-specific frame properties */
122                 mlt_profile profile = mlt_service_profile ( MLT_PRODUCER_SERVICE( producer ) ) ;
123                 mlt_properties_set_int( properties, "progressive", ( profile ) ? profile->progressive : 1 );
124                 mlt_properties_set_double( properties, "aspect_ratio", mlt_properties_get_double( producer_props, "aspect_ratio" ) );
125
126                 /* Push the get_image method */
127                 mlt_frame_push_get_image( *frame, producer_get_image );
128         }
129
130         /* Calculate the next timecode */
131         mlt_producer_prepare_next( producer );
132
133         return 0;
134 }
135
136 static void producer_close( mlt_producer producer )
137 {
138         /* fprintf(stderr, "::::::::::::::  CLOSING TITLE\n"); */
139         producer->close = NULL;
140         mlt_producer_close( producer );
141         free( producer );
142 }
143
144
145 mlt_producer producer_kdenlivetitle_init( mlt_profile profile, mlt_service_type type, const char *id, char *filename )
146 {
147         /* fprintf(stderr, ":::::::::::: CREATE TITLE\n"); */
148         /* Create a new producer object */
149         
150         producer_ktitle this = calloc( 1, sizeof( struct producer_ktitle_s ) );
151         if ( this != NULL && mlt_producer_init( &this->parent, this ) == 0 )
152         {
153                 mlt_producer producer = &this->parent;
154                 
155                 /* Get the properties interface */
156                 mlt_properties properties = MLT_PRODUCER_PROPERTIES( producer );
157                 /* Callback registration */
158                 producer->get_frame = producer_get_frame;
159                 producer->close = ( mlt_destructor )producer_close;
160                 mlt_properties_set( properties, "resource", filename );
161                 //mlt_properties_set_int( properties, "aspect_ratio", 1 );
162                 read_xml(properties);
163                 return producer;
164         }
165         free( this );
166         return NULL;
167 }
168