granicus.if.org Git - imagemagick/blob - coders/map.c

   1 /*
   2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   3 %                                                                             %
   4 %                                                                             %
   5 %                                                                             %
   6 %                            M   M   AAA   PPPP                               %
   7 %                            MM MM  A   A  P   P                              %
   8 %                            M M M  AAAAA  PPPP                               %
   9 %                            M   M  A   A  P                                  %
  10 %                            M   M  A   A  P                                  %
  11 %                                                                             %
  12 %                                                                             %
  13 %                  Read/Write Image Colormaps As An Image File.               %
  14 %                                                                             %
  15 %                              Software Design                                %
  16 %                                   Cristy                                    %
  17 %                                 July 1992                                   %
  18 %                                                                             %
  19 %                                                                             %
  20 %  Copyright 1999-2017 ImageMagick Studio LLC, a non-profit organization      %
  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 %    https://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 \f
  39 /*
  40   Include declarations.
  41 */
  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"
  52 #include "MagickCore/colorspace-private.h"
  53 #include "MagickCore/exception.h"
  54 #include "MagickCore/exception-private.h"
  55 #include "MagickCore/histogram.h"
  56 #include "MagickCore/image.h"
  57 #include "MagickCore/image-private.h"
  58 #include "MagickCore/list.h"
  59 #include "MagickCore/magick.h"
  60 #include "MagickCore/memory_.h"
  61 #include "MagickCore/pixel-accessor.h"
  62 #include "MagickCore/quantum-private.h"
  63 #include "MagickCore/static.h"
  64 #include "MagickCore/statistic.h"
  65 #include "MagickCore/string_.h"
  66 #include "MagickCore/module.h"
  67 \f
  68 /*
  69   Forward declarations.
  70 */
  71 static MagickBooleanType
  72   WriteMAPImage(const ImageInfo *,Image *,ExceptionInfo *);
  73 \f
  74 /*
  75 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  76 %                                                                             %
  77 %                                                                             %
  78 %                                                                             %
  79 %   R e a d M A P I m a g e                                                   %
  80 %                                                                             %
  81 %                                                                             %
  82 %                                                                             %
  83 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  84 %
  85 %  ReadMAPImage() reads an image of raw RGB colormap and colormap index
  86 %  bytes and returns it.  It allocates the memory necessary for the new Image
  87 %  structure and returns a pointer to the new image.
  88 %
  89 %  The format of the ReadMAPImage method is:
  90 %
  91 %      Image *ReadMAPImage(const ImageInfo *image_info,ExceptionInfo *exception)
  92 %
  93 %  A description of each parameter follows:
  94 %
  95 %    o image_info: the image info.
  96 %
  97 %    o exception: return any errors or warnings in this structure.
  98 %
  99 */
 100 static Image *ReadMAPImage(const ImageInfo *image_info,ExceptionInfo *exception)
 101 {
 102   Image
 103     *image;
 104
 105   MagickBooleanType
 106     status;
 107
 108   Quantum
 109     index;
 110
 111   register ssize_t
 112     x;
 113
 114   register Quantum
 115     *q;
 116
 117   register ssize_t
 118     i;
 119
 120   register unsigned char
 121     *p;
 122
 123   size_t
 124     depth,
 125     packet_size,
 126     quantum;
 127
 128   ssize_t
 129     count,
 130     y;
 131
 132   unsigned char
 133     *colormap,
 134     *pixels;
 135
 136   /*
 137     Open image file.
 138   */
 139   assert(image_info != (const ImageInfo *) NULL);
 140   assert(image_info->signature == MagickCoreSignature);
 141   if (image_info->debug != MagickFalse)
 142     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
 143       image_info->filename);
 144   assert(exception != (ExceptionInfo *) NULL);
 145   assert(exception->signature == MagickCoreSignature);
 146   image=AcquireImage(image_info,exception);
 147   if ((image->columns == 0) || (image->rows == 0))
 148     ThrowReaderException(OptionError,"MustSpecifyImageSize");
 149   status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
 150   if (status == MagickFalse)
 151     {
 152       image=DestroyImageList(image);
 153       return((Image *) NULL);
 154     }
 155   /*
 156     Initialize image structure.
 157   */
 158   image->storage_class=PseudoClass;
 159   status=AcquireImageColormap(image,(size_t)
 160     (image->offset != 0 ? image->offset : 256),exception);
 161   if (status == MagickFalse)
 162     ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
 163   depth=GetImageQuantumDepth(image,MagickTrue);
 164   packet_size=(size_t) (depth/8);
 165   pixels=(unsigned char *) AcquireQuantumMemory(image->columns,packet_size*
 166     sizeof(*pixels));
 167   packet_size=(size_t) (image->colors > 256 ? 6UL : 3UL);
 168   colormap=(unsigned char *) AcquireQuantumMemory(image->colors,packet_size*
 169     sizeof(*colormap));
 170   if ((pixels == (unsigned char *) NULL) ||
 171       (colormap == (unsigned char *) NULL))
 172     ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
 173   /*
 174     Read image colormap.
 175   */
 176   count=ReadBlob(image,packet_size*image->colors,colormap);
 177   if (count != (ssize_t) (packet_size*image->colors))
 178     ThrowReaderException(CorruptImageError,"InsufficientImageDataInFile");
 179   p=colormap;
 180   if (image->depth <= 8)
 181     for (i=0; i < (ssize_t) image->colors; i++)
 182     {
 183       image->colormap[i].red=ScaleCharToQuantum(*p++);
 184       image->colormap[i].green=ScaleCharToQuantum(*p++);
 185       image->colormap[i].blue=ScaleCharToQuantum(*p++);
 186     }
 187   else
 188     for (i=0; i < (ssize_t) image->colors; i++)
 189     {
 190       quantum=(*p++ << 8);
 191       quantum|=(*p++);
 192       image->colormap[i].red=(Quantum) quantum;
 193       quantum=(*p++ << 8);
 194       quantum|=(*p++);
 195       image->colormap[i].green=(Quantum) quantum;
 196       quantum=(*p++ << 8);
 197       quantum|=(*p++);
 198       image->colormap[i].blue=(Quantum) quantum;
 199     }
 200   colormap=(unsigned char *) RelinquishMagickMemory(colormap);
 201   if (image_info->ping != MagickFalse)
 202     {
 203       (void) CloseBlob(image);
 204       return(GetFirstImageInList(image));
 205     }
 206   status=SetImageExtent(image,image->columns,image->rows,exception);
 207   if (status == MagickFalse)
 208     return(DestroyImageList(image));
 209   /*
 210     Read image pixels.
 211   */
 212   packet_size=(size_t) (depth/8);
 213   for (y=0; y < (ssize_t) image->rows; y++)
 214   {
 215     p=pixels;
 216     q=QueueAuthenticPixels(image,0,y,image->columns,1,exception);
 217     if (q == (Quantum *) NULL)
 218       break;
 219     count=ReadBlob(image,(size_t) packet_size*image->columns,pixels);
 220     if (count != (ssize_t) (packet_size*image->columns))
 221       break;
 222     for (x=0; x < (ssize_t) image->columns; x++)
 223     {
 224       index=ConstrainColormapIndex(image,*p,exception);
 225       p++;
 226       if (image->colors > 256)
 227         {
 228           index=ConstrainColormapIndex(image,((size_t) index << 8)+(*p),
 229             exception);
 230           p++;
 231         }
 232       SetPixelIndex(image,index,q);
 233       SetPixelViaPixelInfo(image,image->colormap+(ssize_t) index,q);
 234       q+=GetPixelChannels(image);
 235     }
 236     if (SyncAuthenticPixels(image,exception) == MagickFalse)
 237       break;
 238   }
 239   pixels=(unsigned char *) RelinquishMagickMemory(pixels);
 240   if (y < (ssize_t) image->rows)
 241     ThrowFileException(exception,CorruptImageError,"UnexpectedEndOfFile",
 242       image->filename);
 243   (void) CloseBlob(image);
 244   return(GetFirstImageInList(image));
 245 }
 246 \f
 247 /*
 248 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 249 %                                                                             %
 250 %                                                                             %
 251 %                                                                             %
 252 %   R e g i s t e r M A P I m a g e                                           %
 253 %                                                                             %
 254 %                                                                             %
 255 %                                                                             %
 256 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 257 %
 258 %  RegisterMAPImage() adds attributes for the MAP image format to
 259 %  the list of supported formats.  The attributes include the image format
 260 %  tag, a method to read and/or write the format, whether the format
 261 %  supports the saving of more than one frame to the same file or blob,
 262 %  whether the format supports native in-memory I/O, and a brief
 263 %  description of the format.
 264 %
 265 %  The format of the RegisterMAPImage method is:
 266 %
 267 %      size_t RegisterMAPImage(void)
 268 %
 269 */
 270 ModuleExport size_t RegisterMAPImage(void)
 271 {
 272   MagickInfo
 273     *entry;
 274
 275   entry=AcquireMagickInfo("MAP","MAP","Colormap intensities and indices");
 276   entry->decoder=(DecodeImageHandler *) ReadMAPImage;
 277   entry->encoder=(EncodeImageHandler *) WriteMAPImage;
 278   entry->flags^=CoderAdjoinFlag;
 279   entry->format_type=ExplicitFormatType;
 280   entry->flags|=CoderRawSupportFlag;
 281   entry->flags|=CoderEndianSupportFlag;
 282   (void) RegisterMagickInfo(entry);
 283   return(MagickImageCoderSignature);
 284 }
 285 \f
 286 /*
 287 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 288 %                                                                             %
 289 %                                                                             %
 290 %                                                                             %
 291 %   U n r e g i s t e r M A P I m a g e                                       %
 292 %                                                                             %
 293 %                                                                             %
 294 %                                                                             %
 295 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 296 %
 297 %  UnregisterMAPImage() removes format registrations made by the
 298 %  MAP module from the list of supported formats.
 299 %
 300 %  The format of the UnregisterMAPImage method is:
 301 %
 302 %      UnregisterMAPImage(void)
 303 %
 304 */
 305 ModuleExport void UnregisterMAPImage(void)
 306 {
 307   (void) UnregisterMagickInfo("MAP");
 308 }
 309 \f
 310 /*
 311 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 312 %                                                                             %
 313 %                                                                             %
 314 %                                                                             %
 315 %   W r i t e M A P I m a g e                                                 %
 316 %                                                                             %
 317 %                                                                             %
 318 %                                                                             %
 319 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 320 %
 321 %  WriteMAPImage() writes an image to a file as red, green, and blue
 322 %  colormap bytes followed by the colormap indexes.
 323 %
 324 %  The format of the WriteMAPImage method is:
 325 %
 326 %      MagickBooleanType WriteMAPImage(const ImageInfo *image_info,
 327 %        Image *image,ExceptionInfo *exception)
 328 %
 329 %  A description of each parameter follows.
 330 %
 331 %    o image_info: the image info.
 332 %
 333 %    o image:  The image.
 334 %
 335 %    o exception: return any errors or warnings in this structure.
 336 %
 337 */
 338 static MagickBooleanType WriteMAPImage(const ImageInfo *image_info,Image *image,
 339   ExceptionInfo *exception)
 340 {
 341   MagickBooleanType
 342     status;
 343
 344   register const Quantum
 345     *p;
 346
 347   register ssize_t
 348     i,
 349     x;
 350
 351   register unsigned char
 352     *q;
 353
 354   size_t
 355     depth,
 356     packet_size;
 357
 358   ssize_t
 359     y;
 360
 361   unsigned char
 362     *colormap,
 363     *pixels;
 364
 365   /*
 366     Open output image file.
 367   */
 368   assert(image_info != (const ImageInfo *) NULL);
 369   assert(image_info->signature == MagickCoreSignature);
 370   assert(image != (Image *) NULL);
 371   assert(image->signature == MagickCoreSignature);
 372   if (image->debug != MagickFalse)
 373     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
 374   assert(exception != (ExceptionInfo *) NULL);
 375   assert(exception->signature == MagickCoreSignature);
 376   status=OpenBlob(image_info,image,WriteBinaryBlobMode,exception);
 377   if (status == MagickFalse)
 378     return(status);
 379   (void) TransformImageColorspace(image,sRGBColorspace,exception);
 380   /*
 381     Allocate colormap.
 382   */
 383   if (IsPaletteImage(image) == MagickFalse)
 384     (void) SetImageType(image,PaletteType,exception);
 385   depth=GetImageQuantumDepth(image,MagickTrue);
 386   packet_size=(size_t) (depth/8);
 387   pixels=(unsigned char *) AcquireQuantumMemory(image->columns,packet_size*
 388     sizeof(*pixels));
 389   packet_size=(size_t) (image->colors > 256 ? 6UL : 3UL);
 390   colormap=(unsigned char *) AcquireQuantumMemory(image->colors,packet_size*
 391     sizeof(*colormap));
 392   if ((pixels == (unsigned char *) NULL) ||
 393       (colormap == (unsigned char *) NULL))
 394     ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
 395   /*
 396     Write colormap to file.
 397   */
 398   q=colormap;
 399   q=colormap;
 400   if (image->colors <= 256)
 401     for (i=0; i < (ssize_t) image->colors; i++)
 402     {
 403       *q++=(unsigned char) ScaleQuantumToChar(image->colormap[i].red);
 404       *q++=(unsigned char) ScaleQuantumToChar(image->colormap[i].green);
 405       *q++=(unsigned char) ScaleQuantumToChar(image->colormap[i].blue);
 406     }
 407   else
 408     for (i=0; i < (ssize_t) image->colors; i++)
 409     {
 410       *q++=(unsigned char) (ScaleQuantumToShort(image->colormap[i].red) >> 8);
 411       *q++=(unsigned char) (ScaleQuantumToShort(image->colormap[i].red) & 0xff);
 412       *q++=(unsigned char) (ScaleQuantumToShort(image->colormap[i].green) >> 8);
 413       *q++=(unsigned char) (ScaleQuantumToShort(image->colormap[i].green) & 0xff);;
 414       *q++=(unsigned char) (ScaleQuantumToShort(image->colormap[i].blue) >> 8);
 415       *q++=(unsigned char) (ScaleQuantumToShort(image->colormap[i].blue) & 0xff);
 416     }
 417   (void) WriteBlob(image,packet_size*image->colors,colormap);
 418   colormap=(unsigned char *) RelinquishMagickMemory(colormap);
 419   /*
 420     Write image pixels to file.
 421   */
 422   for (y=0; y < (ssize_t) image->rows; y++)
 423   {
 424     p=GetVirtualPixels(image,0,y,image->columns,1,exception);
 425     if (p == (const Quantum *) NULL)
 426       break;
 427     q=pixels;
 428     for (x=0; x < (ssize_t) image->columns; x++)
 429     {
 430       if (image->colors > 256)
 431         *q++=(unsigned char) ((size_t) GetPixelIndex(image,p) >> 8);
 432       *q++=(unsigned char) GetPixelIndex(image,p);
 433       p+=GetPixelChannels(image);
 434     }
 435     (void) WriteBlob(image,(size_t) (q-pixels),pixels);
 436   }
 437   pixels=(unsigned char *) RelinquishMagickMemory(pixels);
 438   (void) CloseBlob(image);
 439   return(status);
 440 }