2 * Image Library -- GraphicsMagick
4 * (c) 2006 Pavel Charvat <pchar@ucw.cz>
6 * This software may be freely distributed and used according to the terms
7 * of the GNU Lesser General Public License.
13 #include "lib/mempool.h"
14 #include "lib/fastbuf.h"
15 #include "images/images.h"
16 #include <sys/types.h>
19 #include <magick/api.h>
21 #define MAX_FILE_SIZE (1 << 30)
22 #define QUANTUM_SCALE (QuantumDepth - 8)
23 #define QUANTUM_TO_BYTE(x) ((uns)(x) >> QUANTUM_SCALE)
25 struct magick_read_data {
26 ExceptionInfo exception;
32 libmagick_destroy_read_data(struct magick_read_data *rd)
35 DestroyImage(rd->image);
36 DestroyImageInfo(rd->info);
37 DestroyExceptionInfo(&rd->exception);
42 libmagick_read_cancel(struct image_io *io)
44 DBG("libmagick_read_cancel()");
46 struct magick_read_data *rd = io->read_data;
48 DestroyImage(rd->image);
49 libmagick_destroy_read_data(rd);
53 libmagick_read_header(struct image_io *io)
55 DBG("libmagick_read_header()");
57 /* Read entire stream */
58 sh_off_t file_size = bfilesize(io->fastbuf) - btell(io->fastbuf);
59 if (file_size > MAX_FILE_SIZE)
61 image_thread_err(io->thread, IMAGE_ERR_READ_FAILED, "Too long stream.");
64 uns buf_size = file_size;
65 byte *buf = xmalloc(buf_size);
66 bread(io->fastbuf, buf, buf_size);
68 /* Allocate read structure */
69 struct magick_read_data *rd = io->read_data = mp_alloc(io->internal_pool, sizeof(*rd));
71 /* Initialize GraphicsMagick */
72 InitializeMagick(NULL);
73 GetExceptionInfo(&rd->exception);
74 rd->info = CloneImageInfo(NULL);
75 rd->info->subrange = 1;
78 rd->image = BlobToImage(rd->info, buf, buf_size, &rd->exception);
82 image_thread_err(io->thread, IMAGE_ERR_READ_FAILED, "GraphicsMagick failed to read the image.");
85 if (rd->image->columns > IMAGE_MAX_SIZE || rd->image->rows > IMAGE_MAX_SIZE)
87 image_thread_err(io->thread, IMAGE_ERR_INVALID_DIMENSIONS, "Image too large.");
91 /* Fill image parameters */
93 io->cols = rd->image->columns;
95 io->rows = rd->image->rows;
96 if (!(io->flags & IMAGE_CHANNELS_FORMAT))
98 switch (rd->image->colorspace)
101 io->flags |= COLOR_SPACE_GRAYSCALE | IMAGE_ALPHA;
104 io->flags |= COLOR_SPACE_RGB | IMAGE_ALPHA;
109 io->read_cancel = libmagick_read_cancel;
113 libmagick_destroy_read_data(rd);
118 libmagick_pixel_to_gray(PixelPacket *pixel)
120 return ((uns)pixel->red * 19660 + (uns)pixel->green * 38666 + (uns)pixel->blue * 7210) >> (16 + QUANTUM_SCALE);
124 libmagick_read_data(struct image_io *io)
126 DBG("libmagick_read_data()");
128 struct magick_read_data *rd = io->read_data;
131 switch (rd->image->colorspace)
137 QuantizeInfo quantize;
138 GetQuantizeInfo(&quantize);
139 quantize.colorspace = RGBColorspace;
140 QuantizeImage(&quantize, rd->image);
144 /* Allocate image for conversion */
145 int need_scale = io->cols != rd->image->columns || io->rows != rd->image->rows;
146 int need_destroy = need_scale || !io->pool;
147 struct image *img = need_scale ?
148 image_new(io->thread, rd->image->columns, rd->image->rows, io->flags & IMAGE_CHANNELS_FORMAT, NULL) :
149 image_new(io->thread, io->cols, io->rows, io->flags, io->pool);
154 PixelPacket *src = (PixelPacket *)AcquireImagePixels(rd->image, 0, 0, rd->image->columns, rd->image->rows, &rd->exception);
157 image_thread_err(io->thread, IMAGE_ERR_READ_FAILED, "Cannot acquire image pixels.");
162 switch (img->pixel_size)
165 # define IMAGE_WALK_INLINE
166 # define IMAGE_WALK_UNROLL 4
167 # define IMAGE_WALK_COL_STEP 1
168 # define IMAGE_WALK_DO_STEP do{ \
169 pos[0] = libmagick_pixel_to_gray(src); \
171 # include "images/image-walk.h"
175 # define IMAGE_WALK_INLINE
176 # define IMAGE_WALK_UNROLL 4
177 # define IMAGE_WALK_COL_STEP 2
178 # define IMAGE_WALK_DO_STEP do{ \
179 pos[0] = libmagick_pixel_to_gray(src); \
180 pos[1] = QUANTUM_TO_BYTE(src->opacity); \
182 # include "images/image-walk.h"
186 # define IMAGE_WALK_INLINE
187 # define IMAGE_WALK_UNROLL 4
188 # define IMAGE_WALK_COL_STEP 3
189 # define IMAGE_WALK_DO_STEP do{ \
190 pos[0] = QUANTUM_TO_BYTE(src->red); \
191 pos[1] = QUANTUM_TO_BYTE(src->green); \
192 pos[2] = QUANTUM_TO_BYTE(src->blue); \
194 # include "images/image-walk.h"
198 # define IMAGE_WALK_INLINE
199 # define IMAGE_WALK_UNROLL 4
200 # define IMAGE_WALK_COL_STEP 4
201 # define IMAGE_WALK_DO_STEP do{ \
202 pos[0] = QUANTUM_TO_BYTE(src->red); \
203 pos[1] = QUANTUM_TO_BYTE(src->green); \
204 pos[2] = QUANTUM_TO_BYTE(src->blue); \
205 pos[3] = QUANTUM_TO_BYTE(src->opacity); \
207 # include "images/image-walk.h"
214 /* Free GraphicsMagick structures */
215 libmagick_destroy_read_data(rd);
220 struct image *img2 = image_new(io->thread, io->cols, io->rows, io->flags, io->pool);
223 int result = image_scale(io->thread, img2, img);
224 image_destroy(io->thread, img);
226 need_destroy = !io->pool;
233 io->image_destroy = need_destroy;
236 /* Free structures */
238 libmagick_destroy_read_data(rd);
241 image_destroy(io->thread, img);
246 libmagick_write(struct image_io *io)
248 image_thread_err(io->thread, IMAGE_ERR_NOT_IMPLEMENTED, "GraphicsMagick write not implemented.");