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

   1 /*
   2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   3 %                                                                             %
   4 %                                                                             %
   5 %                                                                             %
   6 %                            SSSSS   CCCC  TTTTT                              %
   7 %                            SS     C        T                                %
   8 %                             SSS   C        T                                %
   9 %                               SS  C        T                                %
  10 %                            SSSSS   CCCC    T                                %
  11 %                                                                             %
  12 %                                                                             %
  13 %                    Read Scitex HandShake Image Format                       %
  14 %                                                                             %
  15 %                              Software Design                                %
  16 %                                   Cristy                                    %
  17 %                                 July 1992                                   %
  18 %                                                                             %
  19 %                                                                             %
  20 %  Copyright 1999-2018 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/blob.h"
  44 #include "MagickCore/blob-private.h"
  45 #include "MagickCore/cache.h"
  46 #include "MagickCore/exception.h"
  47 #include "MagickCore/exception-private.h"
  48 #include "MagickCore/image.h"
  49 #include "MagickCore/image-private.h"
  50 #include "MagickCore/list.h"
  51 #include "MagickCore/magick.h"
  52 #include "MagickCore/memory_.h"
  53 #include "MagickCore/module.h"
  54 #include "MagickCore/monitor.h"
  55 #include "MagickCore/monitor-private.h"
  56 #include "MagickCore/pixel-accessor.h"
  57 #include "MagickCore/quantum-private.h"
  58 #include "MagickCore/static.h"
  59 #include "MagickCore/string_.h"
  60 #include "MagickCore/string-private.h"
  61 \f
  62 /*
  63 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  64 %                                                                             %
  65 %                                                                             %
  66 %                                                                             %
  67 %   I s S C T                                                                 %
  68 %                                                                             %
  69 %                                                                             %
  70 %                                                                             %
  71 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  72 %
  73 %  IsSCT() returns MagickTrue if the image format type, identified by the
  74 %  magick string, is SCT.
  75 %
  76 %  The format of the IsSCT method is:
  77 %
  78 %      MagickBooleanType IsSCT(const unsigned char *magick,const size_t length)
  79 %
  80 %  A description of each parameter follows:
  81 %
  82 %    o magick: compare image format pattern against these bytes.
  83 %
  84 %    o length: Specifies the length of the magick string.
  85 %
  86 */
  87 static MagickBooleanType IsSCT(const unsigned char *magick,const size_t length)
  88 {
  89   if (length < 2)
  90     return(MagickFalse);
  91   if (LocaleNCompare((const char *) magick,"CT",2) == 0)
  92     return(MagickTrue);
  93   return(MagickFalse);
  94 }
  95 \f
  96 /*
  97 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  98 %                                                                             %
  99 %                                                                             %
 100 %                                                                             %
 101 %   R e a d S C T I m a g e                                                   %
 102 %                                                                             %
 103 %                                                                             %
 104 %                                                                             %
 105 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 106 %
 107 %  ReadSCTImage() reads a Scitex image file and returns it.  It allocates
 108 %  the memory necessary for the new Image structure and returns a pointer to
 109 %  the new image.
 110 %
 111 %  The format of the ReadSCTImage method is:
 112 %
 113 %      Image *ReadSCTImage(const ImageInfo *image_info,ExceptionInfo *exception)
 114 %
 115 %  A description of each parameter follows:
 116 %
 117 %    o image_info: the image info.
 118 %
 119 %    o exception: return any errors or warnings in this structure.
 120 %
 121 */
 122 static Image *ReadSCTImage(const ImageInfo *image_info,ExceptionInfo *exception)
 123 {
 124   char
 125     magick[2];
 126
 127   Image
 128     *image;
 129
 130   MagickBooleanType
 131     status;
 132
 133   double
 134     height,
 135     width;
 136
 137   int
 138     c;
 139
 140   Quantum
 141     pixel;
 142
 143   register ssize_t
 144     i,
 145     x;
 146
 147   register Quantum
 148     *q;
 149
 150   ssize_t
 151     count,
 152     y;
 153
 154   unsigned char
 155     buffer[768];
 156
 157   size_t
 158     separations,
 159     separations_mask,
 160     units;
 161
 162   /*
 163     Open image file.
 164   */
 165   assert(image_info != (const ImageInfo *) NULL);
 166   assert(image_info->signature == MagickCoreSignature);
 167   if (image_info->debug != MagickFalse)
 168     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
 169       image_info->filename);
 170   assert(exception != (ExceptionInfo *) NULL);
 171   assert(exception->signature == MagickCoreSignature);
 172   image=AcquireImage(image_info,exception);
 173   status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
 174   if (status == MagickFalse)
 175     {
 176       image=DestroyImageList(image);
 177       return((Image *) NULL);
 178     }
 179   /*
 180     Read control block.
 181   */
 182   memset(magick,0,sizeof(magick));
 183   memset(buffer,0,sizeof(buffer));
 184   count=ReadBlob(image,80,buffer);
 185   (void) count;
 186   count=ReadBlob(image,2,(unsigned char *) magick);
 187   if ((LocaleNCompare((char *) magick,"CT",2) != 0) &&
 188       (LocaleNCompare((char *) magick,"LW",2) != 0) &&
 189       (LocaleNCompare((char *) magick,"BM",2) != 0) &&
 190       (LocaleNCompare((char *) magick,"PG",2) != 0) &&
 191       (LocaleNCompare((char *) magick,"TX",2) != 0))
 192     ThrowReaderException(CorruptImageError,"ImproperImageHeader");
 193   if ((LocaleNCompare((char *) magick,"LW",2) == 0) ||
 194       (LocaleNCompare((char *) magick,"BM",2) == 0) ||
 195       (LocaleNCompare((char *) magick,"PG",2) == 0) ||
 196       (LocaleNCompare((char *) magick,"TX",2) == 0))
 197     ThrowReaderException(CoderError,"OnlyContinuousTonePictureSupported");
 198   count=ReadBlob(image,174,buffer);
 199   count=ReadBlob(image,768,buffer);
 200   /*
 201     Read paramter block.
 202   */
 203   units=1UL*ReadBlobByte(image);
 204   if (units == 0)
 205     image->units=PixelsPerCentimeterResolution;
 206   separations=1UL*ReadBlobByte(image);
 207   separations_mask=ReadBlobMSBShort(image);
 208   count=ReadBlob(image,14,buffer);
 209   buffer[14]='\0';
 210   height=StringToDouble((char *) buffer,(char **) NULL);
 211   count=ReadBlob(image,14,buffer);
 212   width=StringToDouble((char *) buffer,(char **) NULL);
 213   count=ReadBlob(image,12,buffer);
 214   buffer[12]='\0';
 215   image->rows=StringToUnsignedLong((char *) buffer);
 216   count=ReadBlob(image,12,buffer);
 217   image->columns=StringToUnsignedLong((char *) buffer);
 218   count=ReadBlob(image,200,buffer);
 219   count=ReadBlob(image,768,buffer);
 220   if (separations_mask == 0x0f)
 221     SetImageColorspace(image,CMYKColorspace,exception);
 222   if ((image->columns < 1) || (image->rows < 1) ||
 223       (width < MagickEpsilon) || (height < MagickEpsilon))
 224     ThrowReaderException(CorruptImageError,"ImproperImageHeader");
 225   image->resolution.x=1.0*image->columns/width;
 226   image->resolution.y=1.0*image->rows/height;
 227   if (image_info->ping != MagickFalse)
 228     {
 229       (void) CloseBlob(image);
 230       return(GetFirstImageInList(image));
 231     }
 232   status=SetImageExtent(image,image->columns,image->rows,exception);
 233   if (status == MagickFalse)
 234     return(DestroyImageList(image));
 235   /*
 236     Convert SCT raster image to pixel packets.
 237   */
 238   c=0;
 239   for (y=0; y < (ssize_t) image->rows; y++)
 240   {
 241     for (i=0; i < (ssize_t) separations; i++)
 242     {
 243       q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
 244       if (q == (Quantum *) NULL)
 245         break;
 246       for (x=0; x < (ssize_t) image->columns; x++)
 247       {
 248         c=ReadBlobByte(image);
 249         if (c == EOF)
 250           break;
 251         pixel=(Quantum) ScaleCharToQuantum((unsigned char) c);
 252         if (image->colorspace == CMYKColorspace)
 253           pixel=(Quantum) (QuantumRange-pixel);
 254         switch (i)
 255         {
 256           case 0:
 257           {
 258             SetPixelRed(image,pixel,q);
 259             SetPixelGreen(image,pixel,q);
 260             SetPixelBlue(image,pixel,q);
 261             break;
 262           }
 263           case 1:
 264           {
 265             SetPixelGreen(image,pixel,q);
 266             break;
 267           }
 268           case 2:
 269           {
 270             SetPixelBlue(image,pixel,q);
 271             break;
 272           }
 273           case 3:
 274           {
 275             if (image->colorspace == CMYKColorspace)
 276               SetPixelBlack(image,pixel,q);
 277             break;
 278           }
 279         }
 280         q+=GetPixelChannels(image);
 281       }
 282       if (x < (ssize_t) image->columns)
 283         break;
 284       if (SyncAuthenticPixels(image,exception) == MagickFalse)
 285         break;
 286       if ((image->columns % 2) != 0)
 287         (void) ReadBlobByte(image);  /* pad */
 288     }
 289     if (i < (ssize_t) separations)
 290       break;
 291     status=SetImageProgress(image,LoadImageTag,(MagickOffsetType) y,
 292       image->rows);
 293     if (status == MagickFalse)
 294       break;
 295   }
 296   if (EOFBlob(image) != MagickFalse)
 297     ThrowFileException(exception,CorruptImageError,"UnexpectedEndOfFile",
 298       image->filename);
 299   (void) CloseBlob(image);
 300   return(GetFirstImageInList(image));
 301 }
 302 \f
 303 /*
 304 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 305 %                                                                             %
 306 %                                                                             %
 307 %                                                                             %
 308 %   R e g i s t e r S C T I m a g e                                           %
 309 %                                                                             %
 310 %                                                                             %
 311 %                                                                             %
 312 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 313 %
 314 %  RegisterSCTImage() adds attributes for the SCT image format to
 315 %  the list of supported formats.  The attributes include the image format
 316 %  tag, a method to read and/or write the format, whether the format
 317 %  supports the saving of more than one frame to the same file or blob,
 318 %  whether the format supports native in-memory I/O, and a brief
 319 %  description of the format.
 320 %
 321 %  The format of the RegisterSCTImage method is:
 322 %
 323 %      size_t RegisterSCTImage(void)
 324 %
 325 */
 326 ModuleExport size_t RegisterSCTImage(void)
 327 {
 328   MagickInfo
 329     *entry;
 330
 331   entry=AcquireMagickInfo("SCT","SCT","Scitex HandShake");
 332   entry->decoder=(DecodeImageHandler *) ReadSCTImage;
 333   entry->magick=(IsImageFormatHandler *) IsSCT;
 334   entry->flags^=CoderAdjoinFlag;
 335   (void) RegisterMagickInfo(entry);
 336   return(MagickImageCoderSignature);
 337 }
 338 \f
 339 /*
 340 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 341 %                                                                             %
 342 %                                                                             %
 343 %                                                                             %
 344 %   U n r e g i s t e r S C T I m a g e                                       %
 345 %                                                                             %
 346 %                                                                             %
 347 %                                                                             %
 348 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 349 %
 350 %  UnregisterSCTImage() removes format registrations made by the
 351 %  SCT module from the list of supported formats.
 352 %
 353 %  The format of the UnregisterSCTImage method is:
 354 %
 355 %      UnregisterSCTImage(void)
 356 %
 357 */
 358 ModuleExport void UnregisterSCTImage(void)
 359 {
 360   (void) UnregisterMagickInfo("SCT");
 361 }