bcfd31a229532e607ba53ee1e522df43ed2b61f5
[synfig.git] /
1 /* === S Y N F I G ========================================================= */
2 /*!     \file trgt_magickpp.cpp
3 **      \brief Magick++ Target Module
4 **
5 **      $Id$
6 **
7 **      \legal
8 **      Copyright (c) 2007, 2008 Chris Moore
9 **
10 **      This package is free software; you can redistribute it and/or
11 **      modify it under the terms of the GNU General Public License as
12 **      published by the Free Software Foundation; either version 2 of
13 **      the License, or (at your option) any later version.
14 **
15 **      This package is distributed in the hope that it will be useful,
16 **      but WITHOUT ANY WARRANTY; without even the implied warranty of
17 **      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 **      General Public License for more details.
19 **      \endlegal
20 **
21 ** === N O T E S ===========================================================
22 **
23 ** ========================================================================= */
24
25 /* === H E A D E R S ======================================================= */
26
27 #define SYNFIG_TARGET
28
29 #ifdef USING_PCH
30 #       include "pch.h"
31 #else
32 #ifdef HAVE_CONFIG_H
33 #       include <config.h>
34 #endif
35
36 #include <ETL/misc>
37 #include "trgt_magickpp.h"
38
39 #endif
40
41 /* === M A C R O S ========================================================= */
42
43 using namespace synfig;
44 using namespace std;
45 using namespace etl;
46
47 /* === G L O B A L S ======================================================= */
48
49 SYNFIG_TARGET_INIT(magickpp_trgt);
50 SYNFIG_TARGET_SET_NAME(magickpp_trgt,"magick++");
51 SYNFIG_TARGET_SET_EXT(magickpp_trgt,"gif");
52 SYNFIG_TARGET_SET_VERSION(magickpp_trgt,"0.1");
53 SYNFIG_TARGET_SET_CVS_ID(magickpp_trgt,"$Id$");
54
55 /* === M E T H O D S ======================================================= */
56
57 template <class Container>
58 MagickLib::Image* copy_image_list(Container& container)
59 {
60         typedef typename Container::iterator Iter;
61         MagickLib::Image* previous = 0;
62         MagickLib::Image* first = NULL;
63         MagickLib::ExceptionInfo exceptionInfo;
64         MagickLib::GetExceptionInfo(&exceptionInfo);
65         for (Iter iter = container.begin(); iter != container.end(); ++iter)
66         {
67                 MagickLib::Image* current;
68
69                 try
70                 {
71                         current = CloneImage(iter->image(), 0, 0, Magick::MagickTrue, &exceptionInfo);
72
73                         if (!first) first = current;
74
75                         current->previous = previous;
76                         current->next     = 0;
77
78                         if ( previous != 0) previous->next = current;
79                         previous = current;
80                 }
81                 catch(Magick::Warning warning) {
82                         synfig::warning("exception '%s'", warning.what());
83                 }
84         }
85
86         return first;
87 }
88
89 magickpp_trgt::~magickpp_trgt()
90 {
91         MagickLib::ExceptionInfo exceptionInfo;
92         MagickLib::GetExceptionInfo(&exceptionInfo);
93
94         try
95         {
96                 bool multiple_images = images.size() != 1;
97                 bool can_adjoin = false;
98
99                 if (multiple_images)
100                 {
101                         // check whether this file format supports multiple-image files
102                         Magick::Image image(*(images.begin()));
103                         image.fileName(filename);
104                         try
105                         {
106                                 SetImageInfo(image.imageInfo(),Magick::MagickTrue,&exceptionInfo);
107                                 can_adjoin = image.adjoin();
108                         }
109                         catch(Magick::Warning warning) {
110                                 synfig::warning("exception '%s'", warning.what());
111                         }
112                 }
113
114                 // the file type is now in image.imageInfo()->magick and
115                 // image.adjoin() tells us whether we can write to a single file
116                 if (can_adjoin)
117                 {
118                         synfig::info("joining images");
119                         unsigned int delay = round_to_int(100.0 / desc.get_frame_rate());
120                         for_each(images.begin(), images.end(), Magick::animationDelayImage(delay));
121
122                         // optimize the images (only write the pixels that change from frame to frame
123 #ifdef HAVE_MAGICK_OPTIMIZE
124                         // make a completely new image list
125                         // this is required because:
126                         //   RemoveDuplicateLayers wants a linked list of images, and removes some of them
127                         //   when it removes an image, it invalidates it using DeleteImageFromList, but we still have it in our container
128                         //   when we destroy our container, the image is re-freed, failing an assertion
129
130                         synfig::info("copying image list");
131                         MagickLib::Image *image_list = copy_image_list(images);
132
133                         synfig::info("clearing old image list");
134                         images.clear();
135
136                         if (!getenv("SYNFIG_DISABLE_REMOVE_DUPS"))
137                         {
138                                 synfig::info("removing duplicate frames");
139                                 try
140                                 {
141                                         RemoveDuplicateLayers(&image_list, &exceptionInfo);
142                                 }
143                                 catch(Magick::Warning warning) {
144                                         synfig::warning("exception '%s'", warning.what());
145                                 }
146                         }
147
148                         if (!getenv("SYNFIG_DISABLE_OPTIMIZE"))
149                         {
150                                 synfig::info("optimizing layers");
151                                 try
152                                 {
153                                         image_list = OptimizeImageLayers(image_list,&exceptionInfo);
154                                 }
155                                 catch(Magick::Warning warning) {
156                                         synfig::warning("exception '%s'", warning.what());
157                                 }
158                         }
159
160                         if (!getenv("SYNFIG_DISABLE_OPTIMIZE_TRANS"))
161                         {
162                                 synfig::info("optimizing layer transparency");
163                                 try
164                                 {
165                                         OptimizeImageTransparency(image_list,&exceptionInfo);
166                                 }
167                                 catch(Magick::Warning warning) {
168                                         synfig::warning("exception '%s'", warning.what());
169                                 }
170                         }
171
172                         synfig::info("recreating image list");
173                         insertImages(&images, image_list);
174 #else
175                         synfig::info("not optimizing images");
176                         // DeconstructImages is available in ImageMagic 6.2.* but it doesn't take
177                         // the 'dispose' method into account, so for frames with transparency where
178                         // nothing is moving, we end up with objects disappearing when they shouldn't
179
180                         // linkImages(images.begin(), images.end());
181                         // MagickLib::Image* new_images = DeconstructImages(images.begin()->image(),&exceptionInfo);
182                         // unlinkImages(images.begin(), images.end());
183                         // images.clear();
184                         // insertImages(&images, new_images);
185 #endif
186                 }
187                 else if (multiple_images)
188                 {
189                         // if we can't write multiple images to a file of this type,
190                         // include '%04d' in the filename, so the files will be numbered
191                         // with a fixed width, '0'-padded number
192                         synfig::info("can't join images of this type - numbering instead");
193                         filename = (filename_sans_extension(filename) + ".%04d" + filename_extension(filename));
194                 }
195
196                 synfig::info("writing %d image%s to %s", images.size(), images.size() == 1 ? "" : "s", filename.c_str());
197                 try
198                 {
199                         Magick::writeImages(images.begin(), images.end(), filename);
200                 }
201                 catch(Magick::Warning warning) {
202                         synfig::warning("exception '%s'", warning.what());
203                 }
204         }
205         catch(Magick::Warning warning) {
206                 synfig::warning("exception '%s'", warning.what());
207         }
208         catch(Magick::Error error) {
209                 synfig::error("exception '%s'", error.what());
210         }
211         catch(...) {
212                 synfig::error("unknown exception");
213         }
214
215         if (buffer1 != NULL) delete [] buffer1;
216         if (buffer2 != NULL) delete [] buffer2;
217         if (color_buffer != NULL) delete [] color_buffer;
218 }
219
220 bool
221 magickpp_trgt::set_rend_desc(RendDesc *given_desc)
222 {
223         desc = *given_desc;
224         return true;
225 }
226
227 bool
228 magickpp_trgt::init()
229 {
230         width = desc.get_w();
231         height = desc.get_h();
232
233         start_pointer = NULL;
234
235         buffer1 = new unsigned char[4*width*height];
236         if (buffer1 == NULL)
237                 return false;
238
239         buffer2 = new unsigned char[4*width*height];
240         if (buffer2 == NULL)
241         {
242                 delete [] buffer1;
243                 return false;
244         }
245
246         color_buffer = new Color[width];
247         if (color_buffer == NULL)
248         {
249                 delete [] buffer1;
250                 delete [] buffer2;
251                 return false;
252         }
253
254         return true;
255 }
256
257 void
258 magickpp_trgt::end_frame()
259 {
260         Magick::Image image(width, height, "RGBA", Magick::CharPixel, start_pointer);
261         if (transparent && images.begin() != images.end())
262                 (images.end()-1)->gifDisposeMethod(Magick::BackgroundDispose);
263         images.push_back(image);
264 }
265
266 bool
267 magickpp_trgt::start_frame(synfig::ProgressCallback *callback __attribute__ ((unused)))
268 {
269         previous_buffer_pointer = start_pointer;
270
271         if (start_pointer == buffer1)
272                 start_pointer = buffer_pointer = buffer2;
273         else
274                 start_pointer = buffer_pointer = buffer1;
275
276         transparent = false;
277         return true;
278 }
279
280 Color*
281 magickpp_trgt::start_scanline(int scanline __attribute__ ((unused)))
282 {
283         return color_buffer;
284 }
285
286 bool
287 magickpp_trgt::end_scanline()
288 {
289         convert_color_format(buffer_pointer, color_buffer,
290                                                  width, PF_RGB|PF_A, gamma());
291
292         if (!transparent)
293                 for (int i = 0; i < width; i++)
294                         if (previous_buffer_pointer &&                                  // this isn't the first frame
295                                 buffer_pointer[i*4 + 3] < 128 &&                        // our pixel is transparent
296                                 !(previous_buffer_pointer[i*4 + 3] < 128))      // the previous frame's pixel wasn't
297                         {
298                                 transparent = true;
299                                 break;
300                         }
301
302         buffer_pointer += 4 * width;
303
304         if (previous_buffer_pointer)
305                 previous_buffer_pointer += 4 * width;
306
307         return true;
308 }