granicus.if.org Git - imagemagick/blob - magick/colormap.c

   1 /*
   2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   3 %                                                                             %
   4 %                                                                             %
   5 %                                                                             %
   6 %            CCCC   OOO   L       OOO   RRRR   M   M   AAA   PPPP             %
   7 %           C      O   O  L      O   O  R   R  MM MM  A   A  P   P            %
   8 %           C      O   O  L      O   O  RRRR   M M M  AAAAA  PPPP             %
   9 %           C      O   O  L      O   O  R R    M   M  A   A  P                %
  10 %            CCCC   OOO   LLLLL   OOO   R  R   M   M  A   A  P                %
  11 %                                                                             %
  12 %                                                                             %
  13 %                        MagickCore Colormap Methods                          %
  14 %                                                                             %
  15 %                              Software Design                                %
  16 %                                John Cristy                                  %
  17 %                                 July 1992                                   %
  18 %                                                                             %
  19 %                                                                             %
  20 %  Copyright 1999-2011 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 %    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 %  We use linked-lists because splay-trees do not currently support duplicate
  37 %  key / value pairs (.e.g X11 green compliance and SVG green compliance).
  38 %
  39 */
  40 \f
  41 /*
  42   Include declarations.
  43 */
  44 #include "magick/studio.h"
  45 #include "magick/blob.h"
  46 #include "magick/cache-view.h"
  47 #include "magick/cache.h"
  48 #include "magick/color.h"
  49 #include "magick/color-private.h"
  50 #include "magick/colormap.h"
  51 #include "magick/client.h"
  52 #include "magick/configure.h"
  53 #include "magick/exception.h"
  54 #include "magick/exception-private.h"
  55 #include "magick/gem.h"
  56 #include "magick/geometry.h"
  57 #include "magick/image-private.h"
  58 #include "magick/memory_.h"
  59 #include "magick/monitor.h"
  60 #include "magick/monitor-private.h"
  61 #include "magick/option.h"
  62 #include "magick/pixel-private.h"
  63 #include "magick/quantize.h"
  64 #include "magick/quantum.h"
  65 #include "magick/semaphore.h"
  66 #include "magick/string_.h"
  67 #include "magick/token.h"
  68 #include "magick/utility.h"
  69 #include "magick/xml-tree.h"
  70 \f
  71 /*
  72 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  73 %                                                                             %
  74 %                                                                             %
  75 %                                                                             %
  76 %   A c q u i r e I m a g e C o l o r m a p                                   %
  77 %                                                                             %
  78 %                                                                             %
  79 %                                                                             %
  80 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  81 %
  82 %  AcquireImageColormap() allocates an image colormap and initializes
  83 %  it to a linear gray colorspace.  If the image already has a colormap,
  84 %  it is replaced.  AcquireImageColormap() returns MagickTrue if successful,
  85 %  otherwise MagickFalse if there is not enough memory.
  86 %
  87 %  The format of the AcquireImageColormap method is:
  88 %
  89 %      MagickBooleanType AcquireImageColormap(Image *image,
  90 %        const size_t colors)
  91 %
  92 %  A description of each parameter follows:
  93 %
  94 %    o image: the image.
  95 %
  96 %    o colors: the number of colors in the image colormap.
  97 %
  98 */
  99
 100 static inline size_t MagickMax(const size_t x,
 101   const size_t y)
 102 {
 103   if (x > y)
 104     return(x);
 105   return(y);
 106 }
 107
 108 static inline size_t MagickMin(const size_t x,
 109   const size_t y)
 110 {
 111   if (x < y)
 112     return(x);
 113   return(y);
 114 }
 115
 116 MagickExport MagickBooleanType AcquireImageColormap(Image *image,
 117   const size_t colors)
 118 {
 119   register ssize_t
 120     i;
 121
 122   size_t
 123     length;
 124
 125   /*
 126     Allocate image colormap.
 127   */
 128   assert(image != (Image *) NULL);
 129   assert(image->signature == MagickSignature);
 130   if (image->debug != MagickFalse)
 131     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
 132   image->colors=colors;
 133   length=(size_t) colors;
 134   if (image->colormap == (PixelPacket *) NULL)
 135     image->colormap=(PixelPacket *) AcquireQuantumMemory(length,
 136       sizeof(*image->colormap));
 137   else
 138     image->colormap=(PixelPacket *) ResizeQuantumMemory(image->colormap,length,
 139       sizeof(*image->colormap));
 140   if (image->colormap == (PixelPacket *) NULL)
 141     ThrowBinaryException(ResourceLimitError,"MemoryAllocationFailed",
 142       image->filename);
 143   for (i=0; i < (ssize_t) image->colors; i++)
 144   {
 145     size_t
 146       pixel;
 147
 148     pixel=(size_t) (i*(QuantumRange/MagickMax(colors-1,1)));
 149     image->colormap[i].red=(Quantum) pixel;
 150     image->colormap[i].green=(Quantum) pixel;
 151     image->colormap[i].blue=(Quantum) pixel;
 152     image->colormap[i].opacity=OpaqueOpacity;
 153   }
 154   return(SetImageStorageClass(image,PseudoClass));
 155 }
 156 \f
 157 /*
 158 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 159 %                                                                             %
 160 %                                                                             %
 161 %                                                                             %
 162 %     C y c l e C o l o r m a p I m a g e                                     %
 163 %                                                                             %
 164 %                                                                             %
 165 %                                                                             %
 166 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 167 %
 168 %  CycleColormap() displaces an image's colormap by a given number of
 169 %  positions.  If you cycle the colormap a number of times you can produce
 170 %  a psychodelic effect.
 171 %
 172 %  The format of the CycleColormapImage method is:
 173 %
 174 %      MagickBooleanType CycleColormapImage(Image *image,const ssize_t displace)
 175 %
 176 %  A description of each parameter follows:
 177 %
 178 %    o image: the image.
 179 %
 180 %    o displace:  displace the colormap this amount.
 181 %
 182 */
 183 MagickExport MagickBooleanType CycleColormapImage(Image *image,
 184   const ssize_t displace)
 185 {
 186   CacheView
 187     *image_view;
 188
 189   ExceptionInfo
 190     *exception;
 191
 192   MagickBooleanType
 193     status;
 194
 195   ssize_t
 196     y;
 197
 198   assert(image != (Image *) NULL);
 199   assert(image->signature == MagickSignature);
 200   if (image->debug != MagickFalse)
 201     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
 202   if (image->storage_class == DirectClass)
 203     (void) SetImageType(image,PaletteType);
 204   status=MagickTrue;
 205   exception=(&image->exception);
 206   image_view=AcquireCacheView(image);
 207 #if defined(MAGICKCORE_OPENMP_SUPPORT)
 208   #pragma omp parallel for schedule(dynamic,4) shared(status)
 209 #endif
 210   for (y=0; y < (ssize_t) image->rows; y++)
 211   {
 212     register IndexPacket
 213       *restrict indexes;
 214
 215     register ssize_t
 216       x;
 217
 218     register PixelPacket
 219       *restrict q;
 220
 221     ssize_t
 222       index;
 223
 224     if (status == MagickFalse)
 225       continue;
 226     q=GetCacheViewAuthenticPixels(image_view,0,y,image->columns,1,exception);
 227     if (q == (PixelPacket *) NULL)
 228       {
 229         status=MagickFalse;
 230         continue;
 231       }
 232     indexes=GetCacheViewAuthenticIndexQueue(image_view);
 233     for (x=0; x < (ssize_t) image->columns; x++)
 234     {
 235       index=(ssize_t) (GetIndexPixelComponent(indexes+x)+displace) %
 236         image->colors;
 237       if (index < 0)
 238         index+=(ssize_t) image->colors;
 239       SetIndexPixelComponent(indexes+x,index);
 240       SetRedPixelComponent(q,image->colormap[index].red);
 241       SetGreenPixelComponent(q,image->colormap[index].green);
 242       SetBluePixelComponent(q,image->colormap[index].blue);
 243       q++;
 244     }
 245     if (SyncCacheViewAuthenticPixels(image_view,exception) == MagickFalse)
 246       status=MagickFalse;
 247   }
 248   image_view=DestroyCacheView(image_view);
 249   return(status);
 250 }
 251 \f
 252 /*
 253 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 254 %                                                                             %
 255 %                                                                             %
 256 %                                                                             %
 257 +   S o r t C o l o r m a p B y I n t e n s i t y                             %
 258 %                                                                             %
 259 %                                                                             %
 260 %                                                                             %
 261 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 262 %
 263 %  SortColormapByIntensity() sorts the colormap of a PseudoClass image by
 264 %  decreasing color intensity.
 265 %
 266 %  The format of the SortColormapByIntensity method is:
 267 %
 268 %      MagickBooleanType SortColormapByIntensity(Image *image)
 269 %
 270 %  A description of each parameter follows:
 271 %
 272 %    o image: A pointer to an Image structure.
 273 %
 274 */
 275
 276 #if defined(__cplusplus) || defined(c_plusplus)
 277 extern "C" {
 278 #endif
 279
 280 static int IntensityCompare(const void *x,const void *y)
 281 {
 282   const PixelPacket
 283     *color_1,
 284     *color_2;
 285
 286   int
 287     intensity;
 288
 289   color_1=(const PixelPacket *) x;
 290   color_2=(const PixelPacket *) y;
 291   intensity=(int) PixelIntensityToQuantum(color_2)-
 292     (int) PixelIntensityToQuantum(color_1);
 293   return(intensity);
 294 }
 295
 296 #if defined(__cplusplus) || defined(c_plusplus)
 297 }
 298 #endif
 299
 300 MagickExport MagickBooleanType SortColormapByIntensity(Image *image)
 301 {
 302   CacheView
 303     *image_view;
 304
 305   ExceptionInfo
 306     *exception;
 307
 308   MagickBooleanType
 309     status;
 310
 311   register ssize_t
 312     i;
 313
 314   ssize_t
 315     y;
 316
 317   unsigned short
 318     *pixels;
 319
 320   assert(image != (Image *) NULL);
 321   if (image->debug != MagickFalse)
 322     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
 323   assert(image->signature == MagickSignature);
 324   if (image->storage_class != PseudoClass)
 325     return(MagickTrue);
 326   /*
 327     Allocate memory for pixel indexes.
 328   */
 329   pixels=(unsigned short *) AcquireQuantumMemory((size_t) image->colors,
 330     sizeof(*pixels));
 331   if (pixels == (unsigned short *) NULL)
 332     ThrowBinaryException(ResourceLimitError,"MemoryAllocationFailed",
 333       image->filename);
 334   /*
 335     Assign index values to colormap entries.
 336   */
 337 #if defined(MAGICKCORE_OPENMP_SUPPORT)
 338   #pragma omp parallel for schedule(dynamic,4) shared(status)
 339 #endif
 340   for (i=0; i < (ssize_t) image->colors; i++)
 341     image->colormap[i].opacity=(IndexPacket) i;
 342   /*
 343     Sort image colormap by decreasing color popularity.
 344   */
 345   qsort((void *) image->colormap,(size_t) image->colors,
 346     sizeof(*image->colormap),IntensityCompare);
 347   /*
 348     Update image colormap indexes to sorted colormap order.
 349   */
 350 #if defined(MAGICKCORE_OPENMP_SUPPORT)
 351   #pragma omp parallel for schedule(dynamic,4) shared(status)
 352 #endif
 353   for (i=0; i < (ssize_t) image->colors; i++)
 354     pixels[(ssize_t) image->colormap[i].opacity]=(unsigned short) i;
 355   status=MagickTrue;
 356   exception=(&image->exception);
 357   image_view=AcquireCacheView(image);
 358   for (y=0; y < (ssize_t) image->rows; y++)
 359   {
 360     IndexPacket
 361       index;
 362
 363     register ssize_t
 364       x;
 365
 366     register IndexPacket
 367       *restrict indexes;
 368
 369     register PixelPacket
 370       *restrict q;
 371
 372     q=GetCacheViewAuthenticPixels(image_view,0,y,image->columns,1,exception);
 373     if (q == (PixelPacket *) NULL)
 374       {
 375         status=MagickFalse;
 376         continue;
 377       }
 378     indexes=GetCacheViewAuthenticIndexQueue(image_view);
 379     for (x=0; x < (ssize_t) image->columns; x++)
 380     {
 381       index=(IndexPacket) pixels[(ssize_t) GetIndexPixelComponent(indexes+x)];
 382       SetIndexPixelComponent(indexes+x,index);
 383       SetRedPixelComponent(q,image->colormap[(ssize_t) index].red);
 384       SetGreenPixelComponent(q,image->colormap[(ssize_t) index].green);
 385       SetBluePixelComponent(q,image->colormap[(ssize_t) index].blue);
 386     }
 387     if (SyncCacheViewAuthenticPixels(image_view,exception) == MagickFalse)
 388       status=MagickFalse;
 389     if (status == MagickFalse)
 390       break;
 391   }
 392   image_view=DestroyCacheView(image_view);
 393   pixels=(unsigned short *) RelinquishMagickMemory(pixels);
 394   return(status);
 395 }