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>
49 #include <framework/mlt_pool.h>
50 #include <framework/mlt_cache.h>
53 static KInstance
*instance
= 0L;
56 static void qimage_delete( void *data
)
58 QImage
*image
= ( QImage
* )data
;
62 if (instance
) delete instance
;
67 static QMutex g_mutex
;
73 instance
= new KInstance("qimage_prod");
74 KImageIO
::registerFormats();
79 void refresh_qimage( producer_qimage self
, mlt_frame frame
, int width
, int height
)
81 // Obtain properties of frame
82 mlt_properties properties
= MLT_FRAME_PROPERTIES( frame
);
84 // Obtain the producer
85 mlt_producer producer
= &self
->parent
;
87 // Obtain properties of producer
88 mlt_properties producer_props
= MLT_PRODUCER_PROPERTIES( producer
);
91 pthread_mutex_lock( &self
->mutex
);
92 mlt_cache_item qimage_cache
= mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer
), "qimage.qimage" );
93 QImage
*qimage
= static_cast<QImage
*>( mlt_cache_item_data( qimage_cache
, NULL
) );
95 // restore scaled image
96 self
->image_cache
= mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer
), "qimage.image" );
97 self
->current_image
= static_cast<uint8_t*>( mlt_cache_item_data( self
->image_cache
, NULL
) );
99 // restore alpha channel
100 self
->alpha_cache
= mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer
), "qimage.alpha" );
101 self
->current_alpha
= static_cast<uint8_t*>( mlt_cache_item_data( self
->alpha_cache
, NULL
) );
103 // Check if user wants us to reload the image
104 if ( mlt_properties_get_int( producer_props
, "force_reload" ) )
107 self
->current_image
= NULL
;
108 mlt_properties_set_int( producer_props
, "force_reload", 0 );
111 // Obtain the cache flag and structure
112 int use_cache
= mlt_properties_get_int( producer_props
, "cache" );
113 mlt_properties cache
= ( mlt_properties
)mlt_properties_get_data( producer_props
, "_cache", NULL
);
114 int update_cache
= 0;
116 // Get the time to live for each frame
117 double ttl
= mlt_properties_get_int( producer_props
, "ttl" );
119 // Get the original position of this frame
120 mlt_position position
= mlt_properties_get_position( properties
, "qimage_position" );
121 position
+= mlt_producer_get_in( producer
);
124 int image_idx
= ( int )floor( ( double )position
/ ttl
) % self
->count
;
127 char image_key
[ 10 ];
128 sprintf( image_key
, "%d", image_idx
);
132 // Check if the frame is already loaded
137 cache
= mlt_properties_new( );
138 mlt_properties_set_data( producer_props
, "_cache", cache
, 0, ( mlt_destructor
)mlt_properties_close
, NULL
);
141 mlt_frame cached
= ( mlt_frame
)mlt_properties_get_data( cache
, image_key
, NULL
);
145 self
->image_idx
= image_idx
;
146 mlt_properties cached_props
= MLT_FRAME_PROPERTIES( cached
);
147 self
->current_width
= mlt_properties_get_int( cached_props
, "width" );
148 self
->current_height
= mlt_properties_get_int( cached_props
, "height" );
149 mlt_properties_set_int( producer_props
, "_real_width", mlt_properties_get_int( cached_props
, "real_width" ) );
150 mlt_properties_set_int( producer_props
, "_real_height", mlt_properties_get_int( cached_props
, "real_height" ) );
151 self
->current_image
= ( uint8_t * )mlt_properties_get_data( cached_props
, "image", NULL
);
152 self
->current_alpha
= ( uint8_t * )mlt_properties_get_data( cached_props
, "alpha", NULL
);
154 if ( width
!= 0 && ( width
!= self
->current_width
|| height
!= self
->current_height
) )
155 self
->current_image
= NULL
;
159 // optimization for subsequent iterations on single picture
160 if ( width
!= 0 && ( image_idx
!= self
->image_idx
|| width
!= self
->current_width
|| height
!= self
->current_height
) )
161 self
->current_image
= NULL
;
162 if ( image_idx
!= self
->image_idx
)
164 if ( qimage
== NULL
&& ( width
== 0 || self
->current_image
== NULL
) )
166 self
->current_image
= NULL
;
167 self
->image_idx
= image_idx
;
168 qimage
= new QImage( mlt_properties_get_value( self
->filenames
, image_idx
) );
170 if ( !qimage
->isNull( ) )
172 // Store the width/height of the qimage
173 self
->current_width
= qimage
->width( );
174 self
->current_height
= qimage
->height( );
176 // Register qimage for destruction and reuse
177 mlt_cache_item_close( qimage_cache
);
178 mlt_service_cache_put( MLT_PRODUCER_SERVICE( producer
), "qimage.qimage", qimage
, 0, ( mlt_destructor
)qimage_delete
);
179 qimage_cache
= mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer
), "qimage.qimage" );
181 mlt_events_block( producer_props
, NULL
);
182 mlt_properties_set_int( producer_props
, "_real_width", self
->current_width
);
183 mlt_properties_set_int( producer_props
, "_real_height", self
->current_height
);
184 mlt_events_unblock( producer_props
, NULL
);
193 // If we have a pixbuf and this request specifies a valid dimension and we haven't already got a cached version...
194 if ( qimage
&& width
> 0 && self
->current_image
== NULL
)
196 char *interps
= mlt_properties_get( properties
, "rescale.interp" );
199 // QImage has two scaling modes - we'll toggle between them here
200 if ( strcmp( interps
, "tiles" ) == 0 )
202 else if ( strcmp( interps
, "hyper" ) == 0 )
206 // Note - the original qimage is already safe and ready for destruction
207 QImage scaled
= interp
== 0 ? qimage
->scaled( QSize( width
, height
)) : qimage
->scaled( QSize(width
, height
), Qt
::IgnoreAspectRatio
, Qt
::SmoothTransformation
);
209 bool hasAlpha
= scaled
.hasAlphaChannel();
211 temp
= scaled
.convertToFormat(QImage
::Format_ARGB32
);
213 temp
= scaled
.convertToFormat(QImage
::Format_RGB888
);
217 // Note - the original qimage is already safe and ready for destruction
218 QImage scaled
= interp
== 0 ? qimage
->scale( width
, height
, QImage
::ScaleFree
) : qimage
->smoothScale( width
, height
, QImage
::ScaleFree
);
219 QImage temp
= scaled
.convertDepth( 32 );
220 bool hasAlpha
= true;
223 // Store width and height
224 self
->current_width
= width
;
225 self
->current_height
= height
;
227 // Allocate/define image
228 self
->current_image
= ( uint8_t * )mlt_pool_alloc( width
* ( height
+ 1 ) * 2 );
230 mlt_cache_item_close( self
->image_cache
);
231 mlt_service_cache_put( MLT_PRODUCER_SERVICE( producer
), "qimage.image", self
->current_image
, width
* ( height
+ 1 ) * 2, mlt_pool_release
);
232 self
->image_cache
= mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer
), "qimage.image" );
235 mlt_convert_rgb24_to_yuv422( temp
.bits(), self
->current_width
, self
->current_height
, temp
.bytesPerLine(), self
->current_image
);
238 // Allocate the alpha mask
239 self
->current_alpha
= ( uint8_t * )mlt_pool_alloc( width
* height
);
241 mlt_cache_item_close( self
->alpha_cache
);
242 mlt_service_cache_put( MLT_PRODUCER_SERVICE( producer
), "qimage.alpha", self
->current_alpha
, width
* height
, mlt_pool_release
);
243 self
->alpha_cache
= mlt_service_cache_get( MLT_PRODUCER_SERVICE( producer
), "qimage.alpha" );
246 if ( QSysInfo
::ByteOrder
== QSysInfo
::BigEndian
)
247 mlt_convert_argb_to_yuv422( temp
.bits( ), self
->current_width
, self
->current_height
, temp
.bytesPerLine(), self
->current_image
, self
->current_alpha
);
249 mlt_convert_bgr24a_to_yuv422( temp
.bits( ), self
->current_width
, self
->current_height
, temp
.bytesPerLine( ), self
->current_image
, self
->current_alpha
);
254 if ( QImage
::systemByteOrder( ) == QImage
::BigEndian
)
255 mlt_convert_argb_to_yuv422( temp
.bits( ), self
->current_width
, self
->current_height
, temp
.bytesPerLine( ), self
->current_image
, self
->current_alpha
);
257 mlt_convert_bgr24a_to_yuv422( temp
.bits( ), self
->current_width
, self
->current_height
, temp
.bytesPerLine( ), self
->current_image
, self
->current_alpha
);
261 // Ensure we update the cache when we need to
262 update_cache
= use_cache
;
265 // release references no longer needed
266 mlt_cache_item_close( qimage_cache
);
269 pthread_mutex_unlock( &self
->mutex
);
270 mlt_cache_item_close( self
->image_cache
);
271 mlt_cache_item_close( self
->alpha_cache
);
274 // Set width/height of frame
275 mlt_properties_set_int( properties
, "width", self
->current_width
);
276 mlt_properties_set_int( properties
, "height", self
->current_height
);
277 mlt_properties_set_int( properties
, "real_width", mlt_properties_get_int( producer_props
, "_real_width" ) );
278 mlt_properties_set_int( properties
, "real_height", mlt_properties_get_int( producer_props
, "_real_height" ) );
282 mlt_frame cached
= mlt_frame_init( MLT_PRODUCER_SERVICE( producer
) );
283 mlt_properties cached_props
= MLT_FRAME_PROPERTIES( cached
);
284 mlt_properties_set_int( cached_props
, "width", self
->current_width
);
285 mlt_properties_set_int( cached_props
, "height", self
->current_height
);
286 mlt_properties_set_int( cached_props
, "real_width", mlt_properties_get_int( producer_props
, "_real_width" ) );
287 mlt_properties_set_int( cached_props
, "real_height", mlt_properties_get_int( producer_props
, "_real_height" ) );
288 mlt_properties_set_data( cached_props
, "image", self
->current_image
, self
->current_width
* ( self
->current_height
+ 1 ) * 2, mlt_pool_release
, NULL
);
289 mlt_properties_set_data( cached_props
, "alpha", self
->current_alpha
, self
->current_width
* self
->current_height
, mlt_pool_release
, NULL
);
290 mlt_properties_set_data( cache
, image_key
, cached
, 0, ( mlt_destructor
)mlt_frame_close
, NULL
);