2 * qimage_wrapper.cpp -- a QT/QImage based producer for MLT
3 * Copyright (C) 2006 Visual Media
4 * Author: Charles Yates <charles.yates@gmail.com>
6 * NB: This module is designed to be functionally equivalent to the
7 * gtk2 image loading module so it can be used as replacement.
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software Foundation,
21 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
24 #include "qimage_wrapper.h"
31 #include <kinstance.h>
39 #include <QtGui/QImage>
40 #include <QtCore/QSysInfo>
41 #include <QtCore/QMutex>
42 #include <QtCore/QtEndian>
43 #include <QtCore/QTemporaryFile>
47 #include <libexif/exif-data.h>
54 #include <framework/mlt_pool.h>
55 #include <framework/mlt_cache.h>
58 static KInstance *instance = 0L;
61 static void qimage_delete( void *data )
63 QImage *image = ( QImage * )data;
67 if (instance) delete instance;
72 static QMutex g_mutex;
78 instance = new KInstance("qimage_prod");
79 KImageIO::registerFormats();
84 void refresh_qimage( producer_qimage self, mlt_frame frame, int width, int height )
86 // Obtain properties of frame
87 mlt_properties properties = MLT_FRAME_PROPERTIES( frame );
89 // Obtain the producer
90 mlt_producer producer = &self->parent;
92 // Obtain properties of producer
93 mlt_properties producer_props = MLT_PRODUCER_PROPERTIES( producer );
96 pthread_mutex_lock( &self->mutex );
97 mlt_cache_item qimage_cache = mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer ), "qimage.qimage" );
98 QImage *qimage = static_cast<QImage*>( mlt_cache_item_data( qimage_cache, NULL ) );
100 // restore scaled image
101 self->image_cache = mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer ), "qimage.image" );
102 self->current_image = static_cast<uint8_t*>( mlt_cache_item_data( self->image_cache, NULL ) );
104 // Check if user wants us to reload the image
105 if ( mlt_properties_get_int( producer_props, "force_reload" ) )
108 self->current_image = NULL;
109 mlt_properties_set_int( producer_props, "force_reload", 0 );
112 // Obtain the cache flag and structure
113 int use_cache = mlt_properties_get_int( producer_props, "cache" );
114 mlt_properties cache = ( mlt_properties )mlt_properties_get_data( producer_props, "_cache", NULL );
115 int update_cache = 0;
117 // Get the time to live for each frame
118 double ttl = mlt_properties_get_int( producer_props, "ttl" );
120 // Get the original position of this frame
121 mlt_position position = mlt_properties_get_position( properties, "qimage_position" );
122 position += mlt_producer_get_in( producer );
125 int image_idx = ( int )floor( ( double )position / ttl ) % self->count;
128 char image_key[ 10 ];
129 sprintf( image_key, "%d", image_idx );
133 // Check if the frame is already loaded
138 cache = mlt_properties_new( );
139 mlt_properties_set_data( producer_props, "_cache", cache, 0, ( mlt_destructor )mlt_properties_close, NULL );
142 mlt_frame cached = ( mlt_frame )mlt_properties_get_data( cache, image_key, NULL );
146 self->image_idx = image_idx;
147 mlt_properties cached_props = MLT_FRAME_PROPERTIES( cached );
148 self->current_width = mlt_properties_get_int( cached_props, "width" );
149 self->current_height = mlt_properties_get_int( cached_props, "height" );
150 mlt_properties_set_int( producer_props, "_real_width", mlt_properties_get_int( cached_props, "real_width" ) );
151 mlt_properties_set_int( producer_props, "_real_height", mlt_properties_get_int( cached_props, "real_height" ) );
152 self->current_image = ( uint8_t * )mlt_properties_get_data( cached_props, "image", NULL );
153 self->has_alpha = mlt_properties_get_int( cached_props, "alpha" );
155 if ( width != 0 && ( width != self->current_width || height != self->current_height ) )
156 self->current_image = NULL;
160 int disable_exif = mlt_properties_get_int( producer_props, "disable_exif" );
162 // optimization for subsequent iterations on single pictur
163 if ( width != 0 && ( image_idx != self->image_idx || width != self->current_width || height != self->current_height ) )
164 self->current_image = NULL;
165 if ( image_idx != self->qimage_idx )
168 if ( !qimage || mlt_properties_get_int( producer_props, "_disable_exif" ) != disable_exif)
170 self->current_image = NULL;
171 qimage = new QImage( mlt_properties_get_value( self->filenames, image_idx ) );
173 if ( !qimage->isNull( ) )
176 // Read the exif value for this file
177 if ( disable_exif == 0) {
178 ExifData *d = exif_data_new_from_file( mlt_properties_get_value( self->filenames, image_idx ) );
180 int exif_orientation = 0;
181 /* get orientation and rotate image accordingly if necessary */
183 if ( ( entry = exif_content_get_entry ( d->ifd[EXIF_IFD_0], EXIF_TAG_ORIENTATION ) ) )
184 exif_orientation = exif_get_short (entry->data, exif_data_get_byte_order (d));
186 /* Free the EXIF data */
190 if ( exif_orientation > 1 )
192 // Rotate image according to exif data
196 switch ( exif_orientation ) {
198 matrix.scale( -1, 1 );
201 matrix.rotate( 180 );
204 matrix.scale( 1, -1 );
207 matrix.rotate( 270 );
208 matrix.scale( -1, 1 );
215 matrix.scale( -1, 1 );
218 matrix.rotate( 270 );
221 processed = qimage->transformed( matrix );
223 qimage = new QImage( processed );
227 // Store the width/height of the qimage
228 self->current_width = qimage->width( );
229 self->current_height = qimage->height( );
231 // Register qimage for destruction and reuse
232 mlt_cache_item_close( qimage_cache );
233 mlt_service_cache_put( MLT_PRODUCER_SERVICE( producer ), "qimage.qimage", qimage, 0, ( mlt_destructor )qimage_delete );
234 qimage_cache = mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer ), "qimage.qimage" );
235 self->qimage_idx = image_idx;
237 mlt_events_block( producer_props, NULL );
238 mlt_properties_set_int( producer_props, "_real_width", self->current_width );
239 mlt_properties_set_int( producer_props, "_real_height", self->current_height );
240 mlt_properties_set_int( producer_props, "_disable_exif", disable_exif );
241 mlt_events_unblock( producer_props, NULL );
250 // If we have a pixbuf and this request specifies a valid dimension and we haven't already got a cached version...
251 if ( qimage && width > 0 && !self->current_image )
253 char *interps = mlt_properties_get( properties, "rescale.interp" );
256 // QImage has two scaling modes - we'll toggle between them here
257 if ( strcmp( interps, "tiles" ) == 0 )
259 else if ( strcmp( interps, "hyper" ) == 0 )
263 // Note - the original qimage is already safe and ready for destruction
264 QImage scaled = interp == 0 ? qimage->scaled( QSize( width, height ) ) :
265 qimage->scaled( QSize(width, height), Qt::IgnoreAspectRatio, Qt::SmoothTransformation );
267 self->has_alpha = scaled.hasAlphaChannel();
271 // Note - the original qimage is already safe and ready for destruction
272 QImage scaled = interp == 0 ? qimage->scale( width, height, QImage::ScaleFree ) :
273 qimage->smoothScale( width, height, QImage::ScaleFree );
277 // Store width and height
278 self->current_width = width;
279 self->current_height = height;
281 // Allocate/define image
282 int dst_stride = width * ( self->has_alpha ? 4 : 3 );
283 int image_size = dst_stride * ( height + 1 );
284 self->current_image = ( uint8_t * )mlt_pool_alloc( image_size );
287 int y = self->current_height + 1;
288 uint8_t *dst = self->current_image;
291 QRgb *src = (QRgb*) scaled.scanLine( self->current_height - y );
292 int x = self->current_width + 1;
296 *dst++ = qGreen(*src);
297 *dst++ = qBlue(*src);
298 if ( self->has_alpha ) *dst++ = qAlpha(*src);
305 mlt_cache_item_close( self->image_cache );
306 mlt_service_cache_put( MLT_PRODUCER_SERVICE( producer ), "qimage.image", self->current_image, image_size, mlt_pool_release );
307 self->image_cache = mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer ), "qimage.image" );
308 self->image_idx = image_idx;
310 // Ensure we update the cache when we need to
311 update_cache = use_cache;
314 // release references no longer needed
315 mlt_cache_item_close( qimage_cache );
318 pthread_mutex_unlock( &self->mutex );
319 mlt_cache_item_close( self->image_cache );
322 // Set width/height of frame
323 mlt_properties_set_int( properties, "width", self->current_width );
324 mlt_properties_set_int( properties, "height", self->current_height );
325 mlt_properties_set_int( properties, "real_width", mlt_properties_get_int( producer_props, "_real_width" ) );
326 mlt_properties_set_int( properties, "real_height", mlt_properties_get_int( producer_props, "_real_height" ) );
330 mlt_frame cached = mlt_frame_init( MLT_PRODUCER_SERVICE( producer ) );
331 mlt_properties cached_props = MLT_FRAME_PROPERTIES( cached );
332 mlt_properties_set_int( cached_props, "width", self->current_width );
333 mlt_properties_set_int( cached_props, "height", self->current_height );
334 mlt_properties_set_int( cached_props, "real_width", mlt_properties_get_int( producer_props, "_real_width" ) );
335 mlt_properties_set_int( cached_props, "real_height", mlt_properties_get_int( producer_props, "_real_height" ) );
336 mlt_properties_set_data( cached_props, "image", self->current_image,
337 self->current_width * ( self->current_height + 1 ) * ( self->has_alpha ? 4 : 3 ),
338 mlt_pool_release, NULL );
339 mlt_properties_set_int( cached_props, "alpha", self->has_alpha );
340 mlt_properties_set_data( cache, image_key, cached, 0, ( mlt_destructor )mlt_frame_close, NULL );
345 extern void make_tempfile( producer_qimage self, const char *xml )
347 // Generate a temporary file for the svg
348 QTemporaryFile tempFile( "mlt.XXXXXX" );
350 tempFile.setAutoRemove( false );
351 if ( tempFile.open() )
353 // Write the svg into the temp file
354 char *fullname = tempFile.fileName().toUtf8().data();
356 // Strip leading crap
357 while ( xml[0] != '<' )
360 qint64 remaining_bytes = strlen( xml );
361 while ( remaining_bytes > 0 )
362 remaining_bytes -= tempFile.write( xml + strlen( xml ) - remaining_bytes, remaining_bytes );
365 mlt_properties_set( self->filenames, "0", fullname );
367 mlt_properties_set_data( MLT_PRODUCER_PROPERTIES( &self->parent ), "__temporary_file__",
368 fullname, 0, ( mlt_destructor )unlink, NULL );