cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1 | /* |
| 2 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 3 | % % |
| 4 | % % |
| 5 | % % |
| 6 | % GGGG IIIII FFFFF % |
| 7 | % G I F % |
| 8 | % G GG I FFF % |
| 9 | % G G I F % |
| 10 | % GGG IIIII F % |
| 11 | % % |
| 12 | % % |
| 13 | % Read/Write Compuserv Graphics Interchange Format % |
| 14 | % % |
| 15 | % Software Design % |
cristy | de984cd | 2013-12-01 14:49:27 +0000 | [diff] [blame] | 16 | % Cristy % |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 17 | % July 1992 % |
| 18 | % % |
| 19 | % % |
Cristy | 7ce65e7 | 2015-12-12 18:03:16 -0500 | [diff] [blame] | 20 | % Copyright 1999-2016 ImageMagick Studio LLC, a non-profit organization % |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 21 | % dedicated to making software imaging solutions freely available. % |
| 22 | % % |
| 23 | % You may not use this file except in compliance with the License. You may % |
| 24 | % obtain a copy of the License at % |
| 25 | % % |
| 26 | % http://www.imagemagick.org/script/license.php % |
| 27 | % % |
| 28 | % Unless required by applicable law or agreed to in writing, software % |
| 29 | % distributed under the License is distributed on an "AS IS" BASIS, % |
| 30 | % WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. % |
| 31 | % See the License for the specific language governing permissions and % |
| 32 | % limitations under the License. % |
| 33 | % % |
| 34 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 35 | % |
| 36 | % |
| 37 | */ |
| 38 | |
| 39 | /* |
| 40 | Include declarations. |
| 41 | */ |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 42 | #include "MagickCore/studio.h" |
| 43 | #include "MagickCore/attribute.h" |
| 44 | #include "MagickCore/blob.h" |
| 45 | #include "MagickCore/blob-private.h" |
| 46 | #include "MagickCore/cache.h" |
| 47 | #include "MagickCore/color.h" |
| 48 | #include "MagickCore/color-private.h" |
| 49 | #include "MagickCore/colormap.h" |
| 50 | #include "MagickCore/colormap-private.h" |
| 51 | #include "MagickCore/colorspace.h" |
cristy | 510d06a | 2011-07-06 23:43:54 +0000 | [diff] [blame] | 52 | #include "MagickCore/colorspace-private.h" |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 53 | #include "MagickCore/exception.h" |
| 54 | #include "MagickCore/exception-private.h" |
| 55 | #include "MagickCore/image.h" |
| 56 | #include "MagickCore/image-private.h" |
| 57 | #include "MagickCore/list.h" |
| 58 | #include "MagickCore/profile.h" |
| 59 | #include "MagickCore/magick.h" |
| 60 | #include "MagickCore/memory_.h" |
| 61 | #include "MagickCore/monitor.h" |
| 62 | #include "MagickCore/monitor-private.h" |
| 63 | #include "MagickCore/option.h" |
| 64 | #include "MagickCore/pixel.h" |
| 65 | #include "MagickCore/pixel-accessor.h" |
| 66 | #include "MagickCore/property.h" |
| 67 | #include "MagickCore/quantize.h" |
| 68 | #include "MagickCore/quantum-private.h" |
| 69 | #include "MagickCore/static.h" |
| 70 | #include "MagickCore/string_.h" |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 71 | #include "MagickCore/string-private.h" |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 72 | #include "MagickCore/module.h" |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 73 | |
| 74 | /* |
| 75 | Define declarations. |
| 76 | */ |
| 77 | #define MaximumLZWBits 12 |
| 78 | #define MaximumLZWCode (1UL << MaximumLZWBits) |
| 79 | |
| 80 | /* |
| 81 | Typdef declarations. |
| 82 | */ |
| 83 | typedef struct _LZWCodeInfo |
| 84 | { |
| 85 | unsigned char |
| 86 | buffer[280]; |
| 87 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 88 | size_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 89 | count, |
| 90 | bit; |
| 91 | |
| 92 | MagickBooleanType |
| 93 | eof; |
| 94 | } LZWCodeInfo; |
| 95 | |
| 96 | typedef struct _LZWStack |
| 97 | { |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 98 | size_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 99 | *codes, |
| 100 | *index, |
| 101 | *top; |
| 102 | } LZWStack; |
| 103 | |
| 104 | typedef struct _LZWInfo |
| 105 | { |
| 106 | Image |
| 107 | *image; |
| 108 | |
| 109 | LZWStack |
| 110 | *stack; |
| 111 | |
| 112 | MagickBooleanType |
| 113 | genesis; |
| 114 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 115 | size_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 116 | data_size, |
| 117 | maximum_data_value, |
| 118 | clear_code, |
| 119 | end_code, |
| 120 | bits, |
| 121 | first_code, |
| 122 | last_code, |
| 123 | maximum_code, |
| 124 | slot, |
| 125 | *table[2]; |
| 126 | |
| 127 | LZWCodeInfo |
| 128 | code_info; |
| 129 | } LZWInfo; |
| 130 | |
| 131 | /* |
| 132 | Forward declarations. |
| 133 | */ |
| 134 | static inline int |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 135 | GetNextLZWCode(LZWInfo *,const size_t); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 136 | |
| 137 | static MagickBooleanType |
cristy | 1e178e7 | 2011-08-28 19:44:34 +0000 | [diff] [blame] | 138 | WriteGIFImage(const ImageInfo *,Image *,ExceptionInfo *); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 139 | |
| 140 | static ssize_t |
| 141 | ReadBlobBlock(Image *,unsigned char *); |
| 142 | |
| 143 | /* |
| 144 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 145 | % % |
| 146 | % % |
| 147 | % % |
| 148 | % D e c o d e I m a g e % |
| 149 | % % |
| 150 | % % |
| 151 | % % |
| 152 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 153 | % |
| 154 | % DecodeImage uncompresses an image via GIF-coding. |
| 155 | % |
| 156 | % The format of the DecodeImage method is: |
| 157 | % |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 158 | % MagickBooleanType DecodeImage(Image *image,const ssize_t opacity) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 159 | % |
| 160 | % A description of each parameter follows: |
| 161 | % |
| 162 | % o image: the address of a structure of type Image. |
| 163 | % |
| 164 | % o opacity: The colormap index associated with the transparent color. |
| 165 | % |
| 166 | */ |
| 167 | |
| 168 | static LZWInfo *RelinquishLZWInfo(LZWInfo *lzw_info) |
| 169 | { |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 170 | if (lzw_info->table[0] != (size_t *) NULL) |
| 171 | lzw_info->table[0]=(size_t *) RelinquishMagickMemory( |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 172 | lzw_info->table[0]); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 173 | if (lzw_info->table[1] != (size_t *) NULL) |
| 174 | lzw_info->table[1]=(size_t *) RelinquishMagickMemory( |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 175 | lzw_info->table[1]); |
| 176 | if (lzw_info->stack != (LZWStack *) NULL) |
| 177 | { |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 178 | if (lzw_info->stack->codes != (size_t *) NULL) |
| 179 | lzw_info->stack->codes=(size_t *) RelinquishMagickMemory( |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 180 | lzw_info->stack->codes); |
| 181 | lzw_info->stack=(LZWStack *) RelinquishMagickMemory(lzw_info->stack); |
| 182 | } |
| 183 | lzw_info=(LZWInfo *) RelinquishMagickMemory(lzw_info); |
| 184 | return((LZWInfo *) NULL); |
| 185 | } |
| 186 | |
| 187 | static inline void ResetLZWInfo(LZWInfo *lzw_info) |
| 188 | { |
cristy | eaedf06 | 2010-05-29 22:36:02 +0000 | [diff] [blame] | 189 | size_t |
| 190 | one; |
| 191 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 192 | lzw_info->bits=lzw_info->data_size+1; |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 193 | one=1; |
cristy | eaedf06 | 2010-05-29 22:36:02 +0000 | [diff] [blame] | 194 | lzw_info->maximum_code=one << lzw_info->bits; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 195 | lzw_info->slot=lzw_info->maximum_data_value+3; |
| 196 | lzw_info->genesis=MagickTrue; |
| 197 | } |
| 198 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 199 | static LZWInfo *AcquireLZWInfo(Image *image,const size_t data_size) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 200 | { |
| 201 | LZWInfo |
| 202 | *lzw_info; |
| 203 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 204 | register ssize_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 205 | i; |
| 206 | |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 207 | size_t |
| 208 | one; |
| 209 | |
cristy | 73bd4a5 | 2010-10-05 11:24:23 +0000 | [diff] [blame] | 210 | lzw_info=(LZWInfo *) AcquireMagickMemory(sizeof(*lzw_info)); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 211 | if (lzw_info == (LZWInfo *) NULL) |
| 212 | return((LZWInfo *) NULL); |
| 213 | (void) ResetMagickMemory(lzw_info,0,sizeof(*lzw_info)); |
| 214 | lzw_info->image=image; |
| 215 | lzw_info->data_size=data_size; |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 216 | one=1; |
| 217 | lzw_info->maximum_data_value=(one << data_size)-1; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 218 | lzw_info->clear_code=lzw_info->maximum_data_value+1; |
| 219 | lzw_info->end_code=lzw_info->maximum_data_value+2; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 220 | lzw_info->table[0]=(size_t *) AcquireQuantumMemory(MaximumLZWCode, |
glennrp | 73921bd | 2015-01-31 00:03:01 +0000 | [diff] [blame] | 221 | sizeof(**lzw_info->table)); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 222 | lzw_info->table[1]=(size_t *) AcquireQuantumMemory(MaximumLZWCode, |
glennrp | 73921bd | 2015-01-31 00:03:01 +0000 | [diff] [blame] | 223 | sizeof(**lzw_info->table)); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 224 | if ((lzw_info->table[0] == (size_t *) NULL) || |
| 225 | (lzw_info->table[1] == (size_t *) NULL)) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 226 | { |
| 227 | lzw_info=RelinquishLZWInfo(lzw_info); |
| 228 | return((LZWInfo *) NULL); |
| 229 | } |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 230 | for (i=0; i <= (ssize_t) lzw_info->maximum_data_value; i++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 231 | { |
| 232 | lzw_info->table[0][i]=0; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 233 | lzw_info->table[1][i]=(size_t) i; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 234 | } |
| 235 | ResetLZWInfo(lzw_info); |
| 236 | lzw_info->code_info.buffer[0]='\0'; |
| 237 | lzw_info->code_info.buffer[1]='\0'; |
| 238 | lzw_info->code_info.count=2; |
| 239 | lzw_info->code_info.bit=8*lzw_info->code_info.count; |
| 240 | lzw_info->code_info.eof=MagickFalse; |
| 241 | lzw_info->genesis=MagickTrue; |
cristy | 73bd4a5 | 2010-10-05 11:24:23 +0000 | [diff] [blame] | 242 | lzw_info->stack=(LZWStack *) AcquireMagickMemory(sizeof(*lzw_info->stack)); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 243 | if (lzw_info->stack == (LZWStack *) NULL) |
| 244 | { |
| 245 | lzw_info=RelinquishLZWInfo(lzw_info); |
| 246 | return((LZWInfo *) NULL); |
| 247 | } |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 248 | lzw_info->stack->codes=(size_t *) AcquireQuantumMemory(2UL* |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 249 | MaximumLZWCode,sizeof(*lzw_info->stack->codes)); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 250 | if (lzw_info->stack->codes == (size_t *) NULL) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 251 | { |
| 252 | lzw_info=RelinquishLZWInfo(lzw_info); |
| 253 | return((LZWInfo *) NULL); |
| 254 | } |
| 255 | lzw_info->stack->index=lzw_info->stack->codes; |
| 256 | lzw_info->stack->top=lzw_info->stack->codes+2*MaximumLZWCode; |
| 257 | return(lzw_info); |
| 258 | } |
| 259 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 260 | static inline int GetNextLZWCode(LZWInfo *lzw_info,const size_t bits) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 261 | { |
| 262 | int |
| 263 | code; |
| 264 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 265 | register ssize_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 266 | i; |
| 267 | |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 268 | size_t |
| 269 | one; |
| 270 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 271 | while (((lzw_info->code_info.bit+bits) > (8*lzw_info->code_info.count)) && |
| 272 | (lzw_info->code_info.eof == MagickFalse)) |
| 273 | { |
| 274 | ssize_t |
| 275 | count; |
| 276 | |
| 277 | lzw_info->code_info.buffer[0]=lzw_info->code_info.buffer[ |
| 278 | lzw_info->code_info.count-2]; |
| 279 | lzw_info->code_info.buffer[1]=lzw_info->code_info.buffer[ |
| 280 | lzw_info->code_info.count-1]; |
| 281 | lzw_info->code_info.bit-=8*(lzw_info->code_info.count-2); |
| 282 | lzw_info->code_info.count=2; |
| 283 | count=ReadBlobBlock(lzw_info->image,&lzw_info->code_info.buffer[ |
| 284 | lzw_info->code_info.count]); |
| 285 | if (count > 0) |
| 286 | lzw_info->code_info.count+=count; |
| 287 | else |
| 288 | lzw_info->code_info.eof=MagickTrue; |
| 289 | } |
| 290 | if ((lzw_info->code_info.bit+bits) > (8*lzw_info->code_info.count)) |
| 291 | return(-1); |
| 292 | code=0; |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 293 | one=1; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 294 | for (i=0; i < (ssize_t) bits; i++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 295 | { |
| 296 | code|=((lzw_info->code_info.buffer[lzw_info->code_info.bit/8] & |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 297 | (one << (lzw_info->code_info.bit % 8))) != 0) << i; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 298 | lzw_info->code_info.bit++; |
| 299 | } |
| 300 | return(code); |
| 301 | } |
| 302 | |
cristy | 15893a4 | 2010-11-20 18:57:15 +0000 | [diff] [blame] | 303 | static inline int PopLZWStack(LZWStack *stack_info) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 304 | { |
| 305 | if (stack_info->index <= stack_info->codes) |
| 306 | return(-1); |
| 307 | stack_info->index--; |
cristy | 15893a4 | 2010-11-20 18:57:15 +0000 | [diff] [blame] | 308 | return((int) *stack_info->index); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 309 | } |
| 310 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 311 | static inline void PushLZWStack(LZWStack *stack_info,const size_t value) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 312 | { |
| 313 | if (stack_info->index >= stack_info->top) |
| 314 | return; |
| 315 | *stack_info->index=value; |
| 316 | stack_info->index++; |
| 317 | } |
| 318 | |
| 319 | static int ReadBlobLZWByte(LZWInfo *lzw_info) |
| 320 | { |
| 321 | int |
| 322 | code; |
| 323 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 324 | size_t |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 325 | one, |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 326 | value; |
| 327 | |
cristy | 891bc7f | 2013-08-01 00:25:02 +0000 | [diff] [blame] | 328 | ssize_t |
| 329 | count; |
| 330 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 331 | if (lzw_info->stack->index != lzw_info->stack->codes) |
| 332 | return(PopLZWStack(lzw_info->stack)); |
| 333 | if (lzw_info->genesis != MagickFalse) |
| 334 | { |
| 335 | lzw_info->genesis=MagickFalse; |
| 336 | do |
| 337 | { |
cristy | 891bc7f | 2013-08-01 00:25:02 +0000 | [diff] [blame] | 338 | lzw_info->first_code=(size_t) GetNextLZWCode(lzw_info,lzw_info->bits); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 339 | lzw_info->last_code=lzw_info->first_code; |
| 340 | } while (lzw_info->first_code == lzw_info->clear_code); |
| 341 | return((int) lzw_info->first_code); |
| 342 | } |
| 343 | code=GetNextLZWCode(lzw_info,lzw_info->bits); |
| 344 | if (code < 0) |
| 345 | return(code); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 346 | if ((size_t) code == lzw_info->clear_code) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 347 | { |
| 348 | ResetLZWInfo(lzw_info); |
| 349 | return(ReadBlobLZWByte(lzw_info)); |
| 350 | } |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 351 | if ((size_t) code == lzw_info->end_code) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 352 | return(-1); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 353 | if ((size_t) code < lzw_info->slot) |
| 354 | value=(size_t) code; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 355 | else |
| 356 | { |
| 357 | PushLZWStack(lzw_info->stack,lzw_info->first_code); |
| 358 | value=lzw_info->last_code; |
| 359 | } |
| 360 | count=0; |
| 361 | while (value > lzw_info->maximum_data_value) |
| 362 | { |
| 363 | if ((size_t) count > MaximumLZWCode) |
| 364 | return(-1); |
| 365 | count++; |
| 366 | if ((size_t) value > MaximumLZWCode) |
| 367 | return(-1); |
| 368 | PushLZWStack(lzw_info->stack,lzw_info->table[1][value]); |
| 369 | value=lzw_info->table[0][value]; |
| 370 | } |
| 371 | lzw_info->first_code=lzw_info->table[1][value]; |
| 372 | PushLZWStack(lzw_info->stack,lzw_info->first_code); |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 373 | one=1; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 374 | if (lzw_info->slot < MaximumLZWCode) |
| 375 | { |
| 376 | lzw_info->table[0][lzw_info->slot]=lzw_info->last_code; |
| 377 | lzw_info->table[1][lzw_info->slot]=lzw_info->first_code; |
| 378 | lzw_info->slot++; |
| 379 | if ((lzw_info->slot >= lzw_info->maximum_code) && |
| 380 | (lzw_info->bits < MaximumLZWBits)) |
| 381 | { |
| 382 | lzw_info->bits++; |
cristy | eaedf06 | 2010-05-29 22:36:02 +0000 | [diff] [blame] | 383 | lzw_info->maximum_code=one << lzw_info->bits; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 384 | } |
| 385 | } |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 386 | lzw_info->last_code=(size_t) code; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 387 | return(PopLZWStack(lzw_info->stack)); |
| 388 | } |
| 389 | |
cristy | 018f07f | 2011-09-04 21:15:19 +0000 | [diff] [blame] | 390 | static MagickBooleanType DecodeImage(Image *image,const ssize_t opacity, |
| 391 | ExceptionInfo *exception) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 392 | { |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 393 | int |
| 394 | c; |
| 395 | |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 396 | LZWInfo |
| 397 | *lzw_info; |
| 398 | |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 399 | size_t |
| 400 | pass; |
| 401 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 402 | ssize_t |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 403 | index, |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 404 | offset, |
| 405 | y; |
| 406 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 407 | unsigned char |
| 408 | data_size; |
| 409 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 410 | /* |
| 411 | Allocate decoder tables. |
| 412 | */ |
| 413 | assert(image != (Image *) NULL); |
cristy | e1c94d9 | 2015-06-28 12:16:33 +0000 | [diff] [blame] | 414 | assert(image->signature == MagickCoreSignature); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 415 | if (image->debug != MagickFalse) |
| 416 | (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename); |
| 417 | data_size=(unsigned char) ReadBlobByte(image); |
| 418 | if (data_size > MaximumLZWBits) |
| 419 | ThrowBinaryException(CorruptImageError,"CorruptImage",image->filename); |
| 420 | lzw_info=AcquireLZWInfo(image,data_size); |
| 421 | if (lzw_info == (LZWInfo *) NULL) |
| 422 | ThrowBinaryException(ResourceLimitError,"MemoryAllocationFailed", |
| 423 | image->filename); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 424 | pass=0; |
| 425 | offset=0; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 426 | for (y=0; y < (ssize_t) image->rows; y++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 427 | { |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 428 | register ssize_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 429 | x; |
| 430 | |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 431 | register Quantum |
dirk | 05d2ff7 | 2015-11-18 23:13:43 +0100 | [diff] [blame] | 432 | *magick_restrict q; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 433 | |
cristy | 3175235 | 2013-01-26 01:10:47 +0000 | [diff] [blame] | 434 | q=QueueAuthenticPixels(image,0,offset,image->columns,1,exception); |
cristy | acd2ed2 | 2011-08-30 01:44:23 +0000 | [diff] [blame] | 435 | if (q == (Quantum *) NULL) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 436 | break; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 437 | for (x=0; x < (ssize_t) image->columns; ) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 438 | { |
| 439 | c=ReadBlobLZWByte(lzw_info); |
| 440 | if (c < 0) |
| 441 | break; |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 442 | index=ConstrainColormapIndex(image,(ssize_t) c,exception); |
| 443 | SetPixelIndex(image,(Quantum) index,q); |
| 444 | SetPixelViaPixelInfo(image,image->colormap+index,q); |
| 445 | SetPixelAlpha(image,index == opacity ? TransparentAlpha : OpaqueAlpha,q); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 446 | x++; |
cristy | ed23157 | 2011-07-14 02:18:59 +0000 | [diff] [blame] | 447 | q+=GetPixelChannels(image); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 448 | } |
cristy | 891bc7f | 2013-08-01 00:25:02 +0000 | [diff] [blame] | 449 | if (SyncAuthenticPixels(image,exception) == MagickFalse) |
| 450 | break; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 451 | if (x < (ssize_t) image->columns) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 452 | break; |
| 453 | if (image->interlace == NoInterlace) |
| 454 | offset++; |
| 455 | else |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 456 | { |
cristy | 89ff236 | 2013-09-16 22:31:00 +0000 | [diff] [blame] | 457 | switch (pass) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 458 | { |
cristy | 89ff236 | 2013-09-16 22:31:00 +0000 | [diff] [blame] | 459 | case 0: |
| 460 | default: |
| 461 | { |
| 462 | offset+=8; |
| 463 | break; |
| 464 | } |
| 465 | case 1: |
| 466 | { |
| 467 | offset+=8; |
| 468 | break; |
| 469 | } |
| 470 | case 2: |
| 471 | { |
| 472 | offset+=4; |
| 473 | break; |
| 474 | } |
| 475 | case 3: |
| 476 | { |
| 477 | offset+=2; |
| 478 | break; |
| 479 | } |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 480 | } |
cristy | 89ff236 | 2013-09-16 22:31:00 +0000 | [diff] [blame] | 481 | if ((pass == 0) && (offset >= (ssize_t) image->rows)) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 482 | { |
cristy | 89ff236 | 2013-09-16 22:31:00 +0000 | [diff] [blame] | 483 | pass++; |
| 484 | offset=4; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 485 | } |
cristy | 89ff236 | 2013-09-16 22:31:00 +0000 | [diff] [blame] | 486 | if ((pass == 1) && (offset >= (ssize_t) image->rows)) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 487 | { |
cristy | 89ff236 | 2013-09-16 22:31:00 +0000 | [diff] [blame] | 488 | pass++; |
| 489 | offset=2; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 490 | } |
cristy | 89ff236 | 2013-09-16 22:31:00 +0000 | [diff] [blame] | 491 | if ((pass == 2) && (offset >= (ssize_t) image->rows)) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 492 | { |
cristy | 89ff236 | 2013-09-16 22:31:00 +0000 | [diff] [blame] | 493 | pass++; |
| 494 | offset=1; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 495 | } |
cristy | 89ff236 | 2013-09-16 22:31:00 +0000 | [diff] [blame] | 496 | } |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 497 | } |
| 498 | lzw_info=RelinquishLZWInfo(lzw_info); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 499 | if (y < (ssize_t) image->rows) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 500 | ThrowBinaryException(CorruptImageError,"CorruptImage",image->filename); |
| 501 | return(MagickTrue); |
| 502 | } |
| 503 | |
| 504 | /* |
| 505 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 506 | % % |
| 507 | % % |
| 508 | % % |
| 509 | % E n c o d e I m a g e % |
| 510 | % % |
| 511 | % % |
| 512 | % % |
| 513 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 514 | % |
| 515 | % EncodeImage compresses an image via GIF-coding. |
| 516 | % |
| 517 | % The format of the EncodeImage method is: |
| 518 | % |
| 519 | % MagickBooleanType EncodeImage(const ImageInfo *image_info,Image *image, |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 520 | % const size_t data_size) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 521 | % |
| 522 | % A description of each parameter follows: |
| 523 | % |
| 524 | % o image_info: the image info. |
| 525 | % |
| 526 | % o image: the address of a structure of type Image. |
| 527 | % |
| 528 | % o data_size: The number of bits in the compressed packet. |
| 529 | % |
| 530 | */ |
| 531 | static MagickBooleanType EncodeImage(const ImageInfo *image_info,Image *image, |
cristy | c82a27b | 2011-10-21 01:07:16 +0000 | [diff] [blame] | 532 | const size_t data_size,ExceptionInfo *exception) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 533 | { |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 534 | #define MaxCode(number_bits) ((one << (number_bits))-1) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 535 | #define MaxHashTable 5003 |
| 536 | #define MaxGIFBits 12UL |
| 537 | #define MaxGIFTable (1UL << MaxGIFBits) |
| 538 | #define GIFOutputCode(code) \ |
| 539 | { \ |
| 540 | /* \ |
| 541 | Emit a code. \ |
| 542 | */ \ |
| 543 | if (bits > 0) \ |
| 544 | datum|=(code) << bits; \ |
| 545 | else \ |
| 546 | datum=code; \ |
| 547 | bits+=number_bits; \ |
| 548 | while (bits >= 8) \ |
| 549 | { \ |
| 550 | /* \ |
| 551 | Add a character to current packet. \ |
| 552 | */ \ |
| 553 | packet[length++]=(unsigned char) (datum & 0xff); \ |
| 554 | if (length >= 254) \ |
| 555 | { \ |
| 556 | (void) WriteBlobByte(image,(unsigned char) length); \ |
| 557 | (void) WriteBlob(image,length,packet); \ |
| 558 | length=0; \ |
| 559 | } \ |
| 560 | datum>>=8; \ |
| 561 | bits-=8; \ |
| 562 | } \ |
| 563 | if (free_code > max_code) \ |
| 564 | { \ |
| 565 | number_bits++; \ |
| 566 | if (number_bits == MaxGIFBits) \ |
| 567 | max_code=MaxGIFTable; \ |
| 568 | else \ |
| 569 | max_code=MaxCode(number_bits); \ |
| 570 | } \ |
| 571 | } |
| 572 | |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 573 | Quantum |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 574 | index; |
| 575 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 576 | short |
| 577 | *hash_code, |
| 578 | *hash_prefix, |
| 579 | waiting_code; |
| 580 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 581 | size_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 582 | bits, |
| 583 | clear_code, |
| 584 | datum, |
| 585 | end_of_information_code, |
| 586 | free_code, |
cristy | ebc891a | 2011-04-24 23:04:16 +0000 | [diff] [blame] | 587 | length, |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 588 | max_code, |
| 589 | next_pixel, |
| 590 | number_bits, |
cristy | ebc891a | 2011-04-24 23:04:16 +0000 | [diff] [blame] | 591 | one, |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 592 | pass; |
| 593 | |
cristy | ebc891a | 2011-04-24 23:04:16 +0000 | [diff] [blame] | 594 | ssize_t |
| 595 | displacement, |
| 596 | offset, |
| 597 | k, |
| 598 | y; |
| 599 | |
| 600 | unsigned char |
| 601 | *packet, |
| 602 | *hash_suffix; |
| 603 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 604 | /* |
| 605 | Allocate encoder tables. |
| 606 | */ |
| 607 | assert(image != (Image *) NULL); |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 608 | one=1; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 609 | packet=(unsigned char *) AcquireQuantumMemory(256,sizeof(*packet)); |
| 610 | hash_code=(short *) AcquireQuantumMemory(MaxHashTable,sizeof(*hash_code)); |
| 611 | hash_prefix=(short *) AcquireQuantumMemory(MaxHashTable,sizeof(*hash_prefix)); |
| 612 | hash_suffix=(unsigned char *) AcquireQuantumMemory(MaxHashTable, |
| 613 | sizeof(*hash_suffix)); |
| 614 | if ((packet == (unsigned char *) NULL) || (hash_code == (short *) NULL) || |
| 615 | (hash_prefix == (short *) NULL) || |
| 616 | (hash_suffix == (unsigned char *) NULL)) |
| 617 | { |
| 618 | if (packet != (unsigned char *) NULL) |
| 619 | packet=(unsigned char *) RelinquishMagickMemory(packet); |
| 620 | if (hash_code != (short *) NULL) |
| 621 | hash_code=(short *) RelinquishMagickMemory(hash_code); |
| 622 | if (hash_prefix != (short *) NULL) |
| 623 | hash_prefix=(short *) RelinquishMagickMemory(hash_prefix); |
| 624 | if (hash_suffix != (unsigned char *) NULL) |
| 625 | hash_suffix=(unsigned char *) RelinquishMagickMemory(hash_suffix); |
| 626 | return(MagickFalse); |
| 627 | } |
| 628 | /* |
| 629 | Initialize GIF encoder. |
| 630 | */ |
cristy | 9e20c8f | 2015-02-02 01:12:54 +0000 | [diff] [blame] | 631 | (void) ResetMagickMemory(hash_code,0,MaxHashTable*sizeof(*hash_code)); |
| 632 | (void) ResetMagickMemory(hash_prefix,0,MaxHashTable*sizeof(*hash_prefix)); |
| 633 | (void) ResetMagickMemory(hash_suffix,0,MaxHashTable*sizeof(*hash_suffix)); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 634 | number_bits=data_size; |
| 635 | max_code=MaxCode(number_bits); |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 636 | clear_code=((short) one << (data_size-1)); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 637 | end_of_information_code=clear_code+1; |
| 638 | free_code=clear_code+2; |
| 639 | length=0; |
| 640 | datum=0; |
| 641 | bits=0; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 642 | GIFOutputCode(clear_code); |
| 643 | /* |
| 644 | Encode pixels. |
| 645 | */ |
| 646 | offset=0; |
| 647 | pass=0; |
| 648 | waiting_code=0; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 649 | for (y=0; y < (ssize_t) image->rows; y++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 650 | { |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 651 | register const Quantum |
dirk | 05d2ff7 | 2015-11-18 23:13:43 +0100 | [diff] [blame] | 652 | *magick_restrict p; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 653 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 654 | register ssize_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 655 | x; |
| 656 | |
cristy | c82a27b | 2011-10-21 01:07:16 +0000 | [diff] [blame] | 657 | p=GetVirtualPixels(image,0,offset,image->columns,1,exception); |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 658 | if (p == (const Quantum *) NULL) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 659 | break; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 660 | if (y == 0) |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 661 | { |
| 662 | waiting_code=(short) GetPixelIndex(image,p); |
cristy | ed23157 | 2011-07-14 02:18:59 +0000 | [diff] [blame] | 663 | p+=GetPixelChannels(image); |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 664 | } |
cristy | 15893a4 | 2010-11-20 18:57:15 +0000 | [diff] [blame] | 665 | for (x=(ssize_t) (y == 0 ? 1 : 0); x < (ssize_t) image->columns; x++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 666 | { |
| 667 | /* |
| 668 | Probe hash table. |
| 669 | */ |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 670 | index=(Quantum) ((size_t) GetPixelIndex(image,p) & 0xff); |
cristy | ed23157 | 2011-07-14 02:18:59 +0000 | [diff] [blame] | 671 | p+=GetPixelChannels(image); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 672 | k=(ssize_t) (((size_t) index << (MaxGIFBits-8))+waiting_code); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 673 | if (k >= MaxHashTable) |
| 674 | k-=MaxHashTable; |
| 675 | next_pixel=MagickFalse; |
| 676 | displacement=1; |
| 677 | if (hash_code[k] > 0) |
| 678 | { |
| 679 | if ((hash_prefix[k] == waiting_code) && |
| 680 | (hash_suffix[k] == (unsigned char) index)) |
| 681 | { |
| 682 | waiting_code=hash_code[k]; |
| 683 | continue; |
| 684 | } |
| 685 | if (k != 0) |
| 686 | displacement=MaxHashTable-k; |
| 687 | for ( ; ; ) |
| 688 | { |
| 689 | k-=displacement; |
| 690 | if (k < 0) |
| 691 | k+=MaxHashTable; |
| 692 | if (hash_code[k] == 0) |
| 693 | break; |
| 694 | if ((hash_prefix[k] == waiting_code) && |
| 695 | (hash_suffix[k] == (unsigned char) index)) |
| 696 | { |
| 697 | waiting_code=hash_code[k]; |
| 698 | next_pixel=MagickTrue; |
| 699 | break; |
| 700 | } |
| 701 | } |
cristy | cd8b331 | 2013-12-22 01:51:11 +0000 | [diff] [blame] | 702 | if (next_pixel != MagickFalse) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 703 | continue; |
| 704 | } |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 705 | GIFOutputCode((size_t) waiting_code); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 706 | if (free_code < MaxGIFTable) |
| 707 | { |
| 708 | hash_code[k]=(short) free_code++; |
| 709 | hash_prefix[k]=waiting_code; |
| 710 | hash_suffix[k]=(unsigned char) index; |
| 711 | } |
| 712 | else |
| 713 | { |
| 714 | /* |
| 715 | Fill the hash table with empty entries. |
| 716 | */ |
| 717 | for (k=0; k < MaxHashTable; k++) |
| 718 | hash_code[k]=0; |
| 719 | /* |
| 720 | Reset compressor and issue a clear code. |
| 721 | */ |
| 722 | free_code=clear_code+2; |
| 723 | GIFOutputCode(clear_code); |
| 724 | number_bits=data_size; |
| 725 | max_code=MaxCode(number_bits); |
| 726 | } |
| 727 | waiting_code=(short) index; |
| 728 | } |
| 729 | if (image_info->interlace == NoInterlace) |
| 730 | offset++; |
| 731 | else |
| 732 | switch (pass) |
| 733 | { |
| 734 | case 0: |
| 735 | default: |
| 736 | { |
| 737 | offset+=8; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 738 | if (offset >= (ssize_t) image->rows) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 739 | { |
| 740 | pass++; |
| 741 | offset=4; |
| 742 | } |
| 743 | break; |
| 744 | } |
| 745 | case 1: |
| 746 | { |
| 747 | offset+=8; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 748 | if (offset >= (ssize_t) image->rows) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 749 | { |
| 750 | pass++; |
| 751 | offset=2; |
| 752 | } |
| 753 | break; |
| 754 | } |
| 755 | case 2: |
| 756 | { |
| 757 | offset+=4; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 758 | if (offset >= (ssize_t) image->rows) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 759 | { |
| 760 | pass++; |
| 761 | offset=1; |
| 762 | } |
| 763 | break; |
| 764 | } |
| 765 | case 3: |
| 766 | { |
| 767 | offset+=2; |
| 768 | break; |
| 769 | } |
| 770 | } |
| 771 | } |
| 772 | /* |
| 773 | Flush out the buffered code. |
| 774 | */ |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 775 | GIFOutputCode((size_t) waiting_code); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 776 | GIFOutputCode(end_of_information_code); |
| 777 | if (bits > 0) |
| 778 | { |
| 779 | /* |
| 780 | Add a character to current packet. |
| 781 | */ |
| 782 | packet[length++]=(unsigned char) (datum & 0xff); |
| 783 | if (length >= 254) |
| 784 | { |
| 785 | (void) WriteBlobByte(image,(unsigned char) length); |
| 786 | (void) WriteBlob(image,length,packet); |
| 787 | length=0; |
| 788 | } |
| 789 | } |
| 790 | /* |
| 791 | Flush accumulated data. |
| 792 | */ |
| 793 | if (length > 0) |
| 794 | { |
| 795 | (void) WriteBlobByte(image,(unsigned char) length); |
| 796 | (void) WriteBlob(image,length,packet); |
| 797 | } |
| 798 | /* |
| 799 | Free encoder memory. |
| 800 | */ |
| 801 | hash_suffix=(unsigned char *) RelinquishMagickMemory(hash_suffix); |
| 802 | hash_prefix=(short *) RelinquishMagickMemory(hash_prefix); |
| 803 | hash_code=(short *) RelinquishMagickMemory(hash_code); |
| 804 | packet=(unsigned char *) RelinquishMagickMemory(packet); |
| 805 | return(MagickTrue); |
| 806 | } |
| 807 | |
| 808 | /* |
| 809 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 810 | % % |
| 811 | % % |
| 812 | % % |
| 813 | % I s G I F % |
| 814 | % % |
| 815 | % % |
| 816 | % % |
| 817 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 818 | % |
| 819 | % IsGIF() returns MagickTrue if the image format type, identified by the |
| 820 | % magick string, is GIF. |
| 821 | % |
| 822 | % The format of the IsGIF method is: |
| 823 | % |
| 824 | % MagickBooleanType IsGIF(const unsigned char *magick,const size_t length) |
| 825 | % |
| 826 | % A description of each parameter follows: |
| 827 | % |
| 828 | % o magick: compare image format pattern against these bytes. |
| 829 | % |
| 830 | % o length: Specifies the length of the magick string. |
| 831 | % |
| 832 | */ |
| 833 | static MagickBooleanType IsGIF(const unsigned char *magick,const size_t length) |
| 834 | { |
| 835 | if (length < 4) |
| 836 | return(MagickFalse); |
| 837 | if (LocaleNCompare((char *) magick,"GIF8",4) == 0) |
| 838 | return(MagickTrue); |
| 839 | return(MagickFalse); |
| 840 | } |
| 841 | |
| 842 | /* |
| 843 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 844 | % % |
| 845 | % % |
| 846 | % % |
| 847 | + R e a d B l o b B l o c k % |
| 848 | % % |
| 849 | % % |
| 850 | % % |
| 851 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 852 | % |
| 853 | % ReadBlobBlock() reads data from the image file and returns it. The |
| 854 | % amount of data is determined by first reading a count byte. The number |
| 855 | % of bytes read is returned. |
| 856 | % |
| 857 | % The format of the ReadBlobBlock method is: |
| 858 | % |
| 859 | % size_t ReadBlobBlock(Image *image,unsigned char *data) |
| 860 | % |
| 861 | % A description of each parameter follows: |
| 862 | % |
| 863 | % o image: the image. |
| 864 | % |
| 865 | % o data: Specifies an area to place the information requested from |
| 866 | % the file. |
| 867 | % |
| 868 | */ |
| 869 | static ssize_t ReadBlobBlock(Image *image,unsigned char *data) |
| 870 | { |
| 871 | ssize_t |
| 872 | count; |
| 873 | |
| 874 | unsigned char |
| 875 | block_count; |
| 876 | |
| 877 | assert(image != (Image *) NULL); |
cristy | e1c94d9 | 2015-06-28 12:16:33 +0000 | [diff] [blame] | 878 | assert(image->signature == MagickCoreSignature); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 879 | assert(data != (unsigned char *) NULL); |
| 880 | count=ReadBlob(image,1,&block_count); |
| 881 | if (count != 1) |
| 882 | return(0); |
cristy | 2c219b1 | 2012-07-12 11:13:04 +0000 | [diff] [blame] | 883 | count=ReadBlob(image,(size_t) block_count,data); |
| 884 | if (count != (ssize_t) block_count) |
| 885 | return(0); |
| 886 | return(count); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 887 | } |
| 888 | |
| 889 | /* |
| 890 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 891 | % % |
| 892 | % % |
| 893 | % % |
| 894 | % R e a d G I F I m a g e % |
| 895 | % % |
| 896 | % % |
| 897 | % % |
| 898 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 899 | % |
| 900 | % ReadGIFImage() reads a Compuserve Graphics image file and returns it. |
| 901 | % It allocates the memory necessary for the new Image structure and returns a |
| 902 | % pointer to the new image. |
| 903 | % |
| 904 | % The format of the ReadGIFImage method is: |
| 905 | % |
| 906 | % Image *ReadGIFImage(const ImageInfo *image_info,ExceptionInfo *exception) |
| 907 | % |
| 908 | % A description of each parameter follows: |
| 909 | % |
| 910 | % o image_info: the image info. |
| 911 | % |
| 912 | % o exception: return any errors or warnings in this structure. |
| 913 | % |
| 914 | */ |
cristy | 018f07f | 2011-09-04 21:15:19 +0000 | [diff] [blame] | 915 | static MagickBooleanType PingGIFImage(Image *image,ExceptionInfo *exception) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 916 | { |
| 917 | unsigned char |
| 918 | buffer[256], |
| 919 | length, |
| 920 | data_size; |
| 921 | |
| 922 | assert(image != (Image *) NULL); |
cristy | e1c94d9 | 2015-06-28 12:16:33 +0000 | [diff] [blame] | 923 | assert(image->signature == MagickCoreSignature); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 924 | if (image->debug != MagickFalse) |
| 925 | (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename); |
| 926 | if (ReadBlob(image,1,&data_size) != 1) |
| 927 | ThrowBinaryException(CorruptImageError,"CorruptImage",image->filename); |
| 928 | if (data_size > MaximumLZWBits) |
| 929 | ThrowBinaryException(CorruptImageError,"CorruptImage",image->filename); |
| 930 | if (ReadBlob(image,1,&length) != 1) |
| 931 | ThrowBinaryException(CorruptImageError,"CorruptImage",image->filename); |
| 932 | while (length != 0) |
| 933 | { |
| 934 | if (ReadBlob(image,length,buffer) != (ssize_t) length) |
| 935 | ThrowBinaryException(CorruptImageError,"CorruptImage",image->filename); |
| 936 | if (ReadBlob(image,1,&length) != 1) |
| 937 | ThrowBinaryException(CorruptImageError,"CorruptImage",image->filename); |
| 938 | } |
| 939 | return(MagickTrue); |
| 940 | } |
| 941 | |
| 942 | static Image *ReadGIFImage(const ImageInfo *image_info,ExceptionInfo *exception) |
| 943 | { |
| 944 | #define BitSet(byte,bit) (((byte) & (bit)) == (bit)) |
| 945 | #define LSBFirstOrder(x,y) (((y) << 8) | (x)) |
| 946 | |
| 947 | Image |
cristy | 3119762 | 2013-03-06 02:07:54 +0000 | [diff] [blame] | 948 | *image, |
| 949 | *meta_image; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 950 | |
| 951 | int |
| 952 | number_extensionss=0; |
| 953 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 954 | MagickBooleanType |
| 955 | status; |
| 956 | |
| 957 | RectangleInfo |
| 958 | page; |
| 959 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 960 | register ssize_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 961 | i; |
| 962 | |
| 963 | register unsigned char |
| 964 | *p; |
| 965 | |
cristy | ebc891a | 2011-04-24 23:04:16 +0000 | [diff] [blame] | 966 | size_t |
| 967 | delay, |
| 968 | dispose, |
glennrp | b844bd5 | 2014-01-25 16:59:43 +0000 | [diff] [blame] | 969 | duration, |
cristy | ebc891a | 2011-04-24 23:04:16 +0000 | [diff] [blame] | 970 | global_colors, |
| 971 | image_count, |
| 972 | iterations, |
| 973 | one; |
| 974 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 975 | ssize_t |
cristy | ebc891a | 2011-04-24 23:04:16 +0000 | [diff] [blame] | 976 | count, |
| 977 | opacity; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 978 | |
| 979 | unsigned char |
| 980 | background, |
| 981 | c, |
| 982 | flag, |
| 983 | *global_colormap, |
dirk | 9f3d8e3 | 2015-11-22 10:22:34 +0100 | [diff] [blame] | 984 | buffer[257]; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 985 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 986 | /* |
| 987 | Open image file. |
| 988 | */ |
| 989 | assert(image_info != (const ImageInfo *) NULL); |
cristy | e1c94d9 | 2015-06-28 12:16:33 +0000 | [diff] [blame] | 990 | assert(image_info->signature == MagickCoreSignature); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 991 | if (image_info->debug != MagickFalse) |
| 992 | (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s", |
| 993 | image_info->filename); |
| 994 | assert(exception != (ExceptionInfo *) NULL); |
cristy | e1c94d9 | 2015-06-28 12:16:33 +0000 | [diff] [blame] | 995 | assert(exception->signature == MagickCoreSignature); |
cristy | 9950d57 | 2011-10-01 18:22:35 +0000 | [diff] [blame] | 996 | image=AcquireImage(image_info,exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 997 | status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception); |
| 998 | if (status == MagickFalse) |
| 999 | { |
| 1000 | image=DestroyImageList(image); |
| 1001 | return((Image *) NULL); |
| 1002 | } |
| 1003 | /* |
| 1004 | Determine if this a GIF file. |
| 1005 | */ |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1006 | count=ReadBlob(image,6,buffer); |
| 1007 | if ((count != 6) || ((LocaleNCompare((char *) buffer,"GIF87",5) != 0) && |
| 1008 | (LocaleNCompare((char *) buffer,"GIF89",5) != 0))) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1009 | ThrowReaderException(CorruptImageError,"ImproperImageHeader"); |
| 1010 | page.width=ReadBlobLSBShort(image); |
| 1011 | page.height=ReadBlobLSBShort(image); |
| 1012 | flag=(unsigned char) ReadBlobByte(image); |
| 1013 | background=(unsigned char) ReadBlobByte(image); |
| 1014 | c=(unsigned char) ReadBlobByte(image); /* reserved */ |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 1015 | one=1; |
| 1016 | global_colors=one << (((size_t) flag & 0x07)+1); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1017 | global_colormap=(unsigned char *) AcquireQuantumMemory((size_t) |
| 1018 | MagickMax(global_colors,256),3UL*sizeof(*global_colormap)); |
| 1019 | if (global_colormap == (unsigned char *) NULL) |
| 1020 | ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed"); |
| 1021 | if (BitSet((int) flag,0x80) != 0) |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 1022 | { |
| 1023 | count=ReadBlob(image,(size_t) (3*global_colors),global_colormap); |
| 1024 | if (count != (ssize_t) (3*global_colors)) |
| 1025 | { |
| 1026 | global_colormap=(unsigned char *) RelinquishMagickMemory( |
| 1027 | global_colormap); |
| 1028 | ThrowReaderException(CorruptImageError,"InsufficientImageDataInFile"); |
| 1029 | } |
| 1030 | } |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1031 | delay=0; |
| 1032 | dispose=0; |
glennrp | b844bd5 | 2014-01-25 16:59:43 +0000 | [diff] [blame] | 1033 | duration=0; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1034 | iterations=1; |
| 1035 | opacity=(-1); |
| 1036 | image_count=0; |
cristy | 3119762 | 2013-03-06 02:07:54 +0000 | [diff] [blame] | 1037 | meta_image=AcquireImage(image_info,exception); /* metadata container */ |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1038 | for ( ; ; ) |
| 1039 | { |
| 1040 | count=ReadBlob(image,1,&c); |
| 1041 | if (count != 1) |
| 1042 | break; |
| 1043 | if (c == (unsigned char) ';') |
| 1044 | break; /* terminator */ |
| 1045 | if (c == (unsigned char) '!') |
| 1046 | { |
| 1047 | /* |
| 1048 | GIF Extension block. |
| 1049 | */ |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1050 | count=ReadBlob(image,1,&c); |
| 1051 | if (count != 1) |
| 1052 | { |
| 1053 | global_colormap=(unsigned char *) RelinquishMagickMemory( |
| 1054 | global_colormap); |
| 1055 | ThrowReaderException(CorruptImageError, |
| 1056 | "UnableToReadExtensionBlock"); |
| 1057 | } |
| 1058 | switch (c) |
| 1059 | { |
| 1060 | case 0xf9: |
| 1061 | { |
| 1062 | /* |
| 1063 | Read graphics control extension. |
| 1064 | */ |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1065 | while (ReadBlobBlock(image,buffer) != 0) ; |
| 1066 | dispose=(size_t) (buffer[0] >> 2); |
| 1067 | delay=(size_t) ((buffer[2] << 8) | buffer[1]); |
| 1068 | if ((ssize_t) (buffer[0] & 0x01) == 0x01) |
| 1069 | opacity=(ssize_t) buffer[3]; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1070 | break; |
| 1071 | } |
| 1072 | case 0xfe: |
| 1073 | { |
| 1074 | char |
| 1075 | *comments; |
| 1076 | |
cristy | ea43ca3 | 2012-05-20 23:47:26 +0000 | [diff] [blame] | 1077 | size_t |
| 1078 | length; |
| 1079 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1080 | /* |
| 1081 | Read comment extension. |
| 1082 | */ |
| 1083 | comments=AcquireString((char *) NULL); |
cristy | ea43ca3 | 2012-05-20 23:47:26 +0000 | [diff] [blame] | 1084 | for (length=0; ; length+=count) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1085 | { |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1086 | count=(ssize_t) ReadBlobBlock(image,buffer); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1087 | if (count == 0) |
| 1088 | break; |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1089 | buffer[count]='\0'; |
| 1090 | (void) ConcatenateString(&comments,(const char *) buffer); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1091 | } |
cristy | 3119762 | 2013-03-06 02:07:54 +0000 | [diff] [blame] | 1092 | (void) SetImageProperty(meta_image,"comment",comments,exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1093 | comments=DestroyString(comments); |
| 1094 | break; |
| 1095 | } |
| 1096 | case 0xff: |
| 1097 | { |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1098 | MagickBooleanType |
| 1099 | loop; |
| 1100 | |
| 1101 | /* |
| 1102 | Read Netscape Loop extension. |
| 1103 | */ |
| 1104 | loop=MagickFalse; |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1105 | if (ReadBlobBlock(image,buffer) != 0) |
| 1106 | loop=LocaleNCompare((char *) buffer,"NETSCAPE2.0",11) == 0 ? |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1107 | MagickTrue : MagickFalse; |
| 1108 | if (loop != MagickFalse) |
| 1109 | { |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1110 | while (ReadBlobBlock(image,buffer) != 0) |
| 1111 | iterations=(size_t) ((buffer[2] << 8) | buffer[1]); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1112 | break; |
| 1113 | } |
| 1114 | else |
| 1115 | { |
| 1116 | char |
cristy | 151b66d | 2015-04-15 10:50:31 +0000 | [diff] [blame] | 1117 | name[MagickPathExtent]; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1118 | |
| 1119 | int |
| 1120 | block_length, |
| 1121 | info_length, |
| 1122 | reserved_length; |
| 1123 | |
| 1124 | MagickBooleanType |
| 1125 | i8bim, |
| 1126 | icc, |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1127 | iptc, |
| 1128 | magick; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1129 | |
| 1130 | StringInfo |
| 1131 | *profile; |
| 1132 | |
| 1133 | unsigned char |
| 1134 | *info; |
| 1135 | |
| 1136 | /* |
| 1137 | Store GIF application extension as a generic profile. |
| 1138 | */ |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1139 | icc=LocaleNCompare((char *) buffer,"ICCRGBG1012",11) == 0 ? |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1140 | MagickTrue : MagickFalse; |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1141 | magick=LocaleNCompare((char *) buffer,"ImageMagick",11) == 0 ? |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1142 | MagickTrue : MagickFalse; |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1143 | i8bim=LocaleNCompare((char *) buffer,"MGK8BIM0000",11) == 0 ? |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1144 | MagickTrue : MagickFalse; |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1145 | iptc=LocaleNCompare((char *) buffer,"MGKIPTC0000",11) == 0 ? |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1146 | MagickTrue : MagickFalse; |
| 1147 | number_extensionss++; |
| 1148 | (void) LogMagickEvent(CoderEvent,GetMagickModule(), |
| 1149 | " Reading GIF application extension"); |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 1150 | info=(unsigned char *) AcquireQuantumMemory(255UL, |
| 1151 | sizeof(*info)); |
cristy | bf6abbe | 2011-09-01 13:20:47 +0000 | [diff] [blame] | 1152 | if (info == (unsigned char *) NULL) |
| 1153 | ThrowReaderException(ResourceLimitError, |
| 1154 | "MemoryAllocationFailed"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1155 | reserved_length=255; |
| 1156 | for (info_length=0; ; ) |
| 1157 | { |
| 1158 | block_length=(int) ReadBlobBlock(image,&info[info_length]); |
| 1159 | if (block_length == 0) |
| 1160 | break; |
| 1161 | info_length+=block_length; |
| 1162 | if (info_length > (reserved_length-255)) |
| 1163 | { |
cristy | 7a0b87b | 2014-06-09 12:27:33 +0000 | [diff] [blame] | 1164 | reserved_length+=4096; |
| 1165 | info=(unsigned char *) ResizeQuantumMemory(info,(size_t) |
| 1166 | reserved_length,sizeof(*info)); |
| 1167 | if (info == (unsigned char *) NULL) |
| 1168 | ThrowReaderException(ResourceLimitError, |
| 1169 | "MemoryAllocationFailed"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1170 | } |
| 1171 | } |
cristy | bf6abbe | 2011-09-01 13:20:47 +0000 | [diff] [blame] | 1172 | profile=BlobToStringInfo(info,(size_t) info_length); |
| 1173 | if (profile == (StringInfo *) NULL) |
| 1174 | ThrowReaderException(ResourceLimitError, |
| 1175 | "MemoryAllocationFailed"); |
cristy | cd8b331 | 2013-12-22 01:51:11 +0000 | [diff] [blame] | 1176 | if (i8bim != MagickFalse) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1177 | (void) CopyMagickString(name,"8bim",sizeof(name)); |
cristy | cd8b331 | 2013-12-22 01:51:11 +0000 | [diff] [blame] | 1178 | else if (icc != MagickFalse) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1179 | (void) CopyMagickString(name,"icc",sizeof(name)); |
cristy | cd8b331 | 2013-12-22 01:51:11 +0000 | [diff] [blame] | 1180 | else if (iptc != MagickFalse) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1181 | (void) CopyMagickString(name,"iptc",sizeof(name)); |
cristy | cd8b331 | 2013-12-22 01:51:11 +0000 | [diff] [blame] | 1182 | else if (magick != MagickFalse) |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1183 | { |
| 1184 | (void) CopyMagickString(name,"magick",sizeof(name)); |
cristy | e6693bb | 2015-02-11 01:24:42 +0000 | [diff] [blame] | 1185 | meta_image->gamma=StringToDouble((char *) info+6, |
| 1186 | (char **) NULL); |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1187 | } |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1188 | else |
cristy | b51dff5 | 2011-05-19 16:55:47 +0000 | [diff] [blame] | 1189 | (void) FormatLocaleString(name,sizeof(name),"gif:%.11s", |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1190 | buffer); |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1191 | info=(unsigned char *) RelinquishMagickMemory(info); |
| 1192 | if (magick == MagickFalse) |
cristy | 3119762 | 2013-03-06 02:07:54 +0000 | [diff] [blame] | 1193 | (void) SetImageProfile(meta_image,name,profile,exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1194 | profile=DestroyStringInfo(profile); |
| 1195 | (void) LogMagickEvent(CoderEvent,GetMagickModule(), |
| 1196 | " profile name=%s",name); |
| 1197 | } |
| 1198 | break; |
| 1199 | } |
| 1200 | default: |
| 1201 | { |
dirk | b4979cb | 2015-11-22 10:01:27 +0100 | [diff] [blame] | 1202 | while (ReadBlobBlock(image,buffer) != 0) ; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1203 | break; |
| 1204 | } |
| 1205 | } |
| 1206 | } |
| 1207 | if (c != (unsigned char) ',') |
| 1208 | continue; |
| 1209 | if (image_count != 0) |
| 1210 | { |
| 1211 | /* |
| 1212 | Allocate next image structure. |
| 1213 | */ |
cristy | 9950d57 | 2011-10-01 18:22:35 +0000 | [diff] [blame] | 1214 | AcquireNextImage(image_info,image,exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1215 | if (GetNextImageInList(image) == (Image *) NULL) |
| 1216 | { |
| 1217 | image=DestroyImageList(image); |
| 1218 | global_colormap=(unsigned char *) RelinquishMagickMemory( |
| 1219 | global_colormap); |
| 1220 | return((Image *) NULL); |
| 1221 | } |
| 1222 | image=SyncNextImageInList(image); |
| 1223 | } |
| 1224 | image_count++; |
| 1225 | /* |
| 1226 | Read image attributes. |
| 1227 | */ |
cristy | 1169512 | 2014-06-09 12:29:50 +0000 | [diff] [blame] | 1228 | meta_image->scene=image->scene; |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 1229 | (void) CloneImageProperties(image,meta_image); |
cristy | da060cb | 2013-03-30 01:32:15 +0000 | [diff] [blame] | 1230 | DestroyImageProperties(meta_image); |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 1231 | (void) CloneImageProfiles(image,meta_image); |
cristy | da060cb | 2013-03-30 01:32:15 +0000 | [diff] [blame] | 1232 | DestroyImageProfiles(meta_image); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1233 | image->storage_class=PseudoClass; |
| 1234 | image->compression=LZWCompression; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1235 | page.x=(ssize_t) ReadBlobLSBShort(image); |
| 1236 | page.y=(ssize_t) ReadBlobLSBShort(image); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1237 | image->columns=ReadBlobLSBShort(image); |
| 1238 | image->rows=ReadBlobLSBShort(image); |
| 1239 | image->depth=8; |
| 1240 | flag=(unsigned char) ReadBlobByte(image); |
cristy | da060cb | 2013-03-30 01:32:15 +0000 | [diff] [blame] | 1241 | image->interlace=BitSet((int) flag,0x40) != 0 ? GIFInterlace : NoInterlace; |
cristy | 96c4fcb | 2012-02-08 01:01:05 +0000 | [diff] [blame] | 1242 | image->colors=BitSet((int) flag,0x80) == 0 ? global_colors : one << |
| 1243 | ((size_t) (flag & 0x07)+1); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1244 | if (opacity >= (ssize_t) image->colors) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1245 | opacity=(-1); |
| 1246 | image->page.width=page.width; |
| 1247 | image->page.height=page.height; |
| 1248 | image->page.y=page.y; |
| 1249 | image->page.x=page.x; |
| 1250 | image->delay=delay; |
| 1251 | image->ticks_per_second=100; |
| 1252 | image->dispose=(DisposeType) dispose; |
| 1253 | image->iterations=iterations; |
cristy | b0a657e | 2012-08-29 00:45:37 +0000 | [diff] [blame] | 1254 | image->alpha_trait=opacity >= 0 ? BlendPixelTrait : UndefinedPixelTrait; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1255 | delay=0; |
| 1256 | dispose=0; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1257 | if ((image->columns == 0) || (image->rows == 0)) |
| 1258 | { |
| 1259 | global_colormap=(unsigned char *) RelinquishMagickMemory( |
| 1260 | global_colormap); |
| 1261 | ThrowReaderException(CorruptImageError,"NegativeOrZeroImageSize"); |
| 1262 | } |
| 1263 | /* |
| 1264 | Inititialize colormap. |
| 1265 | */ |
cristy | 018f07f | 2011-09-04 21:15:19 +0000 | [diff] [blame] | 1266 | if (AcquireImageColormap(image,image->colors,exception) == MagickFalse) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1267 | { |
cristy | 7a0b87b | 2014-06-09 12:27:33 +0000 | [diff] [blame] | 1268 | global_colormap=(unsigned char *) RelinquishMagickMemory(global_colormap); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1269 | ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed"); |
| 1270 | } |
| 1271 | if (BitSet((int) flag,0x80) == 0) |
| 1272 | { |
| 1273 | /* |
| 1274 | Use global colormap. |
| 1275 | */ |
| 1276 | p=global_colormap; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1277 | for (i=0; i < (ssize_t) image->colors; i++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1278 | { |
cristy | ea43ca3 | 2012-05-20 23:47:26 +0000 | [diff] [blame] | 1279 | image->colormap[i].red=(double) ScaleCharToQuantum(*p++); |
| 1280 | image->colormap[i].green=(double) ScaleCharToQuantum(*p++); |
| 1281 | image->colormap[i].blue=(double) ScaleCharToQuantum(*p++); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1282 | if (i == opacity) |
| 1283 | { |
cristy | ea43ca3 | 2012-05-20 23:47:26 +0000 | [diff] [blame] | 1284 | image->colormap[i].alpha=(double) TransparentAlpha; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1285 | image->transparent_color=image->colormap[opacity]; |
| 1286 | } |
| 1287 | } |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 1288 | image->background_color=image->colormap[MagickMin((ssize_t) background, |
| 1289 | (ssize_t) image->colors-1)]; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1290 | } |
| 1291 | else |
| 1292 | { |
| 1293 | unsigned char |
| 1294 | *colormap; |
| 1295 | |
| 1296 | /* |
| 1297 | Read local colormap. |
| 1298 | */ |
cristy | 96c4fcb | 2012-02-08 01:01:05 +0000 | [diff] [blame] | 1299 | colormap=(unsigned char *) AcquireQuantumMemory(image->colors,3* |
| 1300 | sizeof(*colormap)); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1301 | if (colormap == (unsigned char *) NULL) |
| 1302 | { |
| 1303 | global_colormap=(unsigned char *) RelinquishMagickMemory( |
| 1304 | global_colormap); |
| 1305 | ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed"); |
| 1306 | } |
| 1307 | count=ReadBlob(image,(3*image->colors)*sizeof(*colormap),colormap); |
| 1308 | if (count != (ssize_t) (3*image->colors)) |
| 1309 | { |
| 1310 | global_colormap=(unsigned char *) RelinquishMagickMemory( |
| 1311 | global_colormap); |
| 1312 | colormap=(unsigned char *) RelinquishMagickMemory(colormap); |
| 1313 | ThrowReaderException(CorruptImageError, |
| 1314 | "InsufficientImageDataInFile"); |
| 1315 | } |
| 1316 | p=colormap; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1317 | for (i=0; i < (ssize_t) image->colors; i++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1318 | { |
cristy | ea43ca3 | 2012-05-20 23:47:26 +0000 | [diff] [blame] | 1319 | image->colormap[i].red=(double) ScaleCharToQuantum(*p++); |
| 1320 | image->colormap[i].green=(double) ScaleCharToQuantum(*p++); |
| 1321 | image->colormap[i].blue=(double) ScaleCharToQuantum(*p++); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1322 | if (i == opacity) |
cristy | ea43ca3 | 2012-05-20 23:47:26 +0000 | [diff] [blame] | 1323 | image->colormap[i].alpha=(double) TransparentAlpha; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1324 | } |
| 1325 | colormap=(unsigned char *) RelinquishMagickMemory(colormap); |
| 1326 | } |
cristy | 2691a3e | 2012-06-26 17:48:42 +0000 | [diff] [blame] | 1327 | if (image->gamma == 1.0) |
| 1328 | { |
| 1329 | for (i=0; i < (ssize_t) image->colors; i++) |
cristy | 716daa8 | 2012-06-26 19:37:03 +0000 | [diff] [blame] | 1330 | if (IsPixelInfoGray(image->colormap+i) == MagickFalse) |
cristy | 2691a3e | 2012-06-26 17:48:42 +0000 | [diff] [blame] | 1331 | break; |
| 1332 | (void) SetImageColorspace(image,i == (ssize_t) image->colors ? |
| 1333 | GRAYColorspace : RGBColorspace,exception); |
| 1334 | } |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1335 | if ((image_info->ping != MagickFalse) && (image_info->number_scenes != 0)) |
| 1336 | if (image->scene >= (image_info->scene+image_info->number_scenes-1)) |
| 1337 | break; |
cristy | acabb84 | 2014-12-14 23:36:33 +0000 | [diff] [blame] | 1338 | status=SetImageExtent(image,image->columns,image->rows,exception); |
| 1339 | if (status == MagickFalse) |
| 1340 | return(DestroyImageList(image)); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1341 | /* |
| 1342 | Decode image. |
| 1343 | */ |
| 1344 | if (image_info->ping != MagickFalse) |
cristy | 018f07f | 2011-09-04 21:15:19 +0000 | [diff] [blame] | 1345 | status=PingGIFImage(image,exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1346 | else |
cristy | 018f07f | 2011-09-04 21:15:19 +0000 | [diff] [blame] | 1347 | status=DecodeImage(image,opacity,exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1348 | if ((image_info->ping == MagickFalse) && (status == MagickFalse)) |
| 1349 | { |
| 1350 | global_colormap=(unsigned char *) RelinquishMagickMemory( |
| 1351 | global_colormap); |
| 1352 | ThrowReaderException(CorruptImageError,"CorruptImage"); |
| 1353 | } |
cristy | 7a0b87b | 2014-06-09 12:27:33 +0000 | [diff] [blame] | 1354 | duration+=image->delay*image->iterations; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1355 | if (image_info->number_scenes != 0) |
| 1356 | if (image->scene >= (image_info->scene+image_info->number_scenes-1)) |
| 1357 | break; |
| 1358 | opacity=(-1); |
cristy | 7a0b87b | 2014-06-09 12:27:33 +0000 | [diff] [blame] | 1359 | status=SetImageProgress(image,LoadImageTag,(MagickOffsetType) image->scene-1, |
| 1360 | image->scene); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1361 | if (status == MagickFalse) |
| 1362 | break; |
| 1363 | } |
glennrp | b844bd5 | 2014-01-25 16:59:43 +0000 | [diff] [blame] | 1364 | image->duration=duration; |
cristy | 3119762 | 2013-03-06 02:07:54 +0000 | [diff] [blame] | 1365 | meta_image=DestroyImage(meta_image); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1366 | global_colormap=(unsigned char *) RelinquishMagickMemory(global_colormap); |
| 1367 | if ((image->columns == 0) || (image->rows == 0)) |
| 1368 | ThrowReaderException(CorruptImageError,"NegativeOrZeroImageSize"); |
| 1369 | (void) CloseBlob(image); |
| 1370 | return(GetFirstImageInList(image)); |
| 1371 | } |
| 1372 | |
| 1373 | /* |
| 1374 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 1375 | % % |
| 1376 | % % |
| 1377 | % % |
| 1378 | % R e g i s t e r G I F I m a g e % |
| 1379 | % % |
| 1380 | % % |
| 1381 | % % |
| 1382 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 1383 | % |
| 1384 | % RegisterGIFImage() adds properties for the GIF image format to |
| 1385 | % the list of supported formats. The properties include the image format |
| 1386 | % tag, a method to read and/or write the format, whether the format |
| 1387 | % supports the saving of more than one frame to the same file or blob, |
| 1388 | % whether the format supports native in-memory I/O, and a brief |
| 1389 | % description of the format. |
| 1390 | % |
| 1391 | % The format of the RegisterGIFImage method is: |
| 1392 | % |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1393 | % size_t RegisterGIFImage(void) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1394 | % |
| 1395 | */ |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1396 | ModuleExport size_t RegisterGIFImage(void) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1397 | { |
| 1398 | MagickInfo |
| 1399 | *entry; |
| 1400 | |
dirk | 06b627a | 2015-04-06 18:59:17 +0000 | [diff] [blame] | 1401 | entry=AcquireMagickInfo("GIF","GIF", |
| 1402 | "CompuServe graphics interchange format"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1403 | entry->decoder=(DecodeImageHandler *) ReadGIFImage; |
| 1404 | entry->encoder=(EncodeImageHandler *) WriteGIFImage; |
| 1405 | entry->magick=(IsImageFormatHandler *) IsGIF; |
cristy | 12c3c03 | 2013-08-09 11:49:41 +0000 | [diff] [blame] | 1406 | entry->mime_type=ConstantString("image/gif"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1407 | (void) RegisterMagickInfo(entry); |
dirk | 06b627a | 2015-04-06 18:59:17 +0000 | [diff] [blame] | 1408 | entry=AcquireMagickInfo("GIF","GIF87", |
| 1409 | "CompuServe graphics interchange format"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1410 | entry->decoder=(DecodeImageHandler *) ReadGIFImage; |
| 1411 | entry->encoder=(EncodeImageHandler *) WriteGIFImage; |
| 1412 | entry->magick=(IsImageFormatHandler *) IsGIF; |
dirk | 08e9a11 | 2015-02-22 01:51:41 +0000 | [diff] [blame] | 1413 | entry->flags^=CoderAdjoinFlag; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1414 | entry->version=ConstantString("version 87a"); |
cristy | 12c3c03 | 2013-08-09 11:49:41 +0000 | [diff] [blame] | 1415 | entry->mime_type=ConstantString("image/gif"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1416 | (void) RegisterMagickInfo(entry); |
| 1417 | return(MagickImageCoderSignature); |
| 1418 | } |
| 1419 | |
| 1420 | /* |
| 1421 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 1422 | % % |
| 1423 | % % |
| 1424 | % % |
| 1425 | % U n r e g i s t e r G I F I m a g e % |
| 1426 | % % |
| 1427 | % % |
| 1428 | % % |
| 1429 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 1430 | % |
| 1431 | % UnregisterGIFImage() removes format registrations made by the |
| 1432 | % GIF module from the list of supported formats. |
| 1433 | % |
| 1434 | % The format of the UnregisterGIFImage method is: |
| 1435 | % |
| 1436 | % UnregisterGIFImage(void) |
| 1437 | % |
| 1438 | */ |
| 1439 | ModuleExport void UnregisterGIFImage(void) |
| 1440 | { |
| 1441 | (void) UnregisterMagickInfo("GIF"); |
| 1442 | (void) UnregisterMagickInfo("GIF87"); |
| 1443 | } |
| 1444 | |
| 1445 | /* |
| 1446 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 1447 | % % |
| 1448 | % % |
| 1449 | % % |
| 1450 | % W r i t e G I F I m a g e % |
| 1451 | % % |
| 1452 | % % |
| 1453 | % % |
| 1454 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 1455 | % |
| 1456 | % WriteGIFImage() writes an image to a file in the Compuserve Graphics |
| 1457 | % image format. |
| 1458 | % |
| 1459 | % The format of the WriteGIFImage method is: |
| 1460 | % |
cristy | 1e178e7 | 2011-08-28 19:44:34 +0000 | [diff] [blame] | 1461 | % MagickBooleanType WriteGIFImage(const ImageInfo *image_info, |
| 1462 | % Image *image,ExceptionInfo *exception) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1463 | % |
| 1464 | % A description of each parameter follows. |
| 1465 | % |
| 1466 | % o image_info: the image info. |
| 1467 | % |
| 1468 | % o image: The image. |
| 1469 | % |
cristy | 1e178e7 | 2011-08-28 19:44:34 +0000 | [diff] [blame] | 1470 | % o exception: return any errors or warnings in this structure. |
| 1471 | % |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1472 | */ |
cristy | 1e178e7 | 2011-08-28 19:44:34 +0000 | [diff] [blame] | 1473 | static MagickBooleanType WriteGIFImage(const ImageInfo *image_info,Image *image, |
| 1474 | ExceptionInfo *exception) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1475 | { |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1476 | int |
| 1477 | c; |
| 1478 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1479 | ImageInfo |
| 1480 | *write_info; |
| 1481 | |
| 1482 | InterlaceType |
| 1483 | interlace; |
| 1484 | |
| 1485 | MagickBooleanType |
| 1486 | status; |
| 1487 | |
| 1488 | MagickOffsetType |
| 1489 | scene; |
| 1490 | |
| 1491 | RectangleInfo |
| 1492 | page; |
| 1493 | |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1494 | register ssize_t |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1495 | i; |
| 1496 | |
| 1497 | register unsigned char |
| 1498 | *q; |
| 1499 | |
| 1500 | size_t |
cristy | ebc891a | 2011-04-24 23:04:16 +0000 | [diff] [blame] | 1501 | bits_per_pixel, |
| 1502 | delay, |
| 1503 | length, |
| 1504 | one; |
| 1505 | |
| 1506 | ssize_t |
| 1507 | j, |
| 1508 | opacity; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1509 | |
| 1510 | unsigned char |
| 1511 | *colormap, |
| 1512 | *global_colormap; |
| 1513 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1514 | /* |
| 1515 | Open output image file. |
| 1516 | */ |
| 1517 | assert(image_info != (const ImageInfo *) NULL); |
cristy | e1c94d9 | 2015-06-28 12:16:33 +0000 | [diff] [blame] | 1518 | assert(image_info->signature == MagickCoreSignature); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1519 | assert(image != (Image *) NULL); |
cristy | e1c94d9 | 2015-06-28 12:16:33 +0000 | [diff] [blame] | 1520 | assert(image->signature == MagickCoreSignature); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1521 | if (image->debug != MagickFalse) |
| 1522 | (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename); |
cristy | 3a37efd | 2011-08-28 20:31:03 +0000 | [diff] [blame] | 1523 | assert(exception != (ExceptionInfo *) NULL); |
cristy | e1c94d9 | 2015-06-28 12:16:33 +0000 | [diff] [blame] | 1524 | assert(exception->signature == MagickCoreSignature); |
cristy | 1e178e7 | 2011-08-28 19:44:34 +0000 | [diff] [blame] | 1525 | status=OpenBlob(image_info,image,WriteBinaryBlobMode,exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1526 | if (status == MagickFalse) |
| 1527 | return(status); |
| 1528 | /* |
| 1529 | Allocate colormap. |
| 1530 | */ |
| 1531 | global_colormap=(unsigned char *) AcquireQuantumMemory(768UL, |
| 1532 | sizeof(*global_colormap)); |
| 1533 | colormap=(unsigned char *) AcquireQuantumMemory(768UL,sizeof(*colormap)); |
| 1534 | if ((global_colormap == (unsigned char *) NULL) || |
| 1535 | (colormap == (unsigned char *) NULL)) |
| 1536 | ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed"); |
| 1537 | for (i=0; i < 768; i++) |
| 1538 | colormap[i]=(unsigned char) 0; |
| 1539 | /* |
| 1540 | Write GIF header. |
| 1541 | */ |
| 1542 | write_info=CloneImageInfo(image_info); |
| 1543 | if (LocaleCompare(write_info->magick,"GIF87") != 0) |
| 1544 | (void) WriteBlob(image,6,(unsigned char *) "GIF89a"); |
| 1545 | else |
| 1546 | { |
| 1547 | (void) WriteBlob(image,6,(unsigned char *) "GIF87a"); |
| 1548 | write_info->adjoin=MagickFalse; |
| 1549 | } |
| 1550 | /* |
| 1551 | Determine image bounding box. |
| 1552 | */ |
| 1553 | page.width=image->columns; |
glennrp | ff6c41f | 2011-10-31 15:57:41 +0000 | [diff] [blame] | 1554 | if (image->page.width > page.width) |
| 1555 | page.width=image->page.width; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1556 | page.height=image->rows; |
glennrp | ff6c41f | 2011-10-31 15:57:41 +0000 | [diff] [blame] | 1557 | if (image->page.height > page.height) |
| 1558 | page.height=image->page.height; |
| 1559 | page.x=image->page.x; |
| 1560 | page.y=image->page.y; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1561 | (void) WriteBlobLSBShort(image,(unsigned short) page.width); |
| 1562 | (void) WriteBlobLSBShort(image,(unsigned short) page.height); |
| 1563 | /* |
| 1564 | Write images to file. |
| 1565 | */ |
| 1566 | interlace=write_info->interlace; |
| 1567 | if ((write_info->adjoin != MagickFalse) && |
| 1568 | (GetNextImageInList(image) != (Image *) NULL)) |
| 1569 | interlace=NoInterlace; |
| 1570 | scene=0; |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 1571 | one=1; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1572 | do |
| 1573 | { |
cristy | af8d391 | 2014-02-21 14:50:33 +0000 | [diff] [blame] | 1574 | (void) TransformImageColorspace(image,sRGBColorspace,exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1575 | opacity=(-1); |
cristy | 1e178e7 | 2011-08-28 19:44:34 +0000 | [diff] [blame] | 1576 | if (IsImageOpaque(image,exception) != MagickFalse) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1577 | { |
| 1578 | if ((image->storage_class == DirectClass) || (image->colors > 256)) |
cristy | 018f07f | 2011-09-04 21:15:19 +0000 | [diff] [blame] | 1579 | (void) SetImageType(image,PaletteType,exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1580 | } |
| 1581 | else |
| 1582 | { |
cristy | a19f1d7 | 2012-08-07 18:24:38 +0000 | [diff] [blame] | 1583 | double |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1584 | alpha, |
| 1585 | beta; |
| 1586 | |
| 1587 | /* |
| 1588 | Identify transparent colormap index. |
| 1589 | */ |
cristy | 21ef17b | 2015-02-09 22:59:26 +0000 | [diff] [blame] | 1590 | if ((image->storage_class == DirectClass) || (image->colors > 256)) |
| 1591 | (void) SetImageType(image,PaletteBilevelAlphaType,exception); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1592 | for (i=0; i < (ssize_t) image->colors; i++) |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 1593 | if (image->colormap[i].alpha != OpaqueAlpha) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1594 | { |
| 1595 | if (opacity < 0) |
| 1596 | { |
| 1597 | opacity=i; |
| 1598 | continue; |
| 1599 | } |
cristy | 21ef17b | 2015-02-09 22:59:26 +0000 | [diff] [blame] | 1600 | alpha=fabs(image->colormap[i].alpha-TransparentAlpha); |
| 1601 | beta=fabs(image->colormap[opacity].alpha-TransparentAlpha); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1602 | if (alpha < beta) |
| 1603 | opacity=i; |
| 1604 | } |
| 1605 | if (opacity == -1) |
| 1606 | { |
cristy | def23e5 | 2015-01-22 11:52:01 +0000 | [diff] [blame] | 1607 | (void) SetImageType(image,PaletteBilevelAlphaType,exception); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1608 | for (i=0; i < (ssize_t) image->colors; i++) |
cristy | 4c08aed | 2011-07-01 19:47:50 +0000 | [diff] [blame] | 1609 | if (image->colormap[i].alpha != OpaqueAlpha) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1610 | { |
| 1611 | if (opacity < 0) |
| 1612 | { |
| 1613 | opacity=i; |
| 1614 | continue; |
| 1615 | } |
cristy | 21ef17b | 2015-02-09 22:59:26 +0000 | [diff] [blame] | 1616 | alpha=fabs(image->colormap[i].alpha-TransparentAlpha); |
| 1617 | beta=fabs(image->colormap[opacity].alpha-TransparentAlpha); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1618 | if (alpha < beta) |
| 1619 | opacity=i; |
| 1620 | } |
| 1621 | } |
| 1622 | if (opacity >= 0) |
| 1623 | { |
| 1624 | image->colormap[opacity].red=image->transparent_color.red; |
| 1625 | image->colormap[opacity].green=image->transparent_color.green; |
| 1626 | image->colormap[opacity].blue=image->transparent_color.blue; |
| 1627 | } |
| 1628 | } |
| 1629 | if ((image->storage_class == DirectClass) || (image->colors > 256)) |
| 1630 | ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed"); |
| 1631 | for (bits_per_pixel=1; bits_per_pixel < 8; bits_per_pixel++) |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 1632 | if ((one << bits_per_pixel) >= image->colors) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1633 | break; |
| 1634 | q=colormap; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1635 | for (i=0; i < (ssize_t) image->colors; i++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1636 | { |
cristy | ea43ca3 | 2012-05-20 23:47:26 +0000 | [diff] [blame] | 1637 | *q++=ScaleQuantumToChar(ClampToQuantum(image->colormap[i].red)); |
| 1638 | *q++=ScaleQuantumToChar(ClampToQuantum(image->colormap[i].green)); |
| 1639 | *q++=ScaleQuantumToChar(ClampToQuantum(image->colormap[i].blue)); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1640 | } |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 1641 | for ( ; i < (ssize_t) (one << bits_per_pixel); i++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1642 | { |
| 1643 | *q++=(unsigned char) 0x0; |
| 1644 | *q++=(unsigned char) 0x0; |
| 1645 | *q++=(unsigned char) 0x0; |
| 1646 | } |
| 1647 | if ((GetPreviousImageInList(image) == (Image *) NULL) || |
| 1648 | (write_info->adjoin == MagickFalse)) |
| 1649 | { |
| 1650 | /* |
| 1651 | Write global colormap. |
| 1652 | */ |
| 1653 | c=0x80; |
| 1654 | c|=(8-1) << 4; /* color resolution */ |
| 1655 | c|=(bits_per_pixel-1); /* size of global colormap */ |
| 1656 | (void) WriteBlobByte(image,(unsigned char) c); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1657 | for (j=0; j < (ssize_t) image->colors; j++) |
cristy | 101ab70 | 2011-10-13 13:06:32 +0000 | [diff] [blame] | 1658 | if (IsPixelInfoEquivalent(&image->background_color,image->colormap+j)) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1659 | break; |
| 1660 | (void) WriteBlobByte(image,(unsigned char) |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1661 | (j == (ssize_t) image->colors ? 0 : j)); /* background color */ |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1662 | (void) WriteBlobByte(image,(unsigned char) 0x00); /* reserved */ |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 1663 | length=(size_t) (3*(one << bits_per_pixel)); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1664 | (void) WriteBlob(image,length,colormap); |
| 1665 | for (j=0; j < 768; j++) |
| 1666 | global_colormap[j]=colormap[j]; |
| 1667 | } |
| 1668 | if (LocaleCompare(write_info->magick,"GIF87") != 0) |
| 1669 | { |
cristy | ca793d7 | 2015-01-23 13:03:55 +0000 | [diff] [blame] | 1670 | const char |
| 1671 | *value; |
| 1672 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1673 | /* |
| 1674 | Write graphics control extension. |
| 1675 | */ |
| 1676 | (void) WriteBlobByte(image,(unsigned char) 0x21); |
| 1677 | (void) WriteBlobByte(image,(unsigned char) 0xf9); |
| 1678 | (void) WriteBlobByte(image,(unsigned char) 0x04); |
| 1679 | c=image->dispose << 2; |
| 1680 | if (opacity >= 0) |
| 1681 | c|=0x01; |
| 1682 | (void) WriteBlobByte(image,(unsigned char) c); |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1683 | delay=(size_t) (100*image->delay/MagickMax((size_t) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1684 | image->ticks_per_second,1)); |
| 1685 | (void) WriteBlobLSBShort(image,(unsigned short) delay); |
| 1686 | (void) WriteBlobByte(image,(unsigned char) (opacity >= 0 ? opacity : |
| 1687 | 0)); |
| 1688 | (void) WriteBlobByte(image,(unsigned char) 0x00); |
cristy | ca793d7 | 2015-01-23 13:03:55 +0000 | [diff] [blame] | 1689 | value=GetImageProperty(image,"comment",exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1690 | if ((LocaleCompare(write_info->magick,"GIF87") != 0) && |
cristy | ca793d7 | 2015-01-23 13:03:55 +0000 | [diff] [blame] | 1691 | (value != (const char *) NULL)) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1692 | { |
cristy | fa31e13 | 2012-05-31 14:12:41 +0000 | [diff] [blame] | 1693 | register const char |
| 1694 | *p; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1695 | |
| 1696 | size_t |
| 1697 | count; |
cristy | fa31e13 | 2012-05-31 14:12:41 +0000 | [diff] [blame] | 1698 | |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1699 | /* |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1700 | Write comment extension. |
| 1701 | */ |
cristy | fa31e13 | 2012-05-31 14:12:41 +0000 | [diff] [blame] | 1702 | (void) WriteBlobByte(image,(unsigned char) 0x21); |
| 1703 | (void) WriteBlobByte(image,(unsigned char) 0xfe); |
cristy | fa31e13 | 2012-05-31 14:12:41 +0000 | [diff] [blame] | 1704 | for (p=value; *p != '\0'; ) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1705 | { |
cristy | fa31e13 | 2012-05-31 14:12:41 +0000 | [diff] [blame] | 1706 | count=MagickMin(strlen(p),255); |
| 1707 | (void) WriteBlobByte(image,(unsigned char) count); |
| 1708 | for (i=0; i < (ssize_t) count; i++) |
| 1709 | (void) WriteBlobByte(image,(unsigned char) *p++); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1710 | } |
cristy | fa31e13 | 2012-05-31 14:12:41 +0000 | [diff] [blame] | 1711 | (void) WriteBlobByte(image,(unsigned char) 0x00); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1712 | } |
| 1713 | if ((GetPreviousImageInList(image) == (Image *) NULL) && |
| 1714 | (GetNextImageInList(image) != (Image *) NULL) && |
| 1715 | (image->iterations != 1)) |
| 1716 | { |
| 1717 | /* |
| 1718 | Write Netscape Loop extension. |
| 1719 | */ |
| 1720 | (void) LogMagickEvent(CoderEvent,GetMagickModule(), |
| 1721 | " Writing GIF Extension %s","NETSCAPE2.0"); |
| 1722 | (void) WriteBlobByte(image,(unsigned char) 0x21); |
| 1723 | (void) WriteBlobByte(image,(unsigned char) 0xff); |
| 1724 | (void) WriteBlobByte(image,(unsigned char) 0x0b); |
| 1725 | (void) WriteBlob(image,11,(unsigned char *) "NETSCAPE2.0"); |
| 1726 | (void) WriteBlobByte(image,(unsigned char) 0x03); |
| 1727 | (void) WriteBlobByte(image,(unsigned char) 0x01); |
| 1728 | (void) WriteBlobLSBShort(image,(unsigned short) image->iterations); |
| 1729 | (void) WriteBlobByte(image,(unsigned char) 0x00); |
| 1730 | } |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1731 | if ((image->gamma != 1.0f/2.2f)) |
| 1732 | { |
| 1733 | char |
cristy | 151b66d | 2015-04-15 10:50:31 +0000 | [diff] [blame] | 1734 | attributes[MagickPathExtent]; |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1735 | |
| 1736 | ssize_t |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 1737 | count; |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1738 | |
| 1739 | /* |
| 1740 | Write ImageMagick extension. |
| 1741 | */ |
| 1742 | (void) LogMagickEvent(CoderEvent,GetMagickModule(), |
| 1743 | " Writing GIF Extension %s","ImageMagick"); |
| 1744 | (void) WriteBlobByte(image,(unsigned char) 0x21); |
| 1745 | (void) WriteBlobByte(image,(unsigned char) 0xff); |
| 1746 | (void) WriteBlobByte(image,(unsigned char) 0x0b); |
| 1747 | (void) WriteBlob(image,11,(unsigned char *) "ImageMagick"); |
cristy | 151b66d | 2015-04-15 10:50:31 +0000 | [diff] [blame] | 1748 | count=FormatLocaleString(attributes,MagickPathExtent,"gamma=%g", |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1749 | image->gamma); |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 1750 | (void) WriteBlobByte(image,(unsigned char) count); |
| 1751 | (void) WriteBlob(image,(size_t) count,(unsigned char *) attributes); |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1752 | (void) WriteBlobByte(image,(unsigned char) 0x00); |
| 1753 | } |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1754 | ResetImageProfileIterator(image); |
| 1755 | for ( ; ; ) |
| 1756 | { |
| 1757 | char |
| 1758 | *name; |
| 1759 | |
| 1760 | const StringInfo |
| 1761 | *profile; |
| 1762 | |
| 1763 | name=GetNextImageProfile(image); |
| 1764 | if (name == (const char *) NULL) |
| 1765 | break; |
| 1766 | profile=GetImageProfile(image,name); |
| 1767 | if (profile != (StringInfo *) NULL) |
| 1768 | { |
| 1769 | if ((LocaleCompare(name,"ICC") == 0) || |
| 1770 | (LocaleCompare(name,"ICM") == 0) || |
| 1771 | (LocaleCompare(name,"IPTC") == 0) || |
| 1772 | (LocaleCompare(name,"8BIM") == 0) || |
| 1773 | (LocaleNCompare(name,"gif:",4) == 0)) |
| 1774 | { |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1775 | ssize_t |
| 1776 | offset; |
| 1777 | |
| 1778 | unsigned char |
| 1779 | *datum; |
| 1780 | |
| 1781 | datum=GetStringInfoDatum(profile); |
| 1782 | length=GetStringInfoLength(profile); |
| 1783 | (void) WriteBlobByte(image,(unsigned char) 0x21); |
| 1784 | (void) WriteBlobByte(image,(unsigned char) 0xff); |
| 1785 | (void) WriteBlobByte(image,(unsigned char) 0x0b); |
| 1786 | if ((LocaleCompare(name,"ICC") == 0) || |
| 1787 | (LocaleCompare(name,"ICM") == 0)) |
| 1788 | { |
| 1789 | /* |
| 1790 | Write ICC extension. |
| 1791 | */ |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1792 | (void) WriteBlob(image,11,(unsigned char *) "ICCRGBG1012"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1793 | (void) LogMagickEvent(CoderEvent,GetMagickModule(), |
cristy | abcdc87 | 2014-08-30 22:53:43 +0000 | [diff] [blame] | 1794 | " Writing GIF Extension %s","ICCRGBG1012"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1795 | } |
| 1796 | else |
| 1797 | if ((LocaleCompare(name,"IPTC") == 0)) |
| 1798 | { |
| 1799 | /* |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1800 | Write IPTC extension. |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1801 | */ |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1802 | (void) WriteBlob(image,11,(unsigned char *) "MGKIPTC0000"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1803 | (void) LogMagickEvent(CoderEvent,GetMagickModule(), |
cristy | abcdc87 | 2014-08-30 22:53:43 +0000 | [diff] [blame] | 1804 | " Writing GIF Extension %s","MGKIPTC0000"); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1805 | } |
| 1806 | else |
| 1807 | if ((LocaleCompare(name,"8BIM") == 0)) |
| 1808 | { |
| 1809 | /* |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1810 | Write 8BIM extension. |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1811 | */ |
| 1812 | (void) WriteBlob(image,11,(unsigned char *) |
| 1813 | "MGK8BIM0000"); |
| 1814 | (void) LogMagickEvent(CoderEvent,GetMagickModule(), |
| 1815 | " Writing GIF Extension %s","MGK8BIM0000"); |
| 1816 | } |
| 1817 | else |
| 1818 | { |
| 1819 | char |
cristy | 151b66d | 2015-04-15 10:50:31 +0000 | [diff] [blame] | 1820 | extension[MagickPathExtent]; |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1821 | |
cristy | 03a398b | 2012-06-22 12:06:04 +0000 | [diff] [blame] | 1822 | /* |
| 1823 | Write generic extension. |
| 1824 | */ |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1825 | (void) CopyMagickString(extension,name+4, |
| 1826 | sizeof(extension)); |
| 1827 | (void) WriteBlob(image,11,(unsigned char *) extension); |
| 1828 | (void) LogMagickEvent(CoderEvent,GetMagickModule(), |
cristy | cc3a7e7 | 2015-01-31 18:13:18 +0000 | [diff] [blame] | 1829 | " Writing GIF Extension %s",name); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1830 | } |
| 1831 | offset=0; |
| 1832 | while ((ssize_t) length > offset) |
| 1833 | { |
| 1834 | size_t |
| 1835 | block_length; |
| 1836 | |
| 1837 | if ((length-offset) < 255) |
| 1838 | block_length=length-offset; |
| 1839 | else |
| 1840 | block_length=255; |
| 1841 | (void) WriteBlobByte(image,(unsigned char) block_length); |
| 1842 | (void) WriteBlob(image,(size_t) block_length,datum+offset); |
| 1843 | offset+=(ssize_t) block_length; |
| 1844 | } |
| 1845 | (void) WriteBlobByte(image,(unsigned char) 0x00); |
| 1846 | } |
| 1847 | } |
| 1848 | } |
| 1849 | } |
| 1850 | (void) WriteBlobByte(image,','); /* image separator */ |
| 1851 | /* |
| 1852 | Write the image header. |
| 1853 | */ |
| 1854 | page.x=image->page.x; |
| 1855 | page.y=image->page.y; |
| 1856 | if ((image->page.width != 0) && (image->page.height != 0)) |
| 1857 | page=image->page; |
| 1858 | (void) WriteBlobLSBShort(image,(unsigned short) (page.x < 0 ? 0 : page.x)); |
| 1859 | (void) WriteBlobLSBShort(image,(unsigned short) (page.y < 0 ? 0 : page.y)); |
| 1860 | (void) WriteBlobLSBShort(image,(unsigned short) image->columns); |
| 1861 | (void) WriteBlobLSBShort(image,(unsigned short) image->rows); |
| 1862 | c=0x00; |
| 1863 | if (interlace != NoInterlace) |
| 1864 | c|=0x40; /* pixel data is interlaced */ |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1865 | for (j=0; j < (ssize_t) (3*image->colors); j++) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1866 | if (colormap[j] != global_colormap[j]) |
| 1867 | break; |
cristy | bb50337 | 2010-05-27 20:51:26 +0000 | [diff] [blame] | 1868 | if (j == (ssize_t) (3*image->colors)) |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1869 | (void) WriteBlobByte(image,(unsigned char) c); |
| 1870 | else |
| 1871 | { |
| 1872 | c|=0x80; |
| 1873 | c|=(bits_per_pixel-1); /* size of local colormap */ |
| 1874 | (void) WriteBlobByte(image,(unsigned char) c); |
cristy | 5d89f43 | 2010-05-30 00:00:26 +0000 | [diff] [blame] | 1875 | length=(size_t) (3*(one << bits_per_pixel)); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1876 | (void) WriteBlob(image,length,colormap); |
| 1877 | } |
| 1878 | /* |
| 1879 | Write the image data. |
| 1880 | */ |
| 1881 | c=(int) MagickMax(bits_per_pixel,2); |
| 1882 | (void) WriteBlobByte(image,(unsigned char) c); |
cristy | c82a27b | 2011-10-21 01:07:16 +0000 | [diff] [blame] | 1883 | status=EncodeImage(write_info,image,(size_t) MagickMax(bits_per_pixel,2)+1, |
| 1884 | exception); |
cristy | 3ed852e | 2009-09-05 21:47:34 +0000 | [diff] [blame] | 1885 | if (status == MagickFalse) |
| 1886 | { |
| 1887 | global_colormap=(unsigned char *) RelinquishMagickMemory( |
| 1888 | global_colormap); |
| 1889 | colormap=(unsigned char *) RelinquishMagickMemory(colormap); |
| 1890 | write_info=DestroyImageInfo(write_info); |
| 1891 | ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed"); |
| 1892 | } |
| 1893 | (void) WriteBlobByte(image,(unsigned char) 0x00); |
| 1894 | if (GetNextImageInList(image) == (Image *) NULL) |
| 1895 | break; |
| 1896 | image=SyncNextImageInList(image); |
| 1897 | scene++; |
| 1898 | status=SetImageProgress(image,SaveImagesTag,scene, |
| 1899 | GetImageListLength(image)); |
| 1900 | if (status == MagickFalse) |
| 1901 | break; |
| 1902 | } while (write_info->adjoin != MagickFalse); |
| 1903 | (void) WriteBlobByte(image,';'); /* terminator */ |
| 1904 | global_colormap=(unsigned char *) RelinquishMagickMemory(global_colormap); |
| 1905 | colormap=(unsigned char *) RelinquishMagickMemory(colormap); |
| 1906 | write_info=DestroyImageInfo(write_info); |
| 1907 | (void) CloseBlob(image); |
| 1908 | return(MagickTrue); |
| 1909 | } |