]> git.sesse.net Git - mlt/blob - src/modules/qimage/producer_kdenlivetitle.c
Add support for auto rotation for images with exif data
[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         /* Allocate the image */
64         int size = *width * ( *height ) * 4;
65
66         /* Allocate the image */
67         *format = mlt_image_rgb24a;
68         mlt_position time = mlt_producer_position( &this->parent ) + mlt_producer_get_in( &this->parent );
69         if ( mlt_properties_get_int( producer_props, "force_reload" ) ) {
70                 if (mlt_properties_get_int( producer_props, "force_reload" ) > 1) read_xml(producer_props);
71                 mlt_properties_set_int( producer_props, "force_reload", 0 );
72                 drawKdenliveTitle( this, frame, *width, *height, time, 1);
73         }
74         else drawKdenliveTitle( this, frame, *width, *height, time, 0);
75
76         // Get width and height (may have changed during the refresh)
77         *width = mlt_properties_get_int( properties, "width" );
78         *height = mlt_properties_get_int( properties, "height" );
79                 
80         if ( this->current_image )
81         {
82                 // Clone the image and the alpha
83                 int image_size = this->current_width * ( this->current_height ) * 4;
84                 uint8_t *image_copy = mlt_pool_alloc( image_size );
85                 memcpy( image_copy, this->current_image, image_size );
86                 // Now update properties so we free the copy after
87                 mlt_properties_set_data( properties, "image", image_copy, image_size, mlt_pool_release, NULL );
88                 // We're going to pass the copy on
89                 *buffer = image_copy;           
90                 
91                 /* Update the frame */
92                 mlt_properties_set_data( properties, "image", *buffer, size, mlt_pool_release, NULL );
93
94                 mlt_log_debug( MLT_PRODUCER_SERVICE( &this->parent ), "width:%d height:%d %s\n", *width, *height, mlt_image_format_name( *format ) );
95         }
96
97         return 0;
98 }
99
100 static int producer_get_frame( mlt_producer producer, mlt_frame_ptr frame, int index )
101
102 {
103         // Get the real structure for this producer
104         producer_ktitle this = producer->child;
105
106         /* Generate a frame */
107         *frame = mlt_frame_init( MLT_PRODUCER_SERVICE( producer ) );
108
109         if ( *frame != NULL )
110         {
111                 /* Obtain properties of frame and producer */
112                 mlt_properties properties = MLT_FRAME_PROPERTIES( *frame );
113
114                 /* Obtain properties of producer */
115                 mlt_properties producer_props = MLT_PRODUCER_PROPERTIES( producer );
116
117                 /* Set the producer on the frame properties */
118                 mlt_properties_set_data( properties, "producer_kdenlivetitle", this, 0, NULL, NULL );
119
120                 /* Update timecode on the frame we're creating */
121                 mlt_frame_set_position( *frame, mlt_producer_position( producer ) );
122
123                 /* Set producer-specific frame properties */
124                 mlt_profile profile = mlt_service_profile ( MLT_PRODUCER_SERVICE( producer ) ) ;
125                 mlt_properties_set_int( properties, "progressive", ( profile ) ? profile->progressive : 1 );
126                 mlt_properties_set_double( properties, "aspect_ratio", mlt_properties_get_double( producer_props, "aspect_ratio" ) );
127
128                 /* Push the get_image method */
129                 mlt_frame_push_get_image( *frame, producer_get_image );
130         }
131
132         /* Calculate the next timecode */
133         mlt_producer_prepare_next( producer );
134
135         return 0;
136 }
137
138 static void producer_close( mlt_producer producer )
139 {
140         /* fprintf(stderr, "::::::::::::::  CLOSING TITLE\n"); */
141         producer->close = NULL;
142         mlt_producer_close( producer );
143         free( producer );
144 }
145
146
147 mlt_producer producer_kdenlivetitle_init( mlt_profile profile, mlt_service_type type, const char *id, char *filename )
148 {
149         /* fprintf(stderr, ":::::::::::: CREATE TITLE\n"); */
150         /* Create a new producer object */
151         
152         producer_ktitle this = calloc( sizeof( struct producer_ktitle_s ), 1 );
153         if ( this != NULL && mlt_producer_init( &this->parent, this ) == 0 )
154         {
155                 mlt_producer producer = &this->parent;
156                 
157                 /* Get the properties interface */
158                 mlt_properties properties = MLT_PRODUCER_PROPERTIES( producer );
159                 /* Callback registration */
160                 producer->get_frame = producer_get_frame;
161                 producer->close = ( mlt_destructor )producer_close;
162                 mlt_properties_set( properties, "resource", filename );
163                 //mlt_properties_set_int( properties, "aspect_ratio", 1 );
164                 read_xml(properties);
165                 return producer;
166         }
167         free( this );
168         return NULL;
169 }
170